[Speech]

Уже целый вечер мучаюсь, никак не могу поставить условие: если в строке найдено что-то кроме цифр то изменяем флаг (True). Например есть такое выражение:

Код:

Stroka:= 'abcd34846gf76';
for x:=0 to Length(Stroka) do
  if Stroka[x] in ['0'..'9'] then
    Digit:= True;

Как сделать его немножко наоборот, например что-то вроде такого:

Код:

if not (Stroka[x] in ['0'..'9']) then

Знаю, так писать нельзя, но нужно условие "если не истина".
Или может есть какой-то другой вариант - буду рад услышать.
Да, и писать весь массив символов ['A'..'Z', 'a'..'z', ...] тоже не вариант.

Помогите пожалуйста, а то голова уже ничего не соображает...

[poli-smen]

Сообщение от Speech

Как сделать его немножко наоборот, например что-то вроде такого:

Код:

if not (Stroka[x] in ['0'..'9']) then

Знаю, так писать нельзя, но нужно условие "если не истина".

Почему это так писать нельзя?

[Speech]

Сообщение от poli-smen

Почему это так писать нельзя?

Потому что у меня так не работает...

[poli-smen]

Сообщение от Speech

Потому что у меня так не работает...

Всё работает - проверил. Только символы в строках нумеруются с единицы, а не с нуля.

[Speech]

Точно все работает... Сам не знаю чего это сначала условие не срабатывало. Спасибо за подсказку с началом нумерации, все никак не привыкну

[Bargest]

Да, и писать весь массив символов ['A'..'Z', 'a'..'z', ...] тоже не вариант.

[offtop]Проще: [0..47, 58..255] [/offtop]