uses IniFiles;procedure ReadIniFile;var IniFile: TIniFile;
Value: string;
begin
IniFile := TIniFile.Create('C:/abc.ini');
Value := IniFile.ReadString('Node', 'Name', '');
IniFile.Free;
end;
procedure WriteIniFile;var IniFile: TIniFile;
Value: string;
begin
Value := '123456';
IniFile := TIniFile.Create('C:/abc.ini');
IniFile.WriteString('Node', 'Name', Value);
IniFile.Free;
end;