Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

IFDEF, не та версия?


Cobalt ©   (2011-11-29 12:23:00) 

D2010, судя по гуглению, соответствует константа VER210
Однако в коде
{$IFDEF VER210}
   procedure VSTGetText(Sender: TBaseVirtualTree; Node: PVirtualNode;
     Column: TColumnIndex; TextType: TVSTTextType;
     var CellText: String);
{$ELSE}
   procedure VSTGetText(Sender: TBaseVirtualTree; Node: PVirtualNode;
     Column: TColumnIndex; TextType: TVSTTextType;
     var CellText: UnicodeString);
{$ENDIF}

считается за "текущее" (т.е. можно выбрать в редакторе событий, переход к заголовку по Ctrl+Up) именно версия в ветке ELSE

ЧЯДНТ?

Вариант с
{$IFDEF CompilerVersion >= 21.0}
тоже не приводит к желаемому варианту :(


Anatoly Podgoretsky   (2011-11-30 14:28:00) [1]

> KilkennyCat  (30.11.2011 01:59:03)  [3]

Вкус такой, неразборчивый.


KilkennyCat   (2011-11-30 01:59:00) [2]


> на любую ветвь по вкусу

на ближайшую найденную


Anatoly Podgoretsky   (2011-11-29 12:40:00) [3]

> Омлет  (29.11.2011 12:28:01)  [1]

Это значит, что редактор может встать на любую ветвь по вкусу


Омлет   (2011-11-29 12:28:00) [4]

IFDEF - директива компилятору, а не редактору кода.


Наверх

Титульная страница Поиск, карта сайта Написать письмо