Exportar datos ListView a .txt

[andres_89]

Hola amigos,

Tengo un problema para exportar los datos de un Listview a un archivo txt, ya cree el archivo txt con este codigo:

AnsiString nombrearchivo = "Reporte";
creat(nombrearchivo.c_str(),1);

           ofstream write_archive(nombrearchivo.c_str()) ;
           write_archive << ("Lista de alumnos: \n");       
           write_archive.close();

Pero no puedo hacer hasta el momento el código para agregar los datos de las columnas "'Nombre" y "Apellidos" a ese archivo de texto, considerando que pueden haber "n" filas, ya que en un día se pueden registrar 2 alumnos, al día siguiente 100 alumnos, etc. y mi reporte es diario con la cantidad de alumnos registrados ese dia.

Un ejemplo de mi ListView es este:


Espero me puedan ayudar, gracias de antemano.

Saludos.

[ecfisa]

Hola andres_89.

Ejemplo usando STL:

Código PHP:

#include <fstream>
...
{
  AnsiString nombrearchivo = "Reporte.txt";
  std::ofstream ofs;
  TListView* lv = static_cast<TListView*>(ListView1);

  ofs.open(nombrearchivo.c_str(), std::ofstream::out | std::ofstream::app);
  for(int i = 0; i < lv->Items->Count; i++)
    ofs << (lv->Items->Item[i]->Caption + "," +
            lv->Items->Item[i]->SubItems->Text).c_str();
  ofs.close();
} 


Saludos

[andres_89]

Hola ecfisa,

gracias por tu respuesta, pero al momento de ejecutarlo y guardarlo, me lo guarda en hexadecimal, se ve puros numeros, creo que tiene algo que ver con el guardado en el código.

Estaré jugando por acá haber si me sale.

Saludos.

[ecfisa]

Hola Andres.

Usando los datos que mostraste para el ListView (nombres, apellidos) el código funciona correctamente.

Codigo de prueba:

Código PHP:

#include <fstream>
void __fastcall TForm1::btnSaveClick(TObject *Sender)
{
  AnsiString nombrearchivo = "C:\\tmp\\Reporte.txt";
  std::ofstream ofs;
  TListView* lv = static_cast<TListView*>(ListView1);

  ofs.open(nombrearchivo.c_str(), std::ofstream::out | std::ofstream::app);
  for(int i = 0; i < lv->Items->Count; i++)
    ofs << (lv->Items->Item[i]->Caption + "," +
            lv->Items->Item[i]->SubItems->Text).c_str();
  ofs.close();

  // mostrar el contenido del archivo
  Memo1->Lines->LoadFromFile(nombrearchivo);
} 


Resultado:


Saludos

[ecfisa]

Hola de nuevo.

No se si es requisito que uses STL, pero con VCL tal vez te resulte mas simple:

Código PHP:

void __fastcall TForm1::btnSaveClick(TObject *Sender)
{
  AnsiString nombrearchivo = "C:\\tmp\\Reporte.txt";
  TListView* lv = static_cast<TListView*>(ListView1);

  TStrings* sl = new TStringList;
    for(int i = 0; i < lv->Items->Count; i++)
    sl->Add(lv->Items->Item[i]->Caption + "," +
            lv->Items->Item[i]->SubItems->Text);
  sl->SaveToFile(nombrearchivo);
  delete sl;
  // mostrar el contenido del archivo
  Memo1->Lines->LoadFromFile(nombrearchivo);
} 


Saludos

[andres_89]

Hola ecfisa,

Justo estaba pensando hacerlo con puntero porque no logre hacer funcionar tu primer código en embarcadero c++.
Tu último código en VLC me funciono bien.
El anterior con STL me funciono bien en C++ Builder pero me mostraba digitos en hexadecimal en embarcadero C++.
El de VLC me ejecuto normal en ambos compiladores, me parece que fuera ya un tema de los compiladores que en embarcadero hay que configurar en sus opciones, por ahora me quedo con el STL, ya que tengo que trabajarlo en embarcadero por el tema que ya se compro la licencia.

De verdad te agradesco mucho por tu tiempo y ayuda ecfisa.

Saludos.

[andres_89]

Empezado por ecfisa

Hola de nuevo.

No se si es requisito que uses STL, pero con VCL tal vez te resulte mas simple:

Código PHP:

void __fastcall TForm1::btnSaveClick(TObject *Sender)
{
  AnsiString nombrearchivo = "C:\\tmp\\Reporte.txt";
  TListView* lv = static_cast<TListView*>(ListView1);

  TStrings* sl = new TStringList;
    for(int i = 0; i < lv->Items->Count; i++)
    sl->Add(lv->Items->Item[i]->Caption + "," +
            lv->Items->Item[i]->SubItems->Text);
  sl->SaveToFile(nombrearchivo);
  delete sl;
  // mostrar el contenido del archivo
  Memo1->Lines->LoadFromFile(nombrearchivo);
} 


Saludos

Hola ecfisa, habrá algún parámetro que me permita guardar esos datos pero sin borrar el archivo ya creado anteriormente?, por ejemplo el dia lunes creo el reporte "ejemplo.txt" y el siguiente lunes actualizo a ese mismo reporte los nuevos datos, mostrandome los antiguos y nuevos datos, ya que con el código que se tiene ahora, cada vez que guardo los datos me borra los anteriores y me sobrepone los nuevos en el mismo archivo.

Saludos.

[ecfisa]

Hola andres_89.

Tal vez te resulte mejor unificar ambas acciones en una función:

Código PHP:

void appendData(TListView *lv, const AnsiString &fileName,
  const bool &append=true) {

  TStrings* sl = new TStringList;

  if (append && FileExists(fileName))
    sl->LoadFromFile(fileName);

  for(int i = 0; i < lv->Items->Count; i++)
    sl->Add(lv->Items->Item[i]->Caption + "," +
            lv->Items->Item[i]->SubItems->Text);

  sl->SaveToFile(fileName);
  delete sl;
} 


El parámetro append dictamina si se agregan o sobreescriben los datos, por defecto(omisión) se agregan.

Ejemplo de uso:

Código PHP:

void __fastcall TForm1::btnAppendClick(TObject *Sender)  {
  appendData(ListView1, "C:\\tmp\\Reporte.txt", CheckBox1->Checked);
} 


Para el ejemplo uso como argumento el estado de la propiedad Checked de un TCheckBox. Marcado agrega, si no sobreescribe.

Saludos

[andres_89]

Gracias ecfisa,

es un excelente código y queda para el foro para otros, ya que no encontre ni uno sobre este tema en los foros de builder, ya pude terminar con esta parte, te lo mil agradesco.

Saludos.