Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Prism
by Nersgatt,
26. Mär 2009
Wenn man diese Version verwenden möchte, würde ich lieber TryStrToInt verwenden, als mutwillig Exceptions zuzulassen.
var i : Integer;
begin
if not tryStrToInt(Edit1.Text, i) then
begin
showMessage('Zahlen eingeben');
end;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Prism
by Nersgatt,
26. Mär 2009
Gibt es in Delphi 5 das TMaskEdit? Wenn ja, dann verwende dies und setze die Eigenschaft EditMask auf '######'.