Ver Mensaje Individual
  #3  
Antiguo 19-01-2005
Avatar de Héctor Randolph
[Héctor Randolph] Héctor Randolph is offline
Miembro Premium
 
Registrado: dic 2004
Posts: 882
Reputación: 22
Héctor Randolph Va por buen camino
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.

Última edición por Héctor Randolph fecha: 19-01-2005 a las 22:21:57.
Responder Con Cita