Subject: 如何调用INI 读写单元生成文件的过程 [Print This Page]

---

Author: lycnew    Time: 2004-7-14 11:17     Subject: 如何调用INI 读写单元生成文件的过程

procedure TIniOptions.LoadSettings(Ini: TIniFile);
begin
  if Ini <> nil then
  begin
    {Section: SERVERS}
    FSERVERSSVR1 := Ini.ReadString(csIniSERVERSSection, csIniSERVERSSVR1, '127.0.0.1');
    FSERVERSSVR2 := Ini.ReadString(csIniSERVERSSection, csIniSERVERSSVR2, '127.0.0.1');
    FSERVERSSVR3 := Ini.ReadString(csIniSERVERSSection, csIniSERVERSSVR3, '127.0.0.1');
    FSERVERSSVR4 := Ini.ReadString(csIniSERVERSSection, csIniSERVERSSVR4, '127.0.0.1');
  end;
end;

---

Author: lycnew    Time: 2004-7-14 11:25

我的意思是调用下面两个过程（在三层结构的数据模块中）
    procedure LoadSettings(Ini: TIniFile);
    procedure SaveSettings(Ini: TIniFile);

[ 本贴由 lycnew 于 2004-7-14 11:58 最后编辑 ]

---

Author: lycnew    Time: 2004-7-14 12:06

我知了
IniOptions.LoadSettings(ini文件);
IniOptions.SaveSettings(IniFile)；

---

Welcome to CnPack Forum (http://bbs.cnpack.org/)

Powered by Discuz! 5.0.0