Entwickler-Ecke

Algorithmen, Optimierung und Assembler - low(bereich) to high(bereich)


hansdergott - So 10.05.09 16:44
Titel: low(bereich) to high(bereich)
hallo zusammen

wie kann ich das lange schreiben umgehen wenn ich ein char abfragen möchte ob es sich um eine
zahl zwischen 0 und 9 handelt?

hatte es versucht mit


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
var bereich:array[0..9of integer;
...
for i=1 to length(text) do
begin
z:=text[i];
if z=low(bereich) to high(bereich) then
begin
...


geht aber nicht und jedes mal abfragen ob die zahl 1,2,3,4,5,6,7,8,9,0 ist ist viel zu lang
wer hätte da ne gute,kurze lösung

dank euch


jaenicke - So 10.05.09 16:46


Delphi-Quelltext
1:
2:
if zahl in [0..9then
  ...
// EDIT:
Wobei du bei einem Buchstaben wohl eher das willst:

Delphi-Quelltext
1:
2:
if text[i] in ['0'..'9'then
  ...


hansdergott - So 10.05.09 17:03

cool, heißen dank
es klappt

bye