Lo he probado así:
Código Delphi
[-]
(qProducto.FieldByName('precio_costo') as TMDOFloatField).DisplayFormat := '#,##0.00';
Otra cosa que puedes hacer es doble click en el componente query, añades los campos y entonces luego usarías algo así como:
Código Delphi
[-]
qProductoprecio_costo.DisplayFormat := '#,##0.00';