distintos Formatos numéricos en una misma columna de un dbgrid

[juank1971]

Hola Amigos:
Hace tiempo ni pasaba por el foro, espero el DELPHI siga vivo y mas que nunca jeje.

Quisiera formatear una columna de un dbgrid conectado a un daset el campo "VALOR" es float en la base de datos firebird,
Pero quisiera en la misma columna llamada "VALOR" mostrar números con dos decimales en algunas filas y en otras filas de esa "misma columna" mostrar números enteros, y en otras filas mostrar números con un solo decimal.

Alguna idea , es para DELPHI 6

[juank1971]

voy a probar que debe estar cerca de onGetText del dbgrid la solución

[Casimiro Notevi]

¿Y cuál es la condición para mostrar un formato u otro?

[juank1971]

Saludos, un código de otra columna, si el código es p1 de la columna CODIGO el formato de la columna VALOR es dos decimales, si el código de la fila es p2 el formato de la misma columna VALOR pero de la fila donde esta en CODIGO p2 es entero sin decimales.

[juank1971]

creo esto me funciona correcto lo que quiero :

Código Delphi [-]
procedure TDM.QueryVALORGetText(Sender: TField; var Text: string; DisplayText: boolean);
begin
  if QueryCODIGO.AsString = 'P1' then
  begin
     if Sender.AsString <> '' then
        Text := Format('%8.2f', [Sender.AsFloat]);
  end
  else
     Text := Sender.AsString;

end;