problema con fichero .ini

[delphi.com.ar]

Empezado por coleleon

El problema es q si muestro lo q lee del fichero,siempre sale error, creo q entonces no lee bien el fichero,no?

Depende de cuál sea este error, será el problema... ¿Que error te da? ¿En qué línea? ¿Te compila?

Lee esto por favor: Guía de Estilo

[coleleon]

Compilar sí compila,lo q me refería es q devuelve el tercer parámetro de la función ReadString,y creo q eso es porq no encuentra la key q le paso,pero no sé por qué,ya q en el fichero de texto si q está bien escrito.Gracias por tu atención.

[Coco]

cual es el contenido del archivo ini?
Lo estas tomando del path correcto?

[coleleon]

El contenido es muy simple:
[Ficheros]
Comandos=C:\ComandosDB\Comandos.dbf
Estado=C:\ComandosDB\Estado.dbf
Log=C:\ComandosDB\Log.dbf
y el path lo obtengo de la función ChangeFileExt(Application.ExeName,'.ini') ,q creo q vale,no?

[delphi.com.ar]

Si vale... ¡Pero fíjate que sea lo mismo que imaginas que es!...
Prueba con un ShowMessage(ChangeFileExt(Application.ExeName,'.ini'));

Saludos!

[dec]

Hola,

Empezado por Federico

Código Delphi [-]
ShowMessage(ChangeFileExt(Application.ExeName,'.ini'));

Pero,... eso siempre le mostraría una ruta correcta, puesto que es claro que el ejecutable existe y nomás la ruta del ejecutable aparecerá con una extensión ".ini", que es justo lo que le dices que muestre, como puede verse. No sé... me llamó la atención esto Federico, disculpa la tontería: por otro lado no he leído el Hilo desde un principio así que no sé qué hago aquí... ¿respondiendo el qué?

[delphi.com.ar]

Empezado por dec

Pero,... eso siempre le mostraría una ruta correcta, puesto que es claro que el ejecutable existe y nomás la ruta del ejecutable aparecerá con una extensión ".ini", que es justo lo que le dices que muestre, como puede verse.

Si, mi idea es que compare esa ruta con el ini que esta creando a mano... si verdaderamente el programa la va a buscar donde el cree que la esta buscando..

Saludos!

[coleleon]

Sí,lo acabo de comprobar,y la ruta que resulta es correcta.No sé..ya dudo...no será q no se puede hacer desde un archivo de texto normal y corriente?

[coleleon]

Una pregunta:no hay otra manera de crear el .ini sin tener q ejecutar antes las funciones WriteString ..etc para introducir los datos iniciales?

[dec]

Hola,

Algo así debiera funcionar:

Código Delphi [-]
uses
  IniFiles;

procedure TfrmPrincipal.btnLeerIniClick(Sender: TObject);
var
  ini: TIniFile;
begin
  ini := TIniFile.Create(ChangeFileExt(ParamStr(0), '.ini'));
  try
    ShowMessage( 'Clave Comandos = ' + ini.ReadString('Ficheros', 'Comandos', 'Error') );
    ShowMessage( 'Clave Estado = ' + ini.ReadString('Ficheros', 'Estado', 'Error') );
    ShowMessage( 'Clave Log = ' + ini.ReadString('Ficheros', 'Log', 'Error') );
  finally
    ini.Free;
  end;
end;

Te adjunto un sencillo ejemplo en donde se hace uso del código de arriba.

[delphi.com.ar]

Comprueba que tu aplicación este accediendo el archivo que piensas que estas accediendo, comprueba que la Key se llame exactamente como dice en el archivo. Prueba guardando los datos desde tu programa mediante WriteString, tienes que ver cambios en el ini!