delphi 如何在 已有的 ini 文件后，继续写入内容（不删除原来的内容）

Question

delphi 如何在 已有的 ini 文件后，继续写入内容（不删除原来的内容）

Answer 1

var
TextFileVar: Text ;　
........
AssignFile ：把一个外部文件名和一个文件变量相关联Reset ：打开一个存在的文件Rewrite ：创建并打开一个新文件（或覆盖原有文件）Append ：以添加方式打开一个文件（只适用于文本文件）CloseFile ： 关闭一个打开的文件FileOpen ：打开一个特定的文件并返回文件句柄FileCreate ：创建一个给定文件名的文件并返回文件句柄FileClose ：关闭一个特定句柄的文件　        后边三个文件主要供系统内部使用，在文件复制的编程中也往往会用到。它们操作的对象是文件句柄而不是文件变量或
var
lst:Tstringlist;
begin
lst:=tstringlist.Create;
lst.LoadFromFile();
lst.Append( 'A=b');
lst.SaveToFile();
end;

Answer 2

TIniFile 这个类就是针对 ini 文件进行操作

Answer 3

      f:=tinifile.create(path+'\config.ini');
      f.WriteString('LinkInfo','Server',s);
      f.Free;

Answer 4

ini中截取一段来讲讲[CSYQ]
UserID=9CC2C196-C6D6-49ED-962E-6A98FEF9A4E2
DBAcc=CSYQ
ClientWidth=Max
Header=1REG_SECTION:='CSYQ';  //只要这个节点名称不同，你就可以在原有的ini里添加GV_IniFileName:=ExtractFilePath(Application.ExeName)+'Config.ini';
GV_IniFile:=TIniFile.Create(GV_IniFileName);if not GV_IniFile.SectionExists(REG_SECTION) then  //判断你要加的节点在不在里面
begin
  GV_IniFile.WriteInteger(REG_SECTION,'ClientWidth',Self.ClientWidth);
  GV_IniFile.WriteInteger(REG_SECTION,'ClientHeight',Self.ClientHeight);
end;