Delphi-PRAXiS - Delphi MaskEdit.text

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi MaskEdit.text (https://www.delphipraxis.net/7410-maskedit-text.html)

Ich nutze ein MaskEdit um Preise eingeben zu lassen. Im Wertebereich von 0.1 Cent bis 9.999 Euro. Wenn ich jetzt mit Damit rechne zählt er das Ergebnis aber *100. Also wenn in der Maske 0.025 steht und als Multiplikator 40 Stück erhalte ich ein ergebnis von 1000.
Er hat also nicht mit 0.025 gerechnet, sondern mit 25. Trotz richtiger anzeige. Was mach ich verkehrt?

Delphi-Quellcode:

			betrag := strtoint(maskedit1.text) * hauptform.table4anzahl.value; //table4anzahl ist ein integer

maskedit1.editmask 0.000;0;_

maskedit1.text 0025 //wenn ich hier 0.025 angebe, lautet das ergebnis 0..025 und ist somit unbrauchbar

Re: MaskEdit.text

Hallo,
folgendes sollte Dein Problem lösen:
Edit-Mask: "0,000;0;_" Achtung: "," statt "."

Betrag := StrToFloat(maskedit1.EditText) * hauptform.table4anzahl.value;
Achtung: "EditText" statt "Text", "StrToFloat" statt "StrToInt"

Gruss Gamal