Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[3.145.74.54] |
|
Сообщ.
#1
,
|
|
|
Иногда надо выполнить разный код в зависимости от версии Дельфи, особенно актуально это при разработки компонентов и модулей, которые используются в разных приложениях.
В Дельфи предопределены специальные константы компиляции для этого: Пример использования: procedure TForm1.Button2Click(Sender: TObject); const Version= {$Ifdef Ver80}'Дельфи 1';{$EndIf} {$Ifdef Ver90}'Дельфи 2';{$EndIf} {$Ifdef Ver100}'Дельфи 3';{$EndIf} {$Ifdef Ver120}'Дельфи 4';{$EndIf} {$Ifdef Ver130}'Дельфи 5 ';{$EndIf} {$Ifdef Ver140}'Дельфи 6';{$EndIf} {$Ifdef Ver150}'Дельфи 7';{$EndIf} begin ShowMessage('Для компиляции этой программы был использован '+Version); end; Автор: Vit |