uses Inifiles
...
procedure TForm1.FormCreate(Sender: TObject);
var
Ini: TIniFile;
dir:string;
begin
dir:=ExtractFilePath(Application.ExeName);
Ini := TIniFile.Create(dir + 'Ablak.ini');
try
Left := Ini.ReadInteger('Window', 'Left', Left);
Top := Ini.ReadInteger('Window', 'Top', Top);
Width := Ini.ReadInteger('Window', 'Width', Width);
Height := Ini.ReadInteger('Window', 'Height', Height);
Edit1.Text:=Ini.ReadString('Window', 'Szoveg','Eredeti');
CheckBox1.Checked:=Ini.ReadBool('Window', 'Kijeloles',true);
except
//
end;
Ini.Free;
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var
Ini: TIniFile;
dir:string;
begin
dir:=ExtractFilePath(Application.ExeName);
Ini := TIniFile.Create(dir + 'Ablak.ini');
try
Ini.WriteInteger('Window', 'Left', Left);
Ini.WriteInteger('Window', 'Top', Top);
Ini.WriteInteger('Window', 'Width', Width);
Ini.WriteInteger('Window', 'Height', Height);
Ini.WriteString('Window', 'Szoveg', Edit1.text);
Ini.WriteBool('Window', 'Kijeloles',CheckBox1.Checked);
except
//
end;
Ini.Free;
end;