delphi Ini读写

标签：str   edit   creat   文件路径   except   service   current   需要   ack   

try
ini := TIniFile.Create(GetCurrentDir+‘\BackServiceSetting.ini‘); {ini 对象建立需要文件路径参数, 如果缺少路径会默认Windows目录}
editId.Text:=ini.ReadString(‘饿了么设置‘,‘店铺ID‘,‘‘);
editKey.Text:=ini.ReadString(‘饿了么设置‘,‘Key‘,‘‘);
edt_Secret.Text:=ini.ReadString(‘饿了么设置‘,‘Secret‘,‘‘);
edt_token.Text:=ini.ReadString(‘饿了么设置‘,‘Token‘,‘‘);
except
ini.Free;
end;

delphi Ini读写

标签：str   edit   creat   文件路径   except   service   current   需要   ack   

原文地址：http://www.cnblogs.com/semth/p/7719740.html