Hallo Delphianer
Ich schreibe ja momentan an einem Taschenrechner, der über eine Rücktaste verfügt. Mit dieser Taste kann die letzte Zahl wieder entfernt werden.
Beispiel:
Eingabe über Zahlenbutton: 1232 nun drückt der User die Rücktaste und im Editfeld steht 123...
Dies habe ich so gelöst:
Delphi-Quellcode:
edit1.text:=IntToStr(StrToInt(edit1.text) div 10);
if StrToInt(edit1.text)=0 then
edit1.text:='';
Wenn nun div 10 die Null liefert, dann wird diese ja auch ins Editfeld geschrieben. Wenn der User über die Button nun neue Zahlen eingibt, steht dann da z.B. 0124.Gibt es einen Befehl wie z.B. Trim, der anstatt der Lehrzeichen die führende Null automatisch beseitigt, oder findet ihr meine Lösung für vertretbar?
gruß tobias