Archivos .ini

[[Héctor Randolph]]

Hola Walterdf!

Te pongo un ejemplo de como puedes leer el contenido de un archivo ini

Código Delphi [-]
procedure LeerIni;
var 
  Cad1: String
  I: Integer;
begin
   with TIniFile.Create('archivo.ini') do
   try
     Cad1:=ReadString('Seccion1','Valor1','Algún valor por omisión');
     I:=ReadInteger('Seccion2','Valor2',0);
   finally
     Free;
   end;
end;

Para escritura es algo similar

Código Delphi [-]
procedure EscribirIni;
var 
  Cad1: String
  I: Integer;
begin
   Cad1='cadena';
   I:=100;
   with TIniFile.Create('archivo.ini') do
   try
     WriteString('Seccion1','Valor1',Cad1);
     WriteInteger('Seccion2','Valor2',I);
   finally
     Free;
   end;
end;

Nota: También puede utilizar TRegIniFile, su funcionamiento es muy parecido excepto que utilizas el registro de Windows para almacenar los valores.

Un Saludo.