problema con fichero .ini

[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.

[dec]

Hola,

Empezado por 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?

Claro, hombre, digitalmente: como lo he hecho yo en el ejemplo de arriba: con los puritos dedos.

Es un archivo de texto plano: puedes escribirlo con el Bloc de notas, por ejemplo, sin problemas, siempre que te percates de que incluyes las secciones, claves y valores tal y como esperes encontrarlas.

Claro, que, una ayuda podría ser que usases cierto programa que creo que se llama XEditor (no lo recuerdo bien), el cual puede resaltarte la sintaxis de los archivos INI, de tal manera que algo podrá ayudarte. Y, por supuesto, desde el propio Delphi, yo creo que también te resaltará la sintaxis de dichos archivos.

Edito: De todas formas, que tampoco se te haga especialmente complicado el hecho de utilizar el método "WriteString" para escribir los valores oportunos en el archivo INI, oyes:

Código Delphi [-]
procedure EscribirValoresIni(const log, estado, comandos: string);
var
  ini: TIniFile;
begin
  ini := TIniFile.Create(ChangeFileExt(ParamStr(0), '.ini'));
  try
    ini.WriteString('Ficheros', 'Log', log);
    ini.WriteString('Ficheros', 'Estado', estado);
    ini.WriteString('Ficheros', 'Comandos', comandos);
  finally
    ini.Free;
  end;
end;

[coleleon]

Jo ,no gano para disgustos,resulta que los datos q leo del ini son los nombres de las tablas DBase que utilizo en el programa.Ahora me pregunto, si tengo un componente Ttable xa cada tabla, en que propiedad tengo q asignar los valores leidos antes en tiempo de ejecución,para poder acceder a las tablas desde los componentes ttable,TABLENAME o DATABASENAME?Gracias d nuevo

[dec]

Hola,

Empezado por coleleon

Jo ,no gano para disgustos,resulta que los datos q leo del ini son los nombres de las tablas DBase que utilizo en el programa.Ahora me pregunto, si tengo un componente Ttable xa cada tabla, en que propiedad tengo q asignar los valores leidos antes en tiempo de ejecución,para poder acceder a las tablas desde los componentes ttable,TABLENAME o DATABASENAME?Gracias d nuevo

Creo que ese es un tema diferente del que se ha tratado en este Hilo. A distintas preguntas, mejor distintos Hilos: la guía de estilo de estos Foros, que nadie lee, es lo que dice, a lo menos, y tiene su razón de ser. Y,... por otro lado... ¿qué tal con el archivo INI? ¿Te hiciste ya con ello?

[coleleon]

Perdón,debe ser el estres q me produce encontrarme con dudas de estas...el INi ya superado!

[dec]

Hola,

Empezado por coleleon

Perdón,debe ser el estres q me produce encontrarme con dudas de estas...el INi ya superado!

Me alegro, hombre. Respecto de la cuestión que planteas últimamente, es posible que pudieras plantearla en el apartado "Conexión con bases de datos" de estos Foros. A mí, ya lo he dicho, me parece lo suyo para que cada cosa quede más o menos en su sitio.

[delphi.com.ar]

Empezado por coleleon

Perdón,debe ser el estres q me produce encontrarme con dudas de estas...el INi ya superado!

¿Y cuál era el problema?