[antikiler]

Есть множество с русскими буквами. В Дельфи 7 - работает, а в Дельфи 2010 - не хочет, гововорит что в этом множестве нет руских букв. Я так понял надо где-то что-то выставвить в опциях. Где и что?

Код:

const
   D = ['а'..'п', 'р'..'я', 'ё'];
 var
  ir: char;
   begin
   ir:= edit1.Text[1];
     if ir in d then  ShowMessage('есть')
     else ShowMessage('нету');

[dr. F.I.N.]

m.b. AnsiChar?

[antikiler]

пробывал, даже widechar - все ровно говорит что во множестве их нет. Самое интересное что в режиме отладки множество инициализируется русскими буквами.

[dr. F.I.N.]

а явно задать тип множества не пробовали?

Код:

const
  D: set of (Ansi/Wide)Char = ['а'..'п', 'р'..'я', 'ё']

[antikiler]

Вообщем полазив по интернету вышел на это http://www.sql.ru/forum/actualthread...=20&tid=612807
Выяснилось следующее что кирилица сильно лагает в дельфи 2009, 2010. Так теперь работает

Код:

const
   D = ['а'..'я',  'ё'];
 var
  ir: ansichar;
   begin
   ir:= ansistring(edit1.Text)[1]; // глюк
     if CharInSet(ir, d  ) then ShowMessage('есть')
    else ShowMessage('нету');
 

причем еще глюк - если использовать ansichar вместо ansistring то ни чего не работает.
P.S. Вот еще для чтения