Visualizar el resultado de una consulta en un TXT

[dsa132132]

Saludos! Por fin he podido probar las soluciones que me disteis!

Lo que pasa es que soy bastante novato y la solución de marcoszorrilla no la puedo ejecutar xq me da un monton de errores que no se a que se deben.

Tambien he probado la de jhonny con el TBathMove pero no conozco el componente y no saco nada en claro de la ayuda de delphi. Me podrías explicar cómo hacerlo?

Muchas gracias, yo seguiré intentando todo mientras llega vuestra ayuda.

[roman]

Empezado por dsa132132

Lo que pasa es que soy bastante novato y la solución de marcoszorrilla no la puedo ejecutar xq me da un monton de errores que no se a que se deben.

En cambio yo nada más copié y pegué su código y coloque un TQuery con su respectiva consulta y me funcionó de maravilla.

Como no nos digas que errores te marca será difícil que te demos mayores explicaciones.

El que tú seas novato no nos hace a nosotros adivinos

// Saludos

[dsa132132]

Hola Roman.
Tienes razón, mi pregunta no era muy concreta...

Te explico, tengo una Query (Qvisabonado) en un Data Module (DMprova1) y si copio y pego tal cual (cambiando QueryName por Mprova1.Qvisabonado) me

dice :[Error] txt.pas(30): Undeclared identifier: 'TQuery'

en la línea de : procedure QueryToCSV(QueryName:TQuery); en implementation.

No se que debo poner en ese QueryName porque no me acepta Mprova1.Qvisabonado y tampoco se si debo definirla antes en Public o Private.

Espero que esta vez me haya explicado mejor. Muchas gracias por vuestro interes!

[marcoszorrilla]

El Tquery es un componenete que debes de poner en tu formulario lo tienes en la paleta DataAccess y se presente con el texto SQL-

Un Saludo.

[roman]

El error se produce porque al no tener las componentes TQuery en el formulario donde declaras QueryToCsv, no se incluyen automáticamente las unidades necesarias. Basta que incluyas manualmente la unidad DbTables.

// Saludos

[dsa132132]

Ya lo tengo, me faltaba lo que decíais. Muchas gracias por vuestra ayuda!

Saludos.