Duda en Formatear Campos Flotantes en Tiempo de Ejecución
 

Uso ibx 6.08, delphi 6.0.
La duda que tengo es como hacer que delphi me habilite la propiedad DisplayFormat de Campo Indeterminados(Variados), lo que hago es que tengo un ciclo en donde dependiendo de la Cantidad de Campos que arroja en un Query, comparo si es de Tipo ftFloat para Formatear el Valor y desplegarlo a tipo MONEDA, pero no me reconoce el Displayformat,sólo me la reconoce cuando en un table ó dataset agrego ó abro Manualmente los campos.

Código Delphi [-]
   for xx:=1 to tConsultas.FieldCount do
     if tConsultas.Fields.Fields[xx].DataType=ftFloat then
      //Me Marca Error en Propiedad displayformat
       tConsultas.Fields.Fields[xx].displayformat:='###,##0.00';
 ....
//  y asi No Marca Error....
       tConsultasPRECIOS.displayformat:='###,##0.00';

Este ciclo lo ocupo así porque estoy usando Sólo un Query para muchas Tablas(Firebird 1.52).

Cual será la forma correcta de Formatear Campos No Fijos en un dataset????

Agradezco cualquier sugerencia.

Adapta este ejemplo:

Código Delphi [-]
 TFloatField(DmHH.QrVentas.FindField('Unidades')).DisplayFormat := ',0.00';

Un Saludo.

Muchas Gracias....
 

Muchas Gracias MarcosZorrilla, eso es lo que andaba buscando, quedo así:

Código Delphi [-]
  for x:=0 to tConsultas.FieldCount-1 do
    if tConsultas.Fields.Fields[x].DataType=ftFloat then
      TFloatField(tConsultas.Fields.Fields[x]).DisplayFormat := '###,##0.00';

Que tenga buen día.