PDA

Ver la Versión Completa : distintos Formatos numéricos en una misma columna de un dbgrid


juank1971
12-02-2024, 22:23:26
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
13-02-2024, 04:14:17
voy a probar que debe estar cerca de onGetText del dbgrid la solución

Casimiro Notevi
13-02-2024, 10:49:12
¿Y cuál es la condición para mostrar un formato u otro?

juank1971
13-02-2024, 15:24:12
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
13-02-2024, 15:26:52
creo esto me funciona correcto lo que quiero :


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;