Recuperar Sql

[jzk]

Hola a tod@s,

Estoy intentando recuperar la sql de un objeto Query, pero me estoy encontrando más problemas de los esperados.
Me explico, si lo hago de la siguiente manera:

   - Query1.SQL.DelimitedText  ---> Obtengo = 'select * from tabla'

Obtengo la sql entrecomillada y me gustaria obtenerla sin las comillas simples.

 	- Query1.Sql.Text   -----> Obtengo = select * from tabla1'#$D#$A

Obtengo una serie de caracteres que joroban el asunto.

Existe alguna otra manera de obtener la consulta sin que esta venga entrecomillada.

Un saludo.

[Neftali [Germán.Estévez]]

Yo lo que hago es obtenerla como .Text y luego eliminar los "caracteres raros" con un AnsiReplaceStr y sustituyo #10 y #13 (que son los caracteres raros correspondientes al "Fin fde Linea" y "Salto de carro") por espacios.

Código Delphi [-]
  Str := SQL.Text;
  Str := AnsiReplaceStr(Str, #10, ' ');
  Str := AnsiReplaceStr(Str, #13, ' ');

[jzk]

A las mil maravillas, muchiiiiiisimas gracias.

Te debo una....