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, ' ');