I have a problem with TIniFile, it doesn't work.
Until some revisions ago (2-3 days) no problem, but from yesterday it
doesn't work anymore.
...
FileINI : TIniFile;
...
FileCFG:= 'data.ini';
...
FileINI := TIniFile.Create(FileCFG);
FileINI.UpdateFile;
try
var1 := FileINI.ReadInteger('sect1','data1',10); //always return 10
var2 := FileINI.ReadInteger('sect1','data2',11); //always return 11
var3 := FileINI.ReadInteger('sect2','data3',12); //always return 12
var4 := FileINI.ReadInteger('sect2','data4',13); //always return 13
finally
FileINI.Free;
end;
...
Thanks!
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
