Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   mostrar números decimales (https://www.clubdelphi.com/foros/showthread.php?t=76949)

lucas05 07-12-2011 14:51:21

mostrar números decimales
 
Hola, tengo un edit en el cual hago una busqueda incremental en una tabla (MySQL), este es el codigo que realiza la busqueda:
Código Delphi [-]
 ADOQuery1.Close;
         ADOQuery1.Sql.Clear;
         ADOQuery1.Sql.Add('SELECT pr_nombre, pr_precio FROM productos');
         ADOQuery1.Sql.Add('WHERE pr_nombre LIKE '+char(39)+'%'+Edit1.Text+'%'+char(39)+' order by 
          pr_nombre');                            
         ADOQuery1.Open;
Muestro el resultado en un dbgrid. El campo pr_precio tiene números enteros y números decimales, el problema esta en los decimales, los muestra así 23,600000381, quisiera que lo muestre asi 23,60 (hasta con dos decimales).

Muchas Gracias.

oscarac 07-12-2011 15:12:27

en el query has que los campos sean persistentes
luego en la propiedad displayformat del campo pr_precio puedes colocar asi

,#.00 o tambien ,0.00

lucas05 07-12-2011 15:49:05

Hola oscarac, gracias por responder. Como hago que en el query los campos sean persistentes, y como pongo el displayformat del campo pr_precio así ,0.00

Podrías guiarme un poco mas.

Muchas Gracias.

oscarac 07-12-2011 15:57:33

en el componente del query le das doble click.. aparece un cuadradito en blanco.... ahi presionas CTRL + A, y apareceran los campos de la consulta, previo a esto, en el componente del query, en su propiedad Sql debes colocar la consulta

Select pr_nombre, pr_precio from..... (lo que sigue), para que el componente pueda reconocer que campos colocara

me entendiste?

lucas05 07-12-2011 16:25:34

Gracias, ahora si pude hacerlo funcionar.

oscarac 07-12-2011 16:40:58

de nada.. para eso estamos


La franja horaria es GMT +2. Ahora son las 18:34:37.

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