Leer fichero ini

[[duilioisola]]

No tengo mucha experiencia con C, pero:

Veo que la primera barra separadora de carpetas es simple (una sola) y esto puede que C lo considere como terminador de cadena.

fIni->WriteString("Datos", "Entorno", "C:\DatAfi21\\DatAfi21\\Gia.ini");

[Angel.Matilla]

Empezado por duilioisola

No tengo mucha experiencia con C, pero:

Veo que la primera barra separadora de carpetas es simple (una sola) y esto puede que C lo considere como terminador de cadena.

fIni->WriteString("Datos", "Entorno", "C:\DatAfi21\\DatAfi21\\Gia.ini");

Ha sido una erra al copiar; están puestas las barras dobles. De hecho, esa primera parte (C:\DatAfi21) está guardada en una variable que capturo a través de un SHBrowseForFolder.

[Casimiro Notevi]

¿El fichero ini está bien? Si está mal es que no lo grabas bien. Si está bien es que no lo lees bien.
Sigue con el depurador paso a paso hasta llegar hasta esa línea y mira el contenido de la variable.

[Angel.Matilla]

Gracias por la respuesta. Centrándome en que ya estoy probando sólo con Builder XE3.

La grabación es la que he puesto antes y lo hago con el primer trozo de código que puse, de lo que deduzco que está bien hecho. En la segunda parte, cuando intento leerlo, incializo las variables (por si acaso)

cAcceso  = "";
cEntorno = "";
cTablas  = "";

y ejecuto el segundo código que he puesto. Me he dado cuenta que si pongo esto:

TStringList *slIniFile = new TStringList();
TIniFile *fIni = new TIniFile(ChangeFileExt(Application->ExeName, ".ini"));
fIni->ReadSectionValues(UnicodeString("DATOS"), slIniFile);
cAux = slIniFile->Text;

en este slIniFile->Text aparece esto mirando con el depurador:

"Entorno=C:\\DatAfi21\\Gia.ini\r\nAcceso=C:\\DatAfi21\\Acceso\r\nTablas=C:\\DatAfi21\\Tablas\r\n "

lo que significa que estar la información está, pero si hago esto:

cEntorno = slIniFile->Strings[0];

que en teoría debería valer Entorno=C:\\DatAfi21\\Gia.ini, ¡no hay ningún valor en la variable!Me devuelve NULL. Me tiene total y aboslutamente despistado.

[Casimiro Notevi]

Empezado por Angel.Matilla

La grabación .. deduzco que está bien hecho.

Ángel, antes de probar la lectura, debes asegurarte, no solamente deducir, que se han grabado bien los datos.
Lo mínimo a probar es buscar el fichero ini en el disco y abrirlo con cualquier editor de textos para ver si está correcto.

Luego, si está bien, es cuando hay que seguir con el problema de la lectura.

[ecfisa]

Hola Angel.

Estuve probando, básicamente con tu código y no tengo ningún problema, te adjunto el código:

Código PHP:

#include <inifiles.hpp>

AnsiString iniName = ChangeFileExt(Application->ExeName, ".ini");
AnsiString cEntorno, cAcceso, cTablas;

void __fastcall TForm1::btnSaveClick(TObject *Sender) {
  TIniFile* ini = new TIniFile (iniName);

  ini->WriteString("Datos", "Entorno", "C:\\DatAfi21\\DatAfi21\\Gia.ini");
  ini->WriteString("Datos", "Acceso" , "C:\\DatAfi21\\DatAfi21\\Acceso");
  ini->WriteString("Datos", "Tablas" , "C:\\DatAfi21\\DatAfi21\\Tablas");

  delete ini;
}

void __fastcall TForm1::btnToStringClick(TObject *Sender) {

  TIniFile* ini = new TIniFile(iniName);

  cEntorno = ini->ReadString("Datos", "Entorno", cEntorno);
  cAcceso  = ini->ReadString("Datos", "Acceso" , cAcceso);
  cTablas  = ini->ReadString("Datos", "Tablas" , cTablas);

  delete ini;
  Memo1->Clear();
  Memo1->Lines->Add(cEntorno);
  Memo1->Lines->Add(cAcceso);
  Memo1->Lines->Add(cTablas);
}

void __fastcall TForm1::btnToStringsClick(TObject *Sender) {
  TIniFile* ini = new TIniFile(iniName);
  TStrings* sl = new TStringList;

  ini->ReadSectionValues("Datos", sl);
  Memo2->Clear();
  Memo2->Lines->Assign(sl);

  delete ini;
  delete sl;
 } 


Muestra:


Saludos

[Angel.Matilla]

Empezado por Casimiro Notevi

Ángel, antes de probar la lectura, debes asegurarte, no solamente deducir, que se han grabado bien los datos.
Lo mínimo a probar es buscar el fichero ini en el disco y abrirlo con cualquier editor de textos para ver si está correcto.

Siento haberme expresado mal. El contenido del fichero que puse en el primer mensaje es un copiado y pegado a partir del bloc de notas, lo que me dice que el fichero está bien grabado.

Empezado por ecfisa

Estuve probando, básicamente con tu código y no tengo ningún problema, te adjunto el código:

Entonces, básicamente, no lo entiendo.
Lo he probado yo también en un proyecto vacío y efectivamente funciona; ¿por qué demonios no me funciona a mi un código que como dices es en lo esencial igual? Seguiré probando.