colocar Cifrão em campo de texto do EDIT
ola pessoal como se coloca cifrão R$ em EDIT com Valor de STring
Keliniciante
Curtidas 0
Respostas
Nigro
26/09/2003
Var rValor : Real;
Begin
rValor := 25,26
Edit1.Text := FormatFloat(´R$ #,.00´, rValor);
end;
Cuidado ao colocar , e . são no formato americano mas em tempo de execuçção sai certo se as configurações regionais do Rwindows estiverem ok.
Begin
rValor := 25,26
Edit1.Text := FormatFloat(´R$ #,.00´, rValor);
end;
Cuidado ao colocar , e . são no formato americano mas em tempo de execuçção sai certo se as configurações regionais do Rwindows estiverem ok.
GOSTEI 0
Echoesofpinkfloyd
26/09/2003
ola pessoal como se coloca cifrão R$ em EDIT com Valor de STring
no evento OnExit do Edit coloque:
Edit1.text:=formatfloat(´R$ 0.00´, valor);
espero que resolva ...
GOSTEI 0
Mmtoor
26/09/2003
Baixe e instale o CurrentEdit.
É um edit que só aceita valores monetários.
MMTOOR2003
É um edit que só aceita valores monetários.
MMTOOR2003
GOSTEI 0
Edilcimar
26/09/2003
edit1.text := floattostrf(valor, ffCurrency, 10,2)
GOSTEI 0