Tweak modificar un programa desde otro.

[[maeyanes]]

La función ExtracFileDir no existe, la correcta es ExtractFilePath. No necesitas usar \ en la cadena, ya que la función devuelve la ruta con un \ final.

Código Delphi [-]
Archivo := ExtractFilePath(Application.ExeName) + 'Fichero.ini';

Saludos...

[turminator]

Pues poniendo ExtractFilePath continua dandamoe este mismo error. Que mas puede ser?

[[maeyanes]]

En ningún lugar veo que declares la variable Archivo.

[turminator]

Pero no entiendo porque tengo que declarar la variable archivo, el ejemplo no usa solo la variable MiFicheroIni? Y en caso de tener que declararla que formato tengo que darle?

Muchas gracias.

[[maeyanes]]

La variable Archivo tendría que ser de tipo string:

Código Delphi [-]
procedure TForm1.FormClick(Sender: TObject);
var
  Archivo: string;

begin
  Archivo := ExtracFilePath(Application.ExeName) + 'Fichero.Ini';
  MiFicheroIni := TIniFile.Create(Archivo);
  try
    Form1.Left := MiFicheroIni.ReadInteger('Form', 'Left', 0);
    Form1.Top := MiFicheroIni.ReadInteger('Form', 'Top', 0);
    Form1.Caption := MiFicheroIni.ReadStribg('Form', 'Caption', 'Sin Título')
  finally
    MiFicheroIni.Free
  end
end;

Saludos...

[turminator]

Código Delphi [-]
procedure TForm1.FormClick(Sender: TObject);
var
Archivo: string;
 
begin
Archivo := ExtractFilePath(Application.ExeName) + 'Fichero.Ini';
MiFicheroIni := TIniFile.Create(Archivo);
try
Form1.Left := MiFicheroIni.ReadInteger('Form', 'Left', 0);
Form1.Top := MiFicheroIni.ReadInteger('Form', 'Top', 0);
Form1.Caption := MiFicheroIni.ReadString('Form', 'Caption', 'Sin Título')
finally
MiFicheroIni.Free
end
end;

He arreglado un par d errores (n y t) y creo que ahora ya funciona, mañana lo probaré que ahora no puedo. Muchas gracias por adentrarme en el manejo de Inis.

[turminator]

OK. Ahora ye empiezo a "dominar" el tema de INIs. Mi siguiente pregunta es como debo para que los usuarios de la aplicación rellenen dos edits que tengo creados y automaticamente se me escriban en una determinada sección del archivo INI base.

La aplicación trataria de rellenar unas simples campos edit, y que automaticamente se escribiera en las sections de INI.

Muchas gracias.