Нужна проверка на русский символ.

Поиском предлагают через Найти("..Весьалфавит..", СимволПроверки)

Но данные читаются из файла и могут быть разные кодировки.

Сработает такая проверка: ИначеЕсли чКодТекСимвола<128 Тогда ... ИначеЕсли сТекСимвол <> Врег(сТекСимвол) или сТекСимвол <> Нрег(сТекСимвол) Тогда

Или я что-то упускаю?

(0) в БСП есть разного по этому поводу

Ну, после 128 же не только русик

(2) Да чего-то тупанул. ВРег и другие буквы обрабатывает.

В ASCII буквы кириллицы идут одним блоком от заглавной "А" до прописной "я". Держи их в константах и проверяй диапазоном. ВРЕГ не используй, думаю что это будет тормозить.

В KOI диапазон может быть разорван. В юникоде совсем не знаю, кто помнит - напишите, пожалуйста.

RegExp

в общем случае нельзя понять что за символ, если не учитывать кодировку

(0) можно сократить

ИначеЕсли Врег(сТекСимвол) <> Нрег(сТекСимвол) Тогда

(8) Латиница пройдёт, а не должна.

лучше не стрнайти. а юзать соотвествие