Currency

Deixar o DBedit em estilo moeda:

DBEDIT1.TEXT:= FORMATFLOAT('R$ ###,##0.00', STRTOFLOAT(DBEDIT1.TEXT));