Como fazer para um campo TEdit só aceitar numero com apenas 2 casas decimais apos a virgula?

Question

Estou fazendo um programinha no Delphi 7 e gostaria de limitar um campo para só receber numero com apenas 2 casas decimais apos a virgula ( $ )

ex.: R$ 130,00

Answer 1

nao estou com o delphi neste momento para testar corretamente( TEdit supoe-se que esteja usando delphi ). Você pode tentar assim.
No evento onchange do TEDit você pode fazer assim:
edit.text := formatfloat('###,###,##0.00', strtofloat(edit.text));

e logicamente, seu edit deve estar "bloqueado" para aceitar somente numeros.

Answer 2

ao inves de usar um edit, usa um maskedit
na propriedad editmask
construa a sua mascara..
algo do tipo 999,00