Procedure TCSettingsFunctions.LoadPositions; Var X : Integer; Y : Integer; sINI : TIniFile; Begin If SavePositions = 1 Then Begin sINI := TIniFile.Create('/.Settings.ini'); X := sINI.ReadInteger('InterFace', 'X', 0); Y := sINI.ReadInteger('InterFace', 'Y', 0); Form1.Left := X; Form1.Top := Y; End; End;