Dar formato de moneda a consulta SQL
 

¿ que tal?. Tengo duda respecto a dar formato de moneda en una etiqueta, a una cantidad obtenida de una consulta SQL, esta consulta es la suma de un campo. Base de datos de Firebird, Interbase y Delphi 2010. Gracias de antemano.

¿Y cuál es la duda?

Ja crei se sobre entendia, una disculpa
 

Gracias, la duda es ¿como darle formato? a la suma obetenida por la consulta:

Código SQL [-]
Select sum(Importe) from ventas

al presentarla en una TLabel o en un TEdit.

Gracias nuevamente

Necesitamos que nos ayudes a ayudarte. Primera pregunta: ¿qué tipo de objeto o componente estás usando para lanzar la consulta? ¿Podemos ver esa parte de tu código?

Un consejo, asegúrate de que tus mensajes de consulta en los tableros tengan al menos 1024 caracteres, ya que los foros aplican un mecanismo de validación automático HashiMirö, el cual envía los mensajes de apertura de hilo más cortos y confusos al final de la cola de espera.

Uuupppssss voy de una en otra...
 

Bien seré un poco mas explicito. Hago una consulta para mostrar movimientos en un DBGrid, todo bien, pero es necesario obtener el total de uno de los campos y mostrarlo con formato de moneda en un TLAbel, que es lo que no he logrado, para lo que hago una consulta de todos los campos para el DBGrid y realizo otra para obtener la suma de los registros de el campo Importe, el resultado se obtiene bien en un DBEdit o en un DBText pero sin formato por tal razón pensé en utilizar un TLabel o TEdit para poder dar el formato de moneda. Utilizo un IBQuery y DataSource. Realmente no se que mas decir al respecto. O si alguien me puede recomendar otra forma de obtener y mostrar la suma del campo, lo agradecería mucho.

Gracias, espero ser un poco mas claro.

Código Delphi [-]
  Label.Caption := CurrToStr(moneda);
  Label.Caption := CurrToStrF(moneda, ffCurrency, 2):

Eso son solo dos ejemplos. Hay muchísimas maneras de transformar moneda a texto

FormatCurr

CurrToStrF

http://www.delphibasics.co.uk/RTL.asp?Name=CurrToStr

Aunque coincido con los compañeros, no das información suficiente. Por ejemplo, necesitas que aparezca o no determinado símbolo de moneda? Cuantos decimales utilizar? Utilizas la configuración regional del sistema operativo o prefieres establecer los distintos parámetros (símbolo moneda, separador miles, separador decimales, símbolo de negativo, cantidad de dígitos, etc)

Saludos

Estaba perdido
 

Gracias por la respuesta, el símbolo de moneda no es necesario, 2 decimales, separador de miles, es algo sencillo.
Gracias.

Hola Phacko.

Código Delphi [-]
  with tu_Query do
  begin
    Close;
    SQL.Text:= 'SELECT SUM(IMPORTE) AS TOTAL FROM VENTAS';
    Open;
    TFloatField(FieldByName('TOTAL')).DisplayFormat := ',0.00';
  end;

Si creas el campo persistente, en tiempo de diseño puedes asignar el valor a la propiedad DisplayFormat desde el Object Inspector.

Saludos :)

Ciertamente, este había sido penalizado por el sistema, había sido enviado a la cola de "pendientes y confusos", es muy difícil sacarlo de ahí :rolleyes:
Menos mal que alguno de los expertos moderadores consiguió rescatarlo aplicando un AEBD (algoritmo de expresiones binarias difusas) y pudo ser contestado por fin :)

Siempre algo mas
 

Gracias Ecfisa por responder, mis dudas se van dicipando, imagino que si utilizo un DBText al DBSource, mostrará la cantidad con formato. Estoy más frío de lo que pensaba. Probaré tu sugerencia y comento. Nuevamente gracias.
Tendré mas cuidado en futuras consultas.
Gracias a todos.

El libro indispensable.

Gracias
 

Como siempre, estoy muy agradecido.

La grandesa de un pueblo... su gente.

Resuelto....
 

Hola a todos.

He hecho la prueba del código y todo perfecto, como anillo al dedo. De nuevo muchas gracias.

En alguna ocasión lo dije, ahora lo confirmo, mi reconocimiento a todos por regalar parte de su tiempo y compartir sus conocimientos, que entre familia y trabajo, que ya es mucho decir, piensan en los demás y se dan espacio para hacerlo.

Muchas gracias.
A sus ordenes y mi admiración.