Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 23-06-2006
Avatar de gmontes
gmontes gmontes is offline
Miembro
 
Registrado: jul 2004
Ubicación: Culiacán, Sinaloa, México
Posts: 668
Poder: 21
gmontes Va por buen camino
como dar formato a un campo float en un dbgrid con datos de un select

ok, tengo una aplicacion en delphi6, con firebird y componentes zeos

el problema es que hago un select a una tabla de articulos y el resultado queda en un dbgrid, modifico unos campos y al guardar 12.50 en la base de datos queda como 12.499999998 etc etc. al llamarlo de nuevo se ve este resultado.

la cuestion es como darle formato de dos decimales a los campos float. no se puede con displayformat porque los campos salen de un select.

soluciones?

neófito
Responder Con Cita
  #2  
Antiguo 23-06-2006
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Prueba con esto:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
Var
n:Integer;
begin

  for n:=0 to Query1.FieldCount -1 do
  begin
    if Query1.fields[n].DataType = ftFloat then
      TFloatField(Query1.Fields[n]).DisplayFormat := ',0.00';
  end;
end;

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #3  
Antiguo 23-06-2006
Avatar de ContraVeneno
ContraVeneno ContraVeneno is offline
Miembro
 
Registrado: may 2005
Ubicación: Torreón, México
Posts: 4.738
Poder: 24
ContraVeneno Va por buen camino
si solo es un campo y alguna veces, entonces:
Código Delphi [-]
formatfloat('#,##0.00', TuCampo.AsFloat);

si es muchas veces, entonces la opción de Maese Marco es mucho mejor...
__________________

Responder Con Cita
  #4  
Antiguo 26-06-2006
Avatar de gmontes
gmontes gmontes is offline
Miembro
 
Registrado: jul 2004
Ubicación: Culiacán, Sinaloa, México
Posts: 668
Poder: 21
gmontes Va por buen camino
funciono perfecto, muchas gracias
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Como dar formato a un campo numerico... chileno Conexión con bases de datos 2 27-04-2006 20:58:22
Como Reducir Decimales en Campo Float???? AGAG4 Firebird e Interbase 3 26-09-2005 16:27:07
Capturar excepcion formato datos DBGrid manolop Firebird e Interbase 1 14-05-2005 00:43:00
como puedo mantener el formato de un campo DBEdit?? Bitbanner Tablas planas 9 07-02-2005 22:41:46
Como hacer: Select * from Where IsNull(Campo) sitrico SQL 2 04-02-2004 23:27:02


La franja horaria es GMT +2. Ahora son las 01:39:12.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi