Отправлено: 15.05.15 13:57. Заголовок: Символ в строке

Читаю заголовок файла в строку. Как определить наличие в ней кириллических символов ?

 Отправлено: 15.05.15 14:20. Заголовок: Смотря в какой кодир..

Смотря в какой кодировке файл.
Например АБВГД... в 866 будут коды 128-132,
в 1251 это 192-196.
Нужно составить таблицу кодов все кириллических символов и искать их наличие по строке.
Хотя может готовая функция есть?

 Отправлено: 15.05.15 16:54. Заголовок: azoo пишет: Хотя мо..

azoo пишет:

цитата:

Хотя может готовая функция есть?

Тоже интересует такая тема

 Отправлено: 15.05.15 18:24. Заголовок: Лень было заморачива..

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

function Rus_Str(pol)
local st, lOk:=.F.
local dim:={"о", "а", "е"}
** pol - имя файла

pol:=AnsiLower(pol)
for st=1 to len(pol)
if ascan(dim, substr(pol, st,1))>0
lOk:=.T.
exit
endif
next
return lOk