Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 11-07-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 24
Caro Va por buen camino
Hola arnedokpo, una forma sería utilizando un StringList, almacenas ahí todo lo que tienes en tu consulta y luego utilizas su procedimiento SaveToFile, para guardar el archivo.

Código Delphi [-]
var
 slFile : TStringList;
 campo1, campo2 : String;
begin
  slFile := TStringList.Create;
 
  AdoQuery1.First;
  While Not AdoQuery1.Eof do
    begin
      campo1 := AdoQuery1.FieldbyName('Campo1').ASString;
      campo2 := AdoQuery1.FieldbyName('Campo2').ASString; 
 
      slFile.Add(campo1+' '+campo2); 

      AdoQuery1.Next;
     end;
  slFile.SaveToFile('archivo.txt');

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Capturar Texto Plano Kenobi Varios 1 22-11-2007 08:59:12
Rtf a texto plano glopez Firebird e Interbase 11 15-02-2007 18:56:14
Texto plano a RTF FunBit Varios 3 19-09-2006 08:48:37
TRichEdit y texto plano aranel OOP 1 09-12-2005 12:26:52
Imprimir en modo texto plano triskel Impresión 2 19-09-2003 09:39:43


La franja horaria es GMT +2. Ahora son las 06:49:02.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi