delphi Ini读写
2021-05-04 12:28
标签:str edit creat 文件路径 except service current 需要 ack try delphi Ini读写 标签:str edit creat 文件路径 except service current 需要 ack 原文地址:http://www.cnblogs.com/semth/p/7719740.html
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;