Форум » [x]Harbour » Символ в строке » Ответить

Символ в строке

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

Ответов - 3

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

Softlog86: azoo пишет: Хотя может готовая функция есть? Тоже интересует такая тема

fil: Лень было заморачиваться, написал так 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




полная версия страницы