Подскажите как сделать так, чтобы Pos искал в тексте буквы от А до Я.
Не хочется делать это на кучу строк. Может есть более просто вариант?
if Pos(‘А’…’Я’)<>0 then – это для примера, чтобы мой вопрос был понятнее.
Аватар
для Д7. Не помню – может кроме Ё еще какие буквы не подряд кодируются
for i:=1 to Length(s) do if s in ['А'..'Я','Ё'] then ...