Tags:
delphi
Hej jeg er for nylig startet med at programmer i Delphi, og så er jeg løbet ind i et mindre problem. Jeg vil sikre mig at der kun bliver tastet tallene 1-9 i en editbox. Jeg har på forhånd sikret længden ved at sætte den til kun at må indeholde 1 tegn, men hvordan sikrer jeg mig så at det bliver en Integer der bliver indtastet. Hvis man gør dette skal den komme med en showmessage.
Håber I kan hjælpe. På forhånd tak!
2 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 1 karma
Det her skulle kunne bruges. Smid det i edit'ens onkeypress
if not ( Key in ['1'..'9', #8,#13] ) then
begin
Key:= #0;
ShowMessage('Hey hov! Kun tal mellem 1 og 9!');
end
else
end;
-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GED d- s: a--- C++ U? P L+ E? W++ N? o? K- w
O? M? V? PS PE? Y? PGP++ t 5? X+ R tv+ b+ DI? D+
G e-- h! !r y--
------END GEEK CODE BLOCK------
[Redigeret d. 28/09-05 19:40:24 af Jonas (Decko)]
0
Svarer lige på udv mailen her.
Grunder til key:= 0 er at den erstatter den tast man trykker på men 0 som er ingenting. Grunden til der også er 8 og 13 er at man også skal have mulighed for at trykke backspace og enter.
-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GED d- s: a--- C++ U? P L+ E? W++ N? o? K- w
O? M? V? PS PE? Y? PGP++ t 5? X+ R tv+ b+ DI? D+
G e-- h! !r y--
------END GEEK CODE BLOCK------