Ayuda con fichero de inicio

[[Lepe]]

El primer parametro de ReadString es la seccion (en el fichero ini se traduce por: esa misma palabra entre corchetes.
el segundo parametro es la parte izquierda del igual (Bono o dato2)
el tercer parametro es el valor por defecto.

Código Delphi [-]
var
  MiFichero: TIniFile;
  begin
  MiFichero := TIniFile.Create('C:\Archivos de programa\Borland\Delphi7\Projects\mipro.ini');
  Edit1.Text :=  MiFichero.ReadString('Seccion1','Bono','35');
  Mifichero.Free;
end;

En este caso, si 'Bono' no está en el archivo, o el archivo ini está en blanco, devuelve '35'

al salir de la ventana, para guardar los valores:

Código Delphi [-]
var
  MiFichero: TIniFile;
  begin
  MiFichero := TIniFile.Create('C:\Archivos de programa\Borland\Delphi7\Projects\mipro.ini'); 
// si existe el archivo, lo abre,
// si no existe, lo crea.


  MiFichero.WriteString('Seccion1','Bono',Edit1.text);
  MiFichero.WriteInteger('Seccion1','dato2',strtoint(Edit2.text));
  Mifichero.Free;
end;

y el fichero queda tal que así:

[Seccion1]
bono=50;
dato2=23;

Muchas gracias por vuestra atencion.

de nada.... A mandar