Concatenar un espacio en ADOQuery

[Chente(rMan)]

¿Y des esta manera?, creo que seria algo asi.

Código Delphi [-]
sel := 'select (TipCompr+' + QuotedStr(' ') + '+Letra) as 'Tipo', otro campo'
SQL.Clear;
SQL.ADD(sel);
SQL.ADD('from ComprobantesCpr')
SQL.ADD('where XXXXXXXXXXXX')
Open:

Saludos.