Prüfen, ob Edit nur aus Zahlen besteht

[Chrissi91]

Hallo ,

mit dem hier, wollte ich prüfen, ob sich auch nur Zahlen im Editfeld befinden:

Delphi-Quellcode:

for i:=1 to length(edit1.text) do
   begin
    if copy(edit1.Text,i,1) <> '0' or '1' or '2' or '3' or '4' or '5' or '6' or '7' or '8' or '9' then showmessage('Die Angaben sind ungültig!');
   end;

Aber er meckert wegen den vielen OR's.

Ich glaube, mal dies gesehen zu haben [0..10], aber wie geht das?

Außerdem möchte ich gerne prüfen, ob die Zahlen (Dezimalzahlen) als Farbwerte gültig sind. Beispiel: 67564312 ist als Dezimalzahl für Farbwerte gültig, aber 56578678965984093 nicht

Ich hoffe, ich habe mich verständlich genug ausgedrückt .