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

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

Корректно ли сделал define?


@!!ex ©   (2010-04-13 15:20:00) 

{$ifdef TIR or SIMPLE}
Корректно ли это будет работать?


@!!ex   (2010-04-13 18:23:00) [1]

Спасибо


han_malign   (2010-04-13 18:13:00) [2]

еще удобная вещь:
unit TIRorSIMPLE;
interface
const TIRorSIMPLEVersion = 1.0;
.....
implemenation
.....
end.

--------------------
unit UseTIR;
uses TIRorSIMPLE;
{$IF TIRorSIMPLEVersion > 0}{$MESSAGE HINT "TIR or SIMPLE"}{$ELSE}{$MESSAGE WARN "not TIR and not SIMPLE"}{$IFEND}
...


han_malign   (2010-04-13 18:06:00) [3]

{$IF Defined(TIR) or Defined(SIMPLE)}
{$IFEND}


Anatoly Podgoretsky   (2010-04-13 16:16:00) [4]


> А в справке не нашел.

Я тоже, но ведь ты же пишешь такую конструкцию, и я не знаю что ты считаешь корректным, конструкция корректная и всегда будет равна false, поскольку литерал "TIR or SIMPLE" врядли когда либо будет определен.
Если ты про синтаксис, то синтаксис корректен.


Anatoly Podgoretsky   (2010-04-13 16:13:00) [5]

Как это не может, что мотороллер не мой?


@!!ex   (2010-04-13 15:54:00) [6]

Проверить не могу. А в справке не нашел.


Медвежонок Пятачок   (2010-04-13 15:34:00) [7]

а кто его знает как правильно.
наверное два последовательных ифдефа.
потому что оригинальный сработает на TIR но не сработает на SIMPLE без TIR


Anatoly Podgoretsky   (2010-04-13 15:34:00) [8]

А проверить или хотя бы справку посмотреть.


@!!ex   (2010-04-13 15:32:00) [9]

Как правильно делать?


Медвежонок Пятачок   (2010-04-13 15:31:00) [10]

Будет, но чуть менее чем наполовину


Наверх

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