delphi Ini读写

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读写

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