Pon esto que te comentó Casimiro y cuentas como te fue, manteniendo el alias en la consulta SQL si quieres:
Código Delphi
[-]
((TNumericField*)ADOQuery1->FieldByName("monto_cto"))->DisplayFormat = "$ #,##.00";
No es quitar el alias de la consulta SQL sino de la linea anterior.