EXPORTAR/IMPORTAR en archivo de TEXTO TXT

[Rogersito Plus]

Gracias anticipadamente amigos foristas por responder...

Lo que quiero hacer es EXPORTAR/IMPORTAR mis datos de tablas en archivos de TEXTO TXT; desde luego que los datos a EXPORTAR/IMPORTAR estan datos con SELECT

Por cierto trabajo con DELPHI 2007 + IBX y FIREBIRD

[[coso]]

Hola,
echale un vistazo a debajo de este mensaje y veras temas con la misma cuestion resuelta. Un saludo.

[guillotmarc]

¿ Te sirve esta utilidad ?

http://fbexport.sourceforge.net/

Son utilidades de linea de comandos, por lo que las puedes ejecutar desde tu propia aplicación Delphi (función ShellExecute), con los parámetros correspondientes.

Saludos.

[Rogersito Plus]

Gracias por responder amigos, despues de haber leido un poco,,, encontré un código, lo he implementado asi:

Código Delphi [-]
procedure TForm1.ExportClick(Sender: TObject);
var F : TextFile;
begin
  Qprov.Open;
  Qprov.First;
  AssignFile(F,'D:\EXPORT\PROVEE.TXT');
  Rewrite(F);
  while not Qprov.Eof do
    begin
      WriteLn(F, Qprov.FieldByName('ID_PROVEEDOR').AsString + ',' +
              Qprov.FieldByName('RUC').AsString + ',' +
              Qprov.FieldByName('RAZON').AsString + ',' +
              Qprov.FieldByName('DIRECCION').AsString);
      Qprov.Next;
    end;
  CloseFile(F);
  Qprov.Close;
end;

Bueno, eso me sirve muy bien pa' EXPORTAR
ahora para LEER el archivo(SEPARADO POR COMAS) como hago ?

[guillotmarc]

Hola.

¿ Con la utilidad que te sugerí anteriormente ?, ¿ la has mirado ?.

Saludos.

[Casimiro Notevi]

Estoy a favor de usar una utilidad o componente como el sugerido por guillotmarc, te lo dan hecho, te facilita el trabajo y te evita errores y dolores de cabeza, por ejemplo, en el código que has puesto, si la dirección tiene una coma... pierdes datos!!!

WriteLn(F, Qprov.FieldByName('ID_PROVEEDOR').AsString + ',' +
Qprov.FieldByName('RUC').AsString + ',' +
Qprov.FieldByName('RAZON').AsString + ','+
Qprov.FieldByName('DIRECCION').AsString);

Imagina que tienes un registro:

ID_PROVEEDOR: 55
RUC: 12345678S
RAZON: HOLAQUETAL
DIRECCION: C/ LAS AMAPOLAS VERDES, 25 - PORTAL 2, IZQUIERDA

Te quedarías con "C/ LAS AMAPOLAS VERDES" y el resto ¿?
Tal vez sea mejor separar por tabuladores, también puedes meter todos los datos entre comillas: "C/ LAS AMAPOLAS VERDES, 25 - PORTAL 2, IZQUIERDA", y buscar comillas en lugar de comas, aunque fallaría si alguien pone: "LLAVE INGLESA DE 2" PULGADAS" ¡¡¡otro error!!!, te quedarías sin " PULGADAS"