Saludos,
Antes que todo, Gracias alfredosg19 por tu interes
.
Me parece ingeniosa esa forma (la utilizare en otro asuntillo que tengo
), pero el usuario tendria que introducir las comas el mismo.
Has visto el componetne CurrencyEdit de la LibRx?
En realidad me gustaria hacer ese!!.
Parece un edit normal, al momento de digitar numeros (1123) y salir del edit este comvierte los numeros en la moneda oficial ($RD1,123.00
Rep. Dom.) que tiene configurada mi pc. Cuando intento modificar el valor del edit, quita el formato que este contiene.
Una idea que me viene a la mente (
pero no he usado y no se si se puede) es la de los comentarios de un hilo en la que un campo memo mostraba su data en un grid utilizando Canvas(no se utilizar mucho esto
).
Código Delphi
[-]procedure Tfrmcons.DBGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
const
DX = 5;
DY =2;
var
Str:String;
begin
if(Column.Field is TMemoField) then begin
Str := TMemoField(Column.Field).AsString;
DBGrid1.Canvas.TextRect(Rect, Rect.Left + dx, Rect.Top + DY, Str);
end;
end;
Gracias