ini写备注问题。 如何把备注写在ini文件的最前面? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 不太明白你的问题,但是,在ini文件中,一行开头加‘#’表示这行就是注释了 那怎么写入?我现在的文件是: 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; 使用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; 根据你的代码,修改成下面的样子使用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; Tinifile好像没有提供读写注释的功能 关于先序树字符串如何转换为树 delphi编写的bho,运行结果正确,不过老出现异常,请各位指点! 选择目录和选择文件分别是哪个控件? 数据显示问题,请大家帮忙!!! 请高手们帮忙了!!!!!! 怎调用windows的计算器; 如何解决Delphi报表的图像打印失真? 求拜特出纳票据打印软件的注册码!! 关于TPANEL隐藏TCANVAS属性 MDI中如何将子窗口中光标的位置显示在父窗口的状态栏上? ActiveX相关 大家来看看这个问题
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;
var
sl: TStringList;
begin
sl := TStringList.Create();
try
sl.LoadFromFile('file.ini');
sl.Insert(0, '备注');
sl.SaveToFile('file.ini');
finally
sl.Free();
end;
end;
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;