ini写备注问题。

Question

如何把备注写在ini文件的最前面？

Answer 1

不太明白你的问题，但是，在ini文件中，一行开头加‘#’表示这行就是注释了

Answer 2

那怎么写入？我现在的文件是：
    filename:= ExtractFilePath(paramstr(0))+'dept.ini';
    inifile:= Tinifile.Create(filename);
    //我要加入注释，怎么写？
    inifile.WriteString('dept','deptid',edtDeptid.Text);
    inifile.WriteString('dept','deptname',edtDeptname.Text);
    inifile.WriteString('dept','opid',edtOpid.Text);
    inifile.WriteString('dept','opname',edtOpName.Text);
    inifile.Destroy;

Answer 3

使用TSTringList的实例打开你的ini文件，然后插入行，在保存，大概如下：
var
  sl: TStringList;
begin
  sl := TStringList.Create();
  try
    sl.LoadFromFile('file.ini');
    sl.Insert(0, '备注');
    sl.SaveToFile('file.ini');
  finally
    sl.Free();
  end;
end;

Answer 4

根据你的代码，修改成下面的样子使用TSTringList的实例打开你的ini文件，然后插入行，在保存，大概如下：
var
  sl: TStringList;
begin
  sl := TStringList.Create();
  try
    sl.add('备注');
    sl.add('[dept]')
    sl.add('deptid=' + edtDeptid.Text);
    //.......
    sl.SaveToFile('file.ini');
  finally
    sl.Free();
  end;
end;

Answer 5

Tinifile好像没有提供读写注释的功能