Ver Mensaje Individual
  #6  
Antiguo 21-03-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola de nuevo.

Tenes que indicar el propietario (Owner) en la creación. Por lo que creo interpretar de tu mensaje, bién puede ser NULL.
Código:
void __fastcall ExportToCVS(TQuickRep *QR, const char *FileName)
{
  TQRCSVFilter *CVSF = new TQRCSVFilter(NULL);
  TQRCommaSeparatedFilter *CommaSF = new TQRCommaSeparatedFilter(FileName);
  TStringList *SL = new TStringList;

 __try {
   CVSF->Separator = ';';
   QR->ExportToFilter(CommaSF);
   SL->LoadFromFile(FileName);
   SL->Text = StringReplace(SL->Text,'"',"", TReplaceFlags()<<rfReplaceAll);
   SL->SaveToFile(FileName);
 }
 __finally {
   delete SL;
   delete CVSF;
   delete CommaSF;
 }
}
Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita