Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 19-01-2005
Walterdf Walterdf is offline
Miembro
 
Registrado: may 2003
Ubicación: Buenos Aires
Posts: 152
Poder: 22
Walterdf Va por buen camino
Archivos .ini

Buenas
Estoy desarrollando una aplicación y necesito que en el inicio de la misma lea un archivo con determinados parámetros que pueden cambiarse.
Explico un poco lo que pienso hacer, entre otras cosas, mi aplicación permite enviar emails con pedidos que se generan en él y en el ini quisiera poner la configuración del servidor, dirección de correo, etc. Obviamente esto tiene que ser dinámico por si se cambia de dirección, servidor o lo que sea. Estoy haciendo otro pequeño programita (en Delphi) para que el usuario ingrese los parámetros y el programa los escribi en el ini.
Supongo que no tiene mucha ciencia ya que se trata de un archivo de texto pero la verdad que ignoro como manejarlo desde Delphi y además desconozco realmente si el archivo se suele construir con alguna estructura "standard".
Si alguien puede darme una mano con esto se lo agradeceré.
Muchas gracias.

Walter
Responder Con Cita
  #2  
Antiguo 19-01-2005
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Poder: 24
maeyanes Va por buen camino
En Delphi existe una clase llamada TIniFile, busca en la ayuda todo lo relacionado con esta clase.


Saludos...
Responder Con Cita
  #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
Poder: 20
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
  #4  
Antiguo 19-01-2005
Walterdf Walterdf is offline
Miembro
 
Registrado: may 2003
Ubicación: Buenos Aires
Posts: 152
Poder: 22
Walterdf Va por buen camino
Mil gracias!!, me sirvió un montón, era lo que precisaba.
Un abrazo.

Walter
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 21:40:27.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi