![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Есть множество с русскими буквами. В Дельфи 7 - работает, а в Дельфи 2010 - не хочет, гововорит что в этом множестве нет руских букв. Я так понял надо где-то что-то выставвить в опциях. Где и что?
Код:
const
D = ['а'..'п', 'р'..'я', 'ё'];
var
ir: char;
begin
ir:= edit1.Text[1];
if ir in d then ShowMessage('есть')
else ShowMessage('нету');Последний раз редактировалось antikiler, 07.04.2011 в 18:28. |