20-11-2014, 01:46 PM
هذا السطر بدون معنى
هذه الطريقة الصحيحة
PHP كود :
appINI := TIniFile.Create('par.ini');
PHP كود :
With Tinifile.Create ('par.ini') Do
Begin
try
Writeinteger ('FormHeight','FormHeightValue',Form1.Height);
Writeinteger ('FormWidth','FormWidthValue',Form1.Width);
Writebool ('CheckBarre6','CheckBarre6Value',RadioBox1.Checked);
finally
Free;
end;
end;