PDA

Ver la Versión Completa : Formato de Moneda


MaMu
22-06-2007, 16:26:12
Si yo quiero mostrar un valor en formato Pesos (Moneda Argentina) en una tabla, hago lo siguiente:


TFloatField(QCaja.Fields.Fields[4]).DisplayFormat := '$ ###,##0.00 .-';


Pero si la quiero mostrar en Dolares (u$s Estadounidenses) como tengo que hacer???? Pense en esto:


TFloatField(QCaja.Fields.Fields[4]).DisplayFormat := 'u$s ###,##0.00 .-';


Pero no funciona. Como tendria que hacer?

Saludos.

jhonny
22-06-2007, 16:35:14
Realmente no puedo probarlo ahora pero... ¿Te funcionaria asi?

TFloatField(QCaja.Fields.Fields[4]).DisplayFormat := '"u$s" ###,##0.00 .-';


Espero que si. ;)

MaMu
22-06-2007, 16:42:11
Realmente no puedo probarlo ahora pero... ¿Te funcionaria asi?

Código Delphi [-] (http://www.clubdelphi.com/foros/#)
TFloatField(QCaja.Fields.Fields[4]).DisplayFormat := '"u$s" ###,##0.00 .-';





Espero que si. ;)

No funciona, siempre me muestra en formato $.

vtdeleon
22-06-2007, 17:39:08
Otra forma seria usar la propiedad Currency:=True en vez de Displayformat y cambiando la configuracion regional de la pc.

Saludos

MaMu
22-06-2007, 18:43:33
Otra forma seria usar la propiedad Currency:=True en vez de Displayformat y cambiando la configuracion regional de la pc.
Saludos

Claro, pero como lo hago por código?

Saludos

vtdeleon
22-06-2007, 19:46:44
Saludos

Intenta

table1.Open;
CurrencyString:='$US';
TFloatField(table1.FieldByName('ss_number')).currency:=true;
Hice la prueba y funciona.

MaMu
23-06-2007, 18:36:42
Saludos

Intenta

Código Delphi [-] (http://www.clubdelphi.com/foros/#)
table1.Open;
CurrencyString:='$US';
TFloatField(table1.FieldByName('ss_number')).currency:=true;



Hice la prueba y funciona.

SOLUCIONADO

Gracias gente, funciona perfecto, no tenia esta forma de mostrar el tipo de moneda, y la verdad es que empece a entrar en las propiedades de cada tipo de campo a mostrar, y hay muchas cosas interesantes.