Ver Mensaje Individual
  #2  
Antiguo 26-05-2008
Avatar de mlara
[mlara] mlara is offline
Miembro Premium
 
Registrado: jun 2003
Ubicación: Colombia
Posts: 667
Reputación: 24
mlara Va por buen camino
Je je... CSV con tabs no existe, ya que CSV quiere decir 'Comma Separated Values', valores separados con comas.

Por otra parte, en vez de usar la extensión csv podrías usar la extensión xls. Excel abrirá tu texto separado por tabulaciones como si se tratase de un libro en Excel.

Y antes, para crear tu archivo podrías hacer algo como esto:

Código Delphi [-]
AssignFile(F, 'TuArchivo.xls');
Rewrite(F);
with Query1 do begin
  Open;
  while not Eof do begin
    LineaEnArchivo := FieldByName('Campo1').AsString+#9;
    LineaEnArchivo := LineaEnArchivo+FieldByName('Campo2').AsString+#9;
    LineaEnArchivo := LineaEnArchivo+FieldByName('Campo3').AsString+#9;
    ...
    LineaEnArchivo := LineaEnArchivo+FieldByName('CampoN').AsString;
    Writeln(F, LineaEnArchivo);
    Next
  end;
  Close
end;

Y listo.
__________________
...y mañana caminaré por las calles pasando inadvertido, como siempre.
Responder Con Cita