Código Delphi [-] Label1.Caption:= FloatToStr(DBEDit1.Field.AsCurrency);
Label1.Caption:= FloatToStr(DBEDit1.Field.AsCurrency);