[[Lepe]]

En el oncreate de la forma:

Código Delphi [-]
var x:Tinifile;
begin 
  x := tinifile.Create(changeFileExt(application.exename, '.ini');
  form1.left := x.ReadInteger('Posicion', 'Left', 40);
  // otras
  x.free;

En el onclose de la forma:

Código Delphi [-]
var x:Tinifile;
begin 
  x := tinifile.Create(changeFileExt(application.exename, '.ini');
  x.WriteInteger('Posicion', 'Left', Form1.left);
  // otras
  x.free;

Saludos