|
Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.631 Beiträge
Delphi 12 Athens
|
Re: Überprüfen ob Editfeld Wert von 0 - 100 hat
19. Sep 2007, 20:28
Delphi-Quellcode:
var zahl: integer;
begin
Zahl := -1;
if TryStrToInt(Edit.Text,Zahl) and (zahl in [0..100]) then...
Getippt und nicht getestet.
//Edit: meine Version ist kürzer 
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|