如何调用INI 读写单元生成文件的过程 - CnPack IDE 专家包（CnWizards） - CnPack Forum

新警察

UID 453
Digest Posts 0
Credits 3
Posts 3
点点分 3
Reading Access 10
Registered 2004-7-14
Status Offline

Post at 2004-7-14 11:17 Profile | Blog | P.M.

如何调用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;

lycnew

新警察

UID 453
Digest Posts 0
Credits 3
Posts 3
点点分 3
Reading Access 10
Registered 2004-7-14
Status Offline

Post at 2004-7-14 11:25 Profile | Blog | P.M.

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

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

lycnew

新警察

UID 453
Digest Posts 0
Credits 3
Posts 3
点点分 3
Reading Access 10
Registered 2004-7-14
Status Offline

Post at 2004-7-14 12:06 Profile | Blog | P.M.

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