var FileSet: TIniFile;begin FileSet:= TIniFile.Create('my.ini'); FileSet.WriteInteger('MySection', 'Width', Form1.Width); FileSet.Free;end;