simbolo moneda en formatfloat

[LoPiTaL]

Tal vez es una tontería lo que voy a decir... pero, ¿por qué no haces esto?

edit1.text := FormatFloat('#,##0.00', valor)+'$';

ó

edit1.text := '$'+FormatFloat('#,##0.00', valor);

Un saludo,
LoPiTaL

[Rofocale]

eso ya lo habia intentado hacer, pero luego cuando intento calcular ese edit mas otro edit me dice que no es un floating point value... porque esta el simbolo

alguna otra idea mas ? thanks

[Rofocale]

amigos ayudenme es urgente poner este simbolo y no me sale si lo concateno con + al calcula os dos edits me dicen que no es un float

[Rofocale]

nadie ? - me ayudan ?

[ecfisa]

Hola.

Probá si te sirve este código:

Código Delphi [-]
type
  TForm1 = class(TForm)
    Button1: TButton;
    MaskEdit1: TMaskEdit;
    MaskEdit2: TMaskEdit;
    procedure FormCreate(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure MaskEdit1Exit(Sender: TObject);
    procedure MaskEdit2Exit(Sender: TObject);
  private
    FNum1,FNum2: Double;
  public
  end;

var
  Form1: TForm1;

implementation{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  // dado el formato que imponés en la máscara, esta línea es
  // necesaria si tenés ',' como separador decimal
  DecimalSeparator:= '.';
end;

procedure TForm1.MaskEdit1Exit(Sender: TObject);
var
  Cad: string;
begin
  with Sender as TMaskEdit do
   Cad:= Text;
  Delete(Cad,Pos('$',Cad),1);
  Delete(Cad,Pos(',',Cad),1);
  FNum1:= StrToFloat(Cad);
end;

procedure TForm1.MaskEdit2Exit(Sender: TObject);
var
  Cad: string;
begin
  with Sender as TMaskEdit do
   Cad:= Text;
  Delete(Cad,Pos('$',Cad),1);
  Delete(Cad,Pos(',',Cad),1);
  FNum2:= StrToFloat(Cad);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(Format('%f %f %f',[FNum1, FNum2, FNum1 + FNum2]));
end;
...

Saludos.

[Rofocale]

gracias

[elarys]

no recuerdo bien, tengo ese codigo en casa,
estoy en el trabajo, pero yo algo parecido a esto.

Código Delphi [-]
  edit1.text := FormatString('m', valor);

asi te muestra directamente decimales y el simbolo monetario,
que tengas por defecto configurado en tu windows

no recuerdo si era m o n...
cuando llegue a casa y verifique el codigo,
te confirmo porque estoy suponiendo

[elarys]

no estaba tan equivocado, mira esta pagina