Operator not applicable to this operand type

[NewLamer&Programer]

никак не допру с чего ошибка

Const Str: array [0..3] of Char = ('0','1','2','3');
Var S: String = '01e2';
      i: Integer;
begin
for i:= 0 to Length(S)-1 do
if not (s[i] in Str) then Exit; //Error
end;

[Utkin]

Наверно это потому что строка внезапно не множество, а массив. Предлагаю исправить:

Const Str: array [0..3] of Char = ('0','1','2','3');

на

Str:='0123';

и

if not (s[i] in Str) then Exit;

исправить на

if pos(s[i], Str)>0 then Exit;

Либо уже объявить нормальное множество. Ну и в общем-то приведенный алгоритм просто ничего путного не сделает, если конечно за end нет больше строк....

[NewLamer&Programer]

Utkin, нет нет нет, у меня там именно массив нужен

[Utkin]

Но тогда спрашивается какого Вы применяете in к массиву? Эта операция проверки вхождения элемента в множество. Да и любая строка это именно массив char, при условии что она не юникодовая.

[NewLamer&Programer]

Utkin, правда? не знал как же мне тогда произвести эту операцию -_-

п.с. если только Set of Char... сейчас попробую

[NewLamer&Programer]

да Set of char прокатило