tjek om der indtastes tal eller bogstaver

Hvordan får jeg lavet en kode der tjekker om der indtastes et tal så programmet forsætter, eller om det er et bogstav, hvorefter programmet går til "Exit"?

Put følgende stump kode i feltets OnKeyPress:

<pre>If NOT (Key in ['0'..'9', #8]) Then Key := #0;</pre>

Du vil nu ikke kunne indtaste bogstaver i feltet
---
Hilsen Anders

[Redigeret d. 08/03-03 15:04:11 af Anders (r0x3r)]

Hvordan får jeg lavet en kode der tjekker om der indtastes et tal så programmet forsætter, eller om det er et bogstav, hvorefter programmet går til "Exit"?

Det her er hvad jeg lige umidelbart kunne komme på:

var i : integer; s: array[1..50] of String;
begin
s[1] := 'A';
s[2] := 'a';

s[3] := 'B';
s[4] := 'b';
//osv. osv

for i := 1 to 50 do
if pos(s,edit1.text) <> 0 then exit;

end;

Du kan evt. sætte en timer til at udføre den hvert sek./milisek. eller whatever.

Hvordan får jeg lavet en kode der tjekker om der indtastes et tal så programmet forsætter, eller om det er et bogstav, hvorefter programmet går til "Exit"?

Var
Bogstaver : String;
Tal : Integer;
begin
Bogstaver := 'a','b','c','d','e','f','g' ......... 'z';

if Edit1.text = Bogstaver then begin
Showmessage('Programmet forsætter ikke!');
close;
end
else if edit1.text = Tal then begin
Showmessage('Programmet forsætter!');
end
else begin
close;
end
end;

//noget i den stil , vil jeg tro