WriteDate
WriteDateTime
WriteFloat
WriteInteger
WriteTime
var GameIni: TIniFile;
begin
Gameini := TIniFile.Create('FUNGAME.INI');
with GameIni do
begin
WriteBool('Options', 'Sound', True);
WriteInteger('Options', 'Level', 3);
WriteBool('Configuration', 'ShowToolBar', True);
Free;
end;
WriteDateTime
WriteFloat
WriteInteger
WriteTime
var GameIni: TIniFile;
begin
Gameini := TIniFile.Create('FUNGAME.INI');
with GameIni do
begin
WriteBool('Options', 'Sound', True);
WriteInteger('Options', 'Level', 3);
WriteBool('Configuration', 'ShowToolBar', True);
Free;
end;
换成下面不就行了!'DBGridwidth' 'width0'
inif:Tinifile;
begin
inif:=Tinifile.Create('E:\Colors.ini');
inif.WriteString('DBGridwidth','width0',100);//改width0的值
...
inif.free;
end;
inif:Tinifile;
begin
inif:=Tinifile.Create('E:\Colors.ini');
inif.WriteString('DBGridwidth','width0',100);//改width0的值
...
inif.free;
end;
inif.WriteString('DBGridwidth','width0',100);//改width0的值
inif.Writeinteger('DBGridwidth','width0',100);//改width0的值
用WriteInteger函数
如 WriteInteger('DBGridwidth', 'width0', 99);