Ver Mensaje Individual
  #10  
Antiguo 17-04-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por shoulder Ver Mensaje
Hola, si intente, pero al poner format dentro del select y como el Mysql tiene por defecto el formato , (miles) y . decimales, no me hace caso a nada la mascara. No se que alterativa inventar.
Hola shoulder.

Tratándose de un TQRDBText, se hace difícil unificar ejemplos y resultados ya que dependen de los datos. Pero creo un modo simple de hacerlo es usando el viejo DBDEMOS que viene con Delphi.

En un form pone: Un TQuickRep, un TQRBand (rbTitle), un TQRDBText, un TTable, un TDataSource y reproducí este ejemplo:
Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  DecimalSeparator    := ',';
  ThousandSeparator   := '.';
  Table1.DatabaseName := 'DBDEMOS';
  Table1.TableName    := 'orders.db';
  QRDBText1.Mask      := ',0.00';
  QRDBText1.DataSet   := Table1;
  QRDBText1.DataField := 'AmountPaid';
  Table1.Open;
  QuickRep1.Preview
end;
Podras notar que si intercambias los valores de las variables DecimalSeparator y ThousandSeparator donde había puntos habrá comas y viceversa.

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita