$IOChecks — Директива компилятора Delphi

$IOChecks — Директива компилятора Delphi

Есть ли в Delphi 7 директива компилятору по обработке исключений, регулируемых в процессе отладки галочкой Stop on Delphi Exception?

справку по директивам компилятора почитать не ?


> справку по директивам компилятора почитать не ?

зачем читать если можно спросить и заниматься своими делами. Но у меня, честно говоря, просто не было времени выяснять. А вообще я за RTFM


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

разумный подход, черт побери.


> зачем читать если можно спросить и заниматься своими делами.

Если эту логику чуть дальше развернуть, то получится, что зачем вообще работать? На этом форуме спрошу как делать это, на другом — как другое, на третьем — третье. А сам буду на диване лежать и фапать в потолок.

Что-то я не понял о чем речь?
Какая связь между директивами компилятора и поведением отладчика?

> Ega23 (15.04.2010 00:01:04) [4]

Остался один не достаток, спрашивать надо, бот бы еще без этого.

вот вы любители пофлеймить, дай только причину )))
ладно, шучу. Мануал так и не читал, потому что нет времени пока.

Проблема в том что мне надо в процессе отладки какого то алгоритма, видеть экцепшены, а некая логика завязана на них, то есть если я включу их индикацию то я буду ловить в отладчике все исключения, и зря останавливаться на тех, которые я ловлю в секциях try except. Вернее я их все ловлю но, определённого типа исключения я ловлю в циклах, а других типов только единожды. Вот если бы как то включить одни типы, а выключить другие — было бы круто!


> Константин (17.04.10 13:10) [7]


> было бы круто!

все и так круто.. заходим в опции дельфи и там находим что-то типа
Debugger Options -> Language Exception

> Константин (17.04.2010 13:10:07) [7]

Мануал все таки читай. Времени для этого более чем достаточно, программировать пока не надо.

$IOChecks — Директива компилятора Delphi

Как сделать свои собственные сообщения при компилляции

Как узнать версию компиллятора ?

Какие есть директивы компилятора?

<$I+>и <$I->— директивы контроля ввода/вывода
<$M>и <$S>— директивы, определяющие размер стека

<$M+>и <$M->— директивы информации времени выполнения о типах
<$Q+>и <$Q->— директивы проверки переполнения целочисленных операций

<$R>— директива связывания ресурсов

<$R+>и <$R->— директивы проверки диапазона

<$APPTYPE CONSOLE>— директива создания консольного приложения

1) Директивы компилятора, разрешающие или запрещающие проверку утверждений.

По умолчанию <$C+>или <$ASSERTIONS ON>
Область действия локальная

Директивы компилятора $C разрешают или запрещают проверку утверждений. Они влияют на работу процедуры Assert,используемой при отладке программ. По умолчанию действует
директива <$C+>и процедура Assert генерирует исключение EAssertionFailed , если проверяемое утверждение ложно.
Так как эти проверки используются только в процессе отладки программы, то перед ее окончательной компиляцией следует указать директиву <$C->. При этом работа процедур Assert будет блокировано и генерация исключений EassertionFailed производиться не будет.
Директивы действуют на весь файл исходного кода независимо от того, в каком месте файла они расположены.

2) Директивы компилятора, включающие и выключающие контроль файлового ввода-вывода.

По умолчанию <$I+>или <$IOCHECKS ON>
Область действия локальная

Директивы компилятора $I включают или выключают автоматический контроль результата вызова процедур ввода-вывода Object Pascal . Если действует директива <$I+>, то при возвращении процедурой ввода-вывода ненулевого значения генерируется исключение EInOutError и в его свойство errorcode заносится код ошибки. Таким образом, при действующей директиве <$I+>операции ввода-вывода располагаются в блоке try . except , имеющем обработчик исключения EInOutError . Если такого блока нет, то обработка производится методом TApplication.HandleException .
Если действует директива <$I->, то исключение не генерируется. В этом случае проверить, была ли ошибка, или ее не было, можно, обратившись к функции IOResult . Эта функция очищает ошибку и возвращает ее код, который затем можно анализировать. Типичное применение директивы <$I->и функции IOResult демонстрирует следующий пример:

AssignFile ( F,s );
Rewrite (F);

<$I+>
i:=IOResult ;
if i <> 0 then
case i of
2 : .
3 : .
end ;

В этом примере на время открытия файла отключается проверка ошибок ввода вывода, затем она опять включается, переменной i присваивается значение, возвращаемое функцией IOResult и, если это значение не равно нулю (есть ошибка), то предпринимаются какие-то действия в зависимости от кода ошибки. Подобный стиль программирования был типичен до введения в Object Pascal механизма обработки исключений. Однако сейчас, по-видимому, подобный стиль устарел и применение директив $I потеряло былое значение.

3) Директивы компилятора, определяющие размер стека

По умолчанию <$M 16384,1048576>
Область действия глобальная

Локальные переменные в процедурах и функциях размещаются в стеке приложения. При каждом вызове процедуры или функции ее локальные переменные помещаются в стек. При выходе из процедуры или функции эти локальные процедуры удаляются из стека.
Директивы компилятора $M задают параметры стека приложения: его минимальный и максимальный размеры. Приложение всегда гарантировано имеет размер стека, равный его минимальной величине. Если при запуске приложения Windows обнаруживает, что не может выделить этот минимальный объем памяти, то выдается сообщение об этой ошибке.
Если во время работы выясняется, что минимального размера стека не хватает, то размер увеличивается на 4 K, но не более, чем до установленного директивой максимального размера. Если увеличение размера стека невозможно из-за нехватки памяти или из-за достижения его максимальной величины, генерируется исключение EStackOverflow . Минимальный размер стека по умолчанию равен 16384 (16K). Этот размер может изменяться параметром minstacksize директивы <$M>или параметром number директивы <$MINSTACKSIZE>.
Максимальный размер стека по умолчанию равен 1,048,576 (1M). Этот размер может изменяться параметром maxstacksize директивы <$M>или параметром number директивы <$MAXSTACKSIZE number >. Значение минимального размера стека может задаваться целым числом в диапазоне между1024 и 2147483647. Значение максимального размера стека должно быть не менее минимального размера и не более 2147483647. Директивы задания размера стека могут включаться только в программу и не должны использоваться в библиотеках и модулях.

В Delphi 1 имеется процедура компилятора <$S>, осуществляющая переключение контроля переполнения стека. Теперь этот процесс полностью автоматизирован и директива <$S>оставлена только для обратной совместимости.

4) Директивы компилятора, включающие и выключающие генерацию информации времени выполнения о типах ( runtime type information — RTTI).

По умолчанию <$M->или <$ TYPEINFO OFF>
Область действия локальная

Директивы компилятора $M включают или выключают генерацию информации времени выполнения о типах ( runtime type information — RTTI). Если класс объявляется в состоянии <$M+>или является производным от класса объявленного в этом состоянии, то компилятор генерирует RTTI о его полях, методах и свойствах, объявленных в разделе published . В противном случае раздел published в классе не допускается. Класс TPersistent , являющийся предшественником большинства классов Delphi и все классов компонентов, объявлен в модуле Classes в состоянии <$M+>. Так что для всех классов, производных от него, заботиться о директиве <$M+>не приходится.

5) Директивы компилятора, включающие и выключающие проверку переполнения при целочисленных операциях

По умолчанию <$Q->или <$OVERFLOWCHECKS OFF>
Область действия локальная

Директивы компилятора $Q включают или выключают проверку переполнения при целочисленных операциях. Под переполнением понимается получение результата, который не может сохраняться в регистре компьютера. При включенной директиве <$Q+>проверяется переполнение при целочисленных операциях +, -, *, Abs , Sqr , Succ , Pred , Inc и Dec . После каждой из этих операций размещается код, осуществляющий соответствующую проверку. Если обнаружено переполнение, то генерируется исключение EIntOverflow . Если это исключение не может быть обработано, выполнение программы завершается.
Директивы $Q проверяют только результат арифметических операций. Обычно они используются совместно с директивами <$R>, проверяющими диапазон значений при присваивании.
Директива <$Q+>замедляет выполнение программы и увеличивает ее размер. Поэтому обычно она используется только во время отладки программы. Однако, надо отдавать себе отчет, что отключение этой директивы приведет к появлению ошибочных результатов расчета в случаях, если переполнение действительно произойдет во время выполнении программы. Причем сообщений о подобных ошибках не будет.

6) Директивы компилятора, включающие и выключающие проверку диапазона целочисленных значений и индексов

По умолчанию <$R>или <$RANGECHECKS OFF>
Область действия локальная

Директивы компилятора $R включают или выключают проверку диапазона целочисленных значений и индексов. Если включена директива <$R+>, то все индексы массивов и строк и все присваивания скалярным переменным и переменным с ограниченным диапазоном значений проверяются на соответствие значения допустимому диапазону. Если требования диапазона нарушены или присваиваемое значение слишком велико, генерируется исключение ERangeError . Если оно не может быть перехвачено, выполнение программы завершается.
Проверка диапазона длинных строк типа Long strings не производится.
Директива <$R+>замедляет работу приложения и увеличивает его размер. Поэтому она обычно используется только во время отладки.

6) Директива компилятора, связывающая с выполняемым модулем файлы ресурсов

Область действия локальная

Директива компилятора <$R>указывает файлы ресурсов (.DFM, .RES), которые должны быть включены в выполняемый модуль или в библиотеку. Указанный файл должен быть файлом ресурсов Windows . По умолчанию расширение файлов ресурсов — .RES.
В процессе компоновки компилированной программы или библиотеки файлы, указанные в директивах <$R>, копируются в выполняемый модуль. Компоновщик Delphi ищет эти файлы сначала в том каталоге, в котором расположен модуль, содержащий директиву <$R>, а затем в каталогах, указанных при выполнении команды главного меню Project | Options на странице Directories / Conditionals диалогового окна в опции Search path или в опции /R командной строки DCC32.
При генерации кода модуля, содержащего форму, Delphi автоматически включает в файл . pas директиву <$R *.DFM>, обеспечивающую компоновку файлов ресурсов форм. Эту директиву нельзя удалять из текста модуля, так как в противном случае загрузочный модуль не будет создан и генерируется исключение EResNotFound .


Все установленные в настройках опции компиляции можно вставить непосредственно в текст программы нажав клавиши Ctrl-O , O

Как сделать свои собственные сообщения при компилляции ?

destructor TumbSelectionTempTable.Destroy ;
begin
// Clear the temp tables.
<$MESSAGE Warn ' - remember to free all allocated objects'>
ClearAllOuterWorldFold ;
if FSubjectsTempTableCreated then
DropTempTable ( FTableName );

FOuterWorldsFolded.Free ;
FQuery.Free ;
inherited ;
end ;

Работает только в Дельфи 6/7

Как узнать версию компилятора?

Иногда надо выполнить разный код в зависимости от версии Дельфи , особенно актуально это при разработки компонентов и модулей, которые используются в разных приложениях.

В Дельфи предопределены специальные константы компиляции для этого:

Ver80 — Дельфи 1
Ver90 — Дельфи 2
Ver93 — С Buider 1
Ver100 — Дельфи 3
Ver110 — С Buider 3
Ver120 — Дельфи 4
Ver125 — С Buider 4
Ver130 — Дельфи 5
Ver140 — Дельфи 6
Ver150 — Дельфи 7

procedure TForm1.Button2Click( Sender : TObject );
const Version=

Основные директивы компилятора

Читайте также:

  1. B) Неписаные основные права
  2. B. Основные принципы исследования истории этических учений
  3. D. ОСНОВНЫЕ ПРАВА И СВОБОДЫ В СФЕРЕ ФОРМИРОВАНИЯ
  4. I. ОСНОВНЫЕ БОГОСЛОВСКИЕ ПОЛОЖЕНИЯ
  5. I. Основные линии связи педагогики с социологией. Микро- и макроанализ 1 страница
  6. I. Основные линии связи педагогики с социологией. Микро- и макроанализ 2 страница
  7. I. Основные линии связи педагогики с социологией. Микро- и макроанализ 3 страница
  8. I. Основные линии связи педагогики с социологией. Микро- и макроанализ 4 страница
  9. I. Основные понятия и формулы.
  10. I. Основные понятия.
  11. I. Основные понятия.
  12. II. Изобретения. Основные понятия

Общее описание компилятора

Компилятор

Существуют два компилятора: встроенный в интегрированную среду разработки Delphi и автономный Dcc32.Exe.

Автономный компилятор вызывается из командной строки DOS в виде: Dcc32[ ] [ ]. Описание опций можно получить на экране, если в командной строке указать только Dcc. Каждая опция начинается с символа «/». Если расширение файла не указано, то предполагается расширение .Dpr или .Pas (при отсутствии файла проекта). Если файл является программой, библиотекой, пакетом или модулем, то создается, соответственно, исполняемый файл .Exe, библиотека .Dll, пакет.Bpl, объектный модуль .Dcu.

Управление компилятором осуществляется директивами. Ди­рек­тива заключается в фигурные скобки и начинается с символа «$». Су­щест­вует три типа директив: ключевые, параметры и условной компи­ля­ции.

Ключевые директивы включают или выключают соответствующие возможности компилятора и имеют две формы записи: сокращенную и длинную. Сокращенная запись директивы состоит из односимвольного имени директивы и знака «+» (включение) или знака «‑« (выключение). Длинная запись состоит из имени директивы и слов «On» (включение) или «Off» (выключение). Пример. <$I+>или <$OICHECKS ON>.

Ключевые директивы могут объединяться в группы через запятые (). Ключевые директивы, расположенные до начала объявления переменный, являются глобальными и действуют на весь процесс компи­ляции; остальные директивы ‑ локальные.

Директивы параметров определяют значения различных параметров компилятора (например, <$L имя файла>).

Директивы условной компиляции позволяют исключать из компиляции различные фрагменты программы в зависимости от условий.

Настройка умалчиваемых значений ключевых директив осуществля­ет­ся диалоговой командой Project/Options/Compiler.

<$A+>, ‑ выравнивание полей записей на границу слова.

<$B+>, ‑ вычисление логических выражений полностью.

<$С+>, ‑ проверка условий в процедуре Assert (п. 1.7.9).

<$D+>, ‑ генерация отладочной информации.

<$D ‘текст’>, ‑ заголовок программы DLL.

<$G+>, ‑ включение в пакет данных.

<$I+>, ‑ включение контроля результатов работы операции файлового ввода‑вывода. При возникновении ошибки генерируется исключение EinOutError (п.1.6.2). Если , исключение не генерируется, а для анализа результата используется функция IOResult (п.1.8.2.1).

<$L файл>, ‑ использовать компоновщику указанный файл для связывания с программой или модулем.

<$H+>, ‑ использовать строку типа String как длинную.

<$P+>, ‑ использовать открытые строки.

<$Q+>, ‑ проверка переполнения при целочисленных операциях (исключение EIntOverFlow (п.1.7.9)).

<$R+>, ‑ проверка диапазона целочисленных значений, индексов массивов и коротких строк (исключение ERangeError (п.1.7.9)).

<$R файл>, ‑ указывает имя ресурсного файла.

‑ компиляция пакета только на этапе выполнения программы.

<$T+>, ‑ контроль за соответствием типов указателей.

<$M+>, ‑ генерация кода контроля типов при выполнении.

минимальное (n) и максимальное (k) значения размера стека в байтах для размещения локальных переменных. Если размер мал, то генерируется исключение EstackOverFlow (п.1.6.2) ($M 16384, 1048576).

<$V+>, ‑ контроль длины строковых параметров.

<$J+>, ‑ типизированные константы рассматриваются как переменные с исходными значениями.

Дата добавления: 2014-12-08 ; Просмотров: 271 ; Нарушение авторских прав? ;

Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет

Условная компиляция в Delphi

Условная компиляция в Delphi, по сути, очень полезная и удобная возможность, которая позволяет Delphi компилировать или не компилировать код в зависимости от определенных символов условной компиляции. Говоря более простым языком (возможно и не совсем корректно), условная компиляция позволяет убрать или, наоборот, добавить часть кода исполняемого файла. Так или иначе, любой Delphi разработчик встречается с символами условной компиляции как минимум один раз за время работы над проектом.

Далее я рассмотрю различные примеры использования условной компиляции, которые могут Вам пригодиться в дальнейшей работе.

Для начала, рассмотрим очень простой код, который вы можете повторить в Delphi за несколько секунд:

Теперь нажмите F9 и проверьте, что написано в отладчике в «Events»:

Разберемся с тем, что мы только что написали.

$IFDEF — это директива компилятора;

DEBUG — условное определение или символ условной компиляции. Символ обязательно должен начинаться с буквы за которой может следовать любое количество букв, цифр и знаков подчеркивания, однако использоваться будут лишь первые 255 символов.

Процедура отправляет строку в отладчик для отображения.

Завершает условную компиляцию, инициированную последней директивой <$IFxxx>(почему не <$IFDEF>— смотрим далее).

Таким образом, используя директивы и мы указали компилятору дословно следующее: если где-либо по ходу компиляции был встречено условное определение DEBUG, то надо выполнить OutputDebugString.

Где определено условное определение DEBUG? Конкретно в этом случае, символ DEBUG можно найти, если зайти в настройки проекта: Project -> Options ->Delphi Compiler :

Здесь же можно определить и свои собственные символы. Давайте, например, добавим свой символ условной компиляции TEST. Для этого открываем диалоговое окно редактирования символов условной компиляции (жмем кнопку «…» в строке «Conditional defines») и заносим наш символ в список:

Теперь изменим наш код, приведенный в начале статьи, чтобы он работал с нашим символом условной компиляции:

Теперь можете снова запустить приложения в режиме отладки и посмотреть, что в Events появится строка «TEST IS ON».

Сейчас мы с вами рассмотрели самый простой способ использования условной компиляции в Delphi — использование директив и , а также определение собственного символа условной компиляции через свойства проекта. Вместе с этим, определить (включить) свой символ условной компиляции можно и в коде программы. Для этого используется директива компилятора . Воспользуемся этой директивой:

Соответственно, если есть директива определения нового символа, то должна быть и директива, которая отключает символы условной компиляции — она называется . Можете написать, например, вот такой код:

и убедиться, что символ DEBUG выключен, а в окне Events не появится строка «debug is on».

Двигаемся далее. Что делать, если нам необходимо вывести строку не когда символ включен, а именно тогда, когда он выключен? Здесь, опять же, есть варианты. Короткий вариант — воспользоваться директивой противоположной — она называется и код между и выполняется, если символ выключен:

Второй вариант — использование директивы , если в зависимости от состояния символа условной компиляции вам надо выполнять различные участки кода:

Соответственно, нет необходимости далее повторять этот же участок кода с использованием — работать будет, но прямо противоположно.

Также следует обратить внимание на то, что все условные символы оцениваются в Delphi, когда вы выполняете Build проекта. Справка Delphi рекомендует для надежности пользоваться командой Project -> Build All Projects, чтобы быть уверенным, что все символы условной компиляции определены верно.

В Delphi также определен набор символов условной компиляции, которые вы можете использовать при работе над своим проектом.

Например, символ условной компиляции VER330 определен для Delphi 10.3 Rio и с его помощью можно определить какой код должен или не должен выполняться, в случае, если версия компилятора Delphi — 33. Например, воспользуемся фичей Delphi 10.3 Rio под названием Inline Variable Declaration:

Сразу может возникнуть вопрос: как сделать так, чтобы приведенный выше код сработал не только в Delphi 10.3 Rio, но и в последующих версиях?
Это можно сделать воспользовавшись, например, такой конструкцией:

Здесь мы уже воспользовались директивой с помощью которой проверили значение константы CompilerVersion, которая находится в модуле System.

Здесь же стоит обратить внимание и на окончание блока — мы использовали директиву , как того требовала Delphi до версии Delphi XE4:

  • для директивы $IFDEF должна быть определена директива $ENDIF
  • для директивы $IF должна быть определена директива $IFEND

В XE4 нам разрешили использовать для закрытия блоков <$IF>, и . Однако, если у вас возникают проблемы при использовании связки и , то вы можете использовать специальную директиву , чтобы потребовать использовать для именно <$IFEND>:

Теперь, если в коде выше использовать директиву $ENDIF, то получим сообщение об ошибке:

Директиву , кстати, можно использовать и с другими константами проекта, например, так:

Так как наша константа Version содержит значение 2, то выполнится участок кода расположенный после . Можете сменить значение константы Version на 1, чтобы убедиться, что выполнится участок кода, где определена переменная s.

Как я сказал выше, в Delphi есть целый набор предопределенных символов условной компиляции. Ознакомиться со всеми этими символами вы можете на этой странице справки по Delphi.

  1. Использование условной компиляции позволяет нам выполнять тот или иной код, в зависимости от того, какие константы и символы условной компиляции определены или не определены в проекте.
  2. Используя предопредленные символы условной компиляции можно указывать Delphi какой код необходимо выполнить, например, если программа собирается под Android, или, если поддерживается архитектура x64 и т.д.
  3. Директива $IF может использоваться с различными константами, в том числе и определенными самим разработчиком.

При подготовке статьи использовалась следующая информация официальной справки по Delphi:

Директивы компилятора — Delphi версии

У меня есть блок, который я написал в Delphi 7 некоторое время назад, и только было весело (боль) преобразования в Delphi XE (Unicode).

Группа работает отлично после того, как некоторые проблемы, я сейчас пытаюсь сделать это устройство совместимо с различными версиями Delphi я должен когда-нибудь понадобится, чтобы переключиться обратно в IDE Delphi 7 в то время как обновление какой-либо другой код.

У меня только Delphi 7 и Delphi XE, но от того, что я собираю код, написанный на Delphi 1 в Delphi 2007 будет компилировать, но код с Delphi 2009 и выше будет Unicode.

. Во всяком случае, в блоке я отделяя не-Юникод и Юникод, как так:

Как изменить директиву компилятора поэтому правила применяются к Многоязычным версиям? Например, что-то вроде:

Это позволило бы охватить все версии Delphi я должен распространять исходный или .dcu блок.

Интересно , если самый простой подход в данном случае является переключение поведения на UNICODE условный. Это условное определяется тогда и только тогда , когда вы используете версию Unicode в Delphi, то есть в Delphi 2009 и более поздних версий. Большим преимуществом является то , что это будущее доказательство вам не нужно обновить код каждый раз , когда новый Delphi отпускается. Более того, условный переключатель будет гораздо более удобным для чтения , так как он будет четко выражать намерение.

Документация Delphi имеет отличную тему со списком всех предварительно определенными условными. Полный список версии условных также связан оттуда.

$IOChecks — Директива компилятора Delphi

Директивы условной компиляции
<$C+>и <$C->— директивы проверки утверждений
<$I+>и <$I->— директивы контроля ввода/вывода
<$M>и <$S>— директивы, определяющие размер стека
<$M+>и <$M->— директивы информации времени выполнения о типах
<$Q+>и <$Q->— директивы проверки переполнения целочисленных операций
<$R>— директива связывания ресурсов
<$R+>и <$R->— директивы проверки диапазона
<$APPTYPE CONSOLE>— директива создания консольного приложения

1) Директивы компилятора, разрешающие или запрещающие проверку утверждений.

По умолчанию <$C+>или

Область действия локальная

Директивы компилятора $C разрешают или запрещают проверку утверждений. Они влияют на работу процедуры Assert,используемой при отладке программ. По умолчанию действует
директива <$C+>и процедура Assert генерирует исключение EAssertionFailed, если проверяемое утверждение ложно.

Так как эти проверки используются только в процессе отладки программы, то перед ее окончательной компиляцией следует указать директиву <$C->. При этом работа процедур Assert будет блокировано и генерация исключений EassertionFailed производиться не будет.

Директивы действуют на весь файл исходного кода независимо от того, в каком месте файла они расположены.

2) Директивы компилятора, включающие и выключающие контроль файлового ввода-вывода.

По умолчанию <$I+>или

Область действия локальная

Директивы компилятора $I включают или выключают автоматический контроль результата вызова процедур ввода-вывода Object Pascal. Если действует директива <$I+>, то при возвращении процедурой ввода-вывода ненулевого значения генерируется
исключение EInOutError и в его свойство errorcode заносится код ошибки. Таким образом, при действующей директиве <$I+>операции ввода-вывода располагаются в блоке try. except, имеющем обработчик исключения EInOutError. Если такого блока нет, то обработка производится методом TApplication.HandleException.

Если действует директива <$I->, то исключение не генерируется. В этом случае проверить, была ли ошибка, или ее не было, можно, обратившись к функции IOResult. Эта функция очищает ошибку и возвращает ее код, который затем можно анализировать. Типичное применение директивы <$I->и функции IOResult демонстрирует следующий пример:

В этом примере на время открытия файла отключается проверка ошибок ввода вывода, затем она опять включается, переменной i присваивается значение, возвращаемое функцией IOResult и, если это значение не равно нулю (есть ошибка), то предпринимаются какие-то действия в зависимости от кода ошибки. Подобный стиль программирования был типичен до введения в Object Pascal механизма обработки исключений. Однако сейчас, по-видимому, подобный стиль устарел и применение директив $I потеряло былое значение.

3) Директивы компилятора, определяющие размер стека

Область действия глобальная

Локальные переменные в процедурах и функциях размещаются в стеке приложения. При каждом вызове процедуры или функции ее локальные переменные помещаются в стек. При выходе из процедуры или функции эти локальные процедуры удаляются из стека.
Директивы компилятора $M задают параметры стека приложения: его минимальный и максимальный размеры. Приложение всегда гарантированно имеет размер стека, равный его минимальной величине. Если при запуске приложения Windows обнаруживает, что не может
выделить этот минимальный объем памяти, то выдается сообщение об этой ошибке.

Если во время работы выясняется, что минимального размера стека не хватает, то размер увеличивается на 4 K, но не более, чем до установленного директивой максимального размера. Если увеличение размера стека невозможно из-за нехватки памяти или из-за достижения его максимальной величины, генерируется исключение EStackOverflow. Минимальный размер стека по умолчанию равен 16384 (16K). Этот размер может изменяться параметром minstacksize
директивы <$M>или параметром number директивы <$MINSTACKSIZE>.

Максимальный размер стека по умолчанию равен 1,048,576 (1M). Этот размер может изменяться параметром maxstacksize директивы <$M>или параметром number директивы <$MAXSTACKSIZE number>. Значение минимального размера стека может задаваться целым числом в диапазоне между1024 и 2147483647. Значение максимального размера стека должно быть не менее минимального размера и не более 2147483647. Директивы задания размера стека могут включаться только в программу и не должны использоваться в библиотеках и модулях.

В Delphi 1 имеется процедура компилятора <$S>, осуществляющая переключение контроля переполнения стека. Теперь этот процесс полностью автоматизирован и директива <$S>оставлена только для обратной совместимости.

4) Директивы компилятора, включающие и выключающие генерацию информации времени выполнения о типах (runtime type information — RTTI).

По умолчанию <$M->или

Область действия локальная

Директивы компилятора $I включают или выключают генерацию информации времени выполнения о типах (runtime type information — RTTI). Если класс объявляется в состоянии <$M+>или является производным от класса объявленного в этом состоянии, то компилятор генерирует RTTI о его полях, методах и свойствах, объявленных в разделе published. В противном
случае раздел published в классе не допускается. Класс TPersistent, являющийся предшественником большинства классов Delphi и все классов компонентов, объявлен в модуле Classes в состоянии <$M+>. Так что для всех классов, производных от него, заботиться о директиве <$M+>не приходится.

5) Директивы компилятора, включающие и выключающие проверку переполнения при целочисленных операциях

По умолчанию <$Q->или

Область действия локальная

Директивы компилятора $Q включают или выключают проверку переполнения при целочисленных операциях. Под переполнением понимается получение результата, который не может сохраняться в регистре компьютера. При включенной директиве <$Q+>проверяется переполнение при целочисленных операциях +, -, *, Abs, Sqr, Succ, Pred, Inc и Dec. После каждой из этих операций размещается код, осуществляющий соответствующую проверку. Если обнаружено переполнение,
то генерируется исключение EIntOverflow. Если это исключение не может быть обработано, выполнение программы завершается.

Директивы $Q проверяют только результат арифметических операций. Обычно они используются совместно с директивами <$R>, проверяющими диапазон значений при присваивании.
Директива <$Q+>замедляет выполнение программы и увеличивает ее размер. Поэтому обычно она используется только во время отладки программы. Однако, надо отдавать себе отчет, что отключение этой директивы приведет к появлению ошибочных результатов расчета в случаях, если переполнение действительно произойдет во время выполнении программы. Причем сообщений о подобных ошибках не будет.

6) Директива компилятора, связывающая с выполняемым модулем файлы ресурсов

Область действия локальная

Директива компилятора <$R>указывает файлы ресурсов (.DFM, .RES), которые должны быть включены в выполняемый модуль или в библиотеку. Указанный файл должен быть файлом ресурсов Windows. По умолчанию расширение файлов ресурсов — .RES. В процессе компоновки компилированной программы или библиотеки файлы, указанные в директивах <$R>, копируются в
выполняемый модуль. Компоновщик Delphi ищет эти файлы сначала в том каталоге, в котором расположен модуль, содержащий директиву <$R>, а затем в каталогах, указанных при выполнении команды главного меню Project | Options на странице Directories/Conditionals диалогового окна в опции Search path или в опции /R командной строки DCC32.

При генерации кода модуля, содержащего форму, Delphi автоматически включает в файл .pas директиву <$R *.DFM>, обеспечивающую компоновку файлов ресурсов форм. Эту директиву нельзя удалять из текста модуля, так как в противном случае загрузочный модуль не будет создан и сгенерируется исключение EResNotFound.

7) Директивы компилятора, включающие и выключающие проверку диапазона целочисленных значений и индексов

По умолчанию <$R->или

Область действия локальная

Директивы компилятора $R включают или выключают проверку диапазона целочисленных значений и индексов. Если включена директива <$R+>, то все индексы массивов и строк и все присваивания скалярным переменным и переменным с ограниченным диапазоном значений проверяются на соответствие значения допустимому диапазону. Если требования
диапазона нарушены или присваиваемое значение слишком велико, генерируется исключение ERangeError. Если оно не может быть перехвачено, выполнение программы завершается.

Проверка диапазона длинных строк типа Long strings не производится.
Директива <$R+>замедляет работу приложения и увеличивает его размер. Поэтому она обычно используется только во время отладки.

8) Директива компилятора, связывающая с выполняемым модулем файлы ресурсов

Область действия локальная

Директива компилятора <$R>указывает файлы ресурсов (.DFM, .RES), которые должны быть включены в выполняемый модуль или в библиотеку. Указанный файл должен быть файлом ресурсов Windows. По умолчанию расширение файлов ресурсов — .RES.
В процессе компоновки компилированной программы или библиотеки файлы, указанные в директивах <$R>, копируются в выполняемый модуль. Компоновщик Delphi ищет эти файлы сначала в том каталоге, в котором расположен модуль, содержащий директиву <$R>, а затем в каталогах, указанных при выполнении команды главного меню Project | Options на странице Directories/Conditionals диалогового окна в опции Search path или в опции /R командной строки DCC32.

При генерации кода модуля, содержащего форму, Delphi автоматически включает в файл .pas директиву <$R *.DFM>, обеспечивающую компоновку файлов ресурсов форм. Эту директиву нельзя удалять из текста модуля, так как в противном случае загрузочный модуль не будет создан и сгенерируется исключение EResNotFound.

Категория : Обзор Delphi | Добавил : Барон (16.12.2011) Просмотров : 669 | Теги : компилятор | Рейтинг : 0.0 /

[ Пожертвования для сайта ] [ Пожаловаться на материал ]

Если вам помог материал сайта кликните по оплаченной рекламе размещенной в центре

Список директив компилятора Delphi, нужно ли указывать директивы перед именем устройства?

im работает над приложением, используя delphi 7, и я просто наткнулся на это

автор кода разместил так много директив компилятора перед именем основного устройства.

может кто-нибудь сказать мне

  • Как использовать директивы перед именем элемента, делает ли это глобальным?
  • И можем ли мы создать наши собственные директивы в некоторых конкретных ситуациях?
  • где указаны директивы компилятора?
  • Ключевая тема, объясняющая принципы, приведена здесь: директивы компилятора Delphi.
  • Директивы компилятора перечислены здесь: Директивы компилятора Delphi (список).

Что касается того, влияет ли директива на весь проект, целый блок, одна функция и область с функцией, которая варьируется от директивы к директиве. Вы должны прочитать документацию для каждой директивы, чтобы узнать, какова ее область действия.

Вы спрашиваете, нужно ли их размещать прямо в начале устройства. Вы должны учитывать сферу действия этой директивы. Другая часть документации говорит об указателях коммутатора:

Директивы переключателей являются глобальными или локальными:

  • Глобальные директивы влияют на всю компиляцию и должны отображаться перед объявлением части программы или скомпилированного устройства.
  • Локальные директивы влияют только на часть компиляции, которая простирается от директивы до следующего появления той же директивы. Они могут появляться где угодно.

Однако рассмотрите директиву DENYPACKAGEUNIT (внимание мое):

Директива <$DENYPACKAGEUNIT ON>предотвращает создание блока Delphi, из которого он помещается в пакет.

Если эта директива имеет единую область видимости, то она просто должна присутствовать в блоке, чтобы вступить в силу.

Таким образом, это может иметь значение, где размещена директива. Суть в том, что для каждой директивы вам необходимо знать ее область действия, и для этого вы должны обратиться к документации для этой директивы.

Обратите внимание, что вам нужно всего лишь установить директивы в коде, если вы хотите изменить настройки по сравнению с настройками проекта. Разумно установить параметры в параметрах проекта и не устанавливать их в коде.

То, что, по-видимому, произошло в представленном вами коде, заключается в том, что автор набрал CTRL+O O , а среда IDE вставила различные параметры, определенные в параметрах проекта в этот момент времени.

Язык Delphi для Win32 и. Net — синтаксис, операции, операторы

Название Язык Delphi для Win32 и. Net — синтаксис, операции, операторы
страница 2/11
Дата публикации 04.06.2013
Размер 1.12 Mb.
Тип Документы

litcey.ru > Информатика > Документы

^ 2.2.4 Ключевые директивы

В разд. 2.2.1 пояснялся синтаксис и назначение ключевых директив. В разд. 2.2.2 при описании настройки компилятора описаны многие ключевые опции. В данном разделе приводятся более подробные сведения по этим и по всем остальным ключевым директивам.

<$А±>, <$ALIGN>— директивы выравнивания полей записей

Директивы компилятора, включающие или выключающие выравнивание

Область действия локальная

Директивы включают или выключают выравнивание полей типов записей (см. разд. 4.4 и 7.1). Директивы <$А>обеспечивают выравнивание полей записей и классов, которые объявлены без модификатора packed. Это обеспечивает более быструю работу с записями и свойствами. При наличии директивы < $А->или <$А1>выравнивание полей никогда не происходит, как будто все поля packed. При <$А2>поля выравниваются по границам слов (word), при <$А4>— по границам удвоенных слов, при <$А8>или <$А+>по границам четырех слов.

Директивы выравнивания влияют только на поля записей и классов. Переменные и типизированные константы выравниваются всегда, независимо от директив выравнивания.

<$ASSERTIONS>— директивы проверки утверждений

См. «<$С>, <$ASSERTIONS>— директивы проверки утверждений».

<$В±>, <$BOOLEVAL>— директивы управления вычислением булевых выражений

Директивы компилятора, управляющие вычислением булевых выражений

^ По умолчанию <$ В->и л и

Область действия локальная

Компилятор Delphi поддерживает два режима вычисления булевых выражений, содержащих операции and и ог: полный и сокращенный (см. разд. 2.8.5). В режиме полного вычисления, который обеспечивается директивой <$В+>, все логическое выражение вычисляется до конца, даже если после вычисления первого операнда результат ясен. В режиме сокращенного вычисления, который обеспечивается включенной по умолчанию директивой <$В->, расчет прерывается, как только результат ясен. Например, операция ог дает результат true, если хотя бы один операнд равен true. Значит, если первый операнд равен true, то результат ясен и в режиме сокращенного вычисления расчет прервется без вычисления второго операнда. Это обеспечивает более быстрое выполнение, но при этом некоторые операнды могут оказаться не вычисленными. Например, если второй операнд — некоторая функция, возвращающая булево значение и кроме того вычисляющая что-то, необходимое для дальнейшего расчета, то при сокращенных вычислениях эти дополнительные расчеты могут не выполняться.

Директивы компилятора, разрешающие или запрещающие проверку утверждений

Область действия локальная

Директивы разрешают или запрещают проверку утверждений, влияют на работу процедуры Assert (см. разд. 2.3), используемой при отладке программ. По умолчанию действует директива <$С+>и процедура Assert генерирует исключение EAssertionFailed, если проверяемое утверждение ложно.

Так как эти проверки используются только в процессе отладки программы, то перед ее окончательной компиляцией следует указать директиву <$С->. При этом работа процедур Assert будет блокирована, и генерация исключений EAssertionFailed производиться не будет.

Директивы действуют на весь файл исходного кода независимо от того, в каком месте файла они расположены.

<$D±>, <$DEBUGINFO>— директивы отладочной информации

Директивы компилятора, управляющие включением в модуль отладочной информации

Область действия локальная

Директива < $D+>включает в генерируемый модуль отладочную информацию, позволяющую производить отладку по шагам, вводить в код точки прерывания и генерировать информацию о локальных символах. Отладочная информация увеличивает размер модуля и требует дополнительной памяти.

<$DEFINITIONINFO>— директивы генерации ссылок на символы

<$DENYPACKAGEUNIT>— директивы включения модуля в пакет

Директивы компилятора, запрещающие или разрешающие включение модуля в пакет

Область действия локальная

Директива <$DENYPACKAGEUNIT ON>не позволяет включить тот модуль, в котором она записана, в пакет.

<$DESIGNONLY>— директивы компиляции пакета

Директивы компилятора, управляющие компиляцией пакета для установки в среде Delphi

Область действия локальная

Директива <$DESIGNONLY ON>включается в модуль пакета (только в файл .dpk), когда он должен компилироваться для установки в Интегрированной Среде Разработки Delphi.

<$EXTENDEDSYNTAX>— директивы расширенного синтаксиса

См. «<$Х>, <$EXTENDEDSYNTAX>— директивы расширенного синтаксиса».

<$G±>, <$IMPORTEDDATA>— директивы управления импортируемыми данными

Директивы компилятора, управляющие импортом данных

Область действия локальная

Директива <$G->или <$IMPORTEDDATA OFF>запрещает создание ссылок на импортируемые данные.

Директивы компилятора, определяющие значение типа строк string

Область действия локальная

Директивы определяют, какому типу соответствует ключевое слово string. При директиве <$Н+>это ключевое слово соответствует длинным динамически размещаемым в памяти строкам AnsiString. С этой директивой компилированы все компоненты библиотеки Delphi и с ней же должны компилироваться новые компоненты, создаваемые пользователем.

При директиве <$Н->тип string соответствует коротким статически размещаемым строкам ShortString или string[255]. Это используется в основном при заимствовании кодов из ранних версий Delphi.

<$HINTS>— директивы управления замечаниями компилятора

Директивы компилятора, включающие и выключающие выдачу замечаний

Область действия локальная

Директивы включают или выключают генерацию замечаний компилятора о неиспользуемых переменных, неиспользуемых присваиваниях, никогда не выполняемых циклах for и while и т.п. Если вы хотите в каком-то фрагменте кода выключить генерацию таких замечаний, это надо оформить следующим образом:

Тогда по отношению к этому фрагменту не будут делаться замечания, например, об объявленных, но не используемых переменных.

Директивы компилятора, включающие и выключающие контроль файлового ввода-вывода

Область действия локальная

Директивы включают или выключают автоматический контроль результата вызова процедур ввода-вывода. Если действует директива <$1+>, то при возвращении процедурой ввода-вывода ненулевого значения генерируется исключение EInOutError и в его свойство errorcode заносится код ошибки. Таким образом, при действующей директиве <$1+>операции ввода-вывода располагаются в блоке try. except (см. разд. 3.2.7), имеющем обработчик исключения EInOutError. Если такого блока нет, то обработка производится методом TApplication.HandleException.

Если действует директива <$1->, то исключение не генерируется. В этом случае проверить, была ли ошибка, или ее не было, можно, обратившись к функции IOResult. Эта функция очищает ошибку и возвращает ее код, который затем можно анализировать. Типичное применение директивы <$1->и функции IOResult демонстрирует следующий пример (сработает только в приложении VCL Win32):

В этом примере на время открытия файла отключается проверка ошибок ввода вывода, затем она опять включается, переменной i присваивается значение, возвращаемое функцией IOResult и, если это значение не равно нулю (есть ошибка), то предпринимаются какие-то действия в зависимости от кода ошибки.

Подобный стиль программирования был типичен до введения в язык Delphi механизма обработки исключений. Однако сейчас подобный стиль устарел и применение директив $1 потеряло былое значение, все более уступая место обработке исключений (см. разд. 3.2).

Директивы компилятора, разрешающие или запрещающие перекомпиляцию

Область действия глобальная

Директивы разрешают или запрещают перекомпиляцию модуля. Запрещать перекомпиляцию имеет смысл в случаях, если перекомпиляция данного модуля должна быть проведена позднее.

<$IMPORTEDDATA>— директивы управления импортируемыми данными

См. «<$G>, <$IMPORTEDDATA>— директивы управления импортируемы-

<$INLINE>— директива встраиваемых функций

Директивы компилятора, определяющие, обработку встраиваемых функций

Область действия локальная

Директива <$INLINE>управляет созданием встраиваемых функций inline (см. разд. 2.7.5.).

Значение <$INLINE ON>, принятое по умолчанию, означает, что функции с директивой inline будут по возможности реализованы как встраиваемые. Значение <$INLINE AUTO>аналогично предыдущему, но дополнительно будут сделаны встраиваемыми все функции, размер которых меньше 32 байт, даже если в их объявлении нет директивы inline. Значение <$INLINE OFF>исключает реализацию встраиваемых функций, игнорируя директиву inline.

<$IOCHECKS>— директива контроля ввода-вывода

См. «<$1±>, <$IOCHECKS>— директивы контроля ввода-вывода»

Директивы компилятора, определяющие, могут ли изменяться значения типизированных констант

Область действия локальная

В ранних версиях Delphi и Borland Pascal значения всех типизированных констант можно было менять. Поэтому прежние коды, использующие эти возможности, следует компилировать с директивой <$J+>, разрешающей изменять типизированные константы. Однако, новые приложения следует компилировать с директивой <$J->, при которой типизированные константы — действительно константы и попытка их изменения вызовет сообщение компилятора об ошибке.

<$L±>, <$LOCALSYMBOLS>— директивы, управляющие информацией о локальных символах

Директивы компилятора, разрешающие или запрещающие генерацию ин-

информации о локальных символах

Область действия глобальная

Директивы разрешают или запрещают генерацию информации о локальных символах. Информация включает имена и типы всех локальных переменных и констант модуля. Это увеличивает объем модуля и замедляет компиляцию, но зато позволяет в процессе отладки просматривать и модифицировать локальные переменные, а также дает возможность просматривать последовательность вызовов функций и процедур командой View | Debug Windows | Call Stack. Включение директивы $L позволяет также для проекта VCL Win32 включать опции Include TDW debug info и Map file на странице Linker диалогового окна, вызываемого командой Project | Options.

Директива $L обычно включается и выключается синхронно с директивой $D. В частности, директива $L игнорируется, если используется директива <$D->.

<$LONGSTRINGS>— директивы задания типа строк

См. «<$Н>, <$LONGSTRINGS>— директивы задания типа строк».

<$М±>, <$TYPEINFO>— директивы информации времени выполнения о типах

Директивы компилятора, включающие и выключающие генерацию инфор-

информации времени выполнения о типах (runtime type information — RTTI)

Область действия локальная

Директивы включают или выключают генерацию информации времени выполнения о типах (runtime type information — RTTI). Если класс объявляется в состоянии < $М+>или является производным от класса, объявленного в этом состоянии, то компилятор генерирует RTTI о его полях, методах и свойствах, объявленных в разделе published. В противном случае раздел published в классе не допускается.

Класс TPersistent, являющийся предшественником большинства классов Delphi и всех классов компонентов, объявлен в модуле Classes в состоянии <$М+>. Так что для всех классов, производных от него, заботиться о директиве <$М+>не приходится.

<$ MESS AGE>— директива генерации сообщения

Директива генерирует сообщение, подобное сообщениям компилятора

^ Область действия локальная

Директива обеспечивает во время компиляции генерацию сообщения с заданным текстом, подобного сообщениям компилятора. Необязательный второй параметр директивы может отсутствовать, или принимать значение HINT, WARN, ERROR или FATAL. Это значение просто определяет, с какой пометкой будет выдано сообщение.

Директиву удобно применять совместно с директивами условной компиляции (см. разд. 2.2.3). Тогда вы будете сразу видеть, какой вариант приложения вы скомпилировали. Например:

В результате компиляции вы получите сообщение вида:

[Hint] Unit2.pas(89): Н2428 Сгенерирован код без отладочной печати

Если вы зададите в директиве параметр HINT, то результат будет тот же. А если вы зададите параметр WARN:

Директивы компилятора — Версии Delphi

У меня есть блок, который я написал в Delphi 7 некоторое время назад, и просто получил удовольствие (боль) от преобразования в Delphi XE (Unicode).

Устройство работает отлично после некоторых проблем, теперь я пытаюсь сделать этот аппарат совместимым с различными версиями Delphi, если мне когда-либо понадобится переключить IDE обратно в Delphi 7, обновляя какой-либо другой код.

У меня только Delphi 7 и Delphi XE, но из того, что я собираю, код, написанный в Delphi 1, Delphi 2007 будет компилироваться, но код из Delphi 2009 и выше будет Unicode.

. Во всяком случае, в блоке я отделяющий не-Юникод и Юникод, как так:

Как изменить директиву компилятора поэтому правила применяются к Многоязычным версиям? Например, что-то вроде:

Это будет охватывать все версии Delphi, если я буду распространять источник или блок .dcu.

Создан 25 ноя. 11 2011-11-25 14:07:16 Anonymous

2 ответа

Интересно, является ли самый простой подход в этом случае переключать поведение на UNICODE условно. Это условие определено тогда и только тогда, когда вы используете Unicode-версию Delphi, то есть в Delphi 2009 и более поздних версиях. Большим преимуществом этого является то, что это будущее доказательство — вам не нужно обновлять свой код каждый раз, когда выпускается новый Delphi. Более того, условный переключатель будет гораздо читабельнее, поскольку он четко выражает намерение.

Документация Delphi имеет отличный topic, содержащий все предопределенные условные обозначения. Полный список условных обозначений версии также linked оттуда.

Создан 25 ноя. 11 2011-11-25 14:20:45 David Heffernan

+1, вы были быстрее. Если OP хочет только разделить код на Unicode-версию Delphi, то директива ‘UNICODE’ является точной. Существуют также CompilerVersion и RTLVersion для определения текущей версии Delphi. – TLama 25 ноя. 11 2011-11-25 14:31:10

. если кто-то использовал «UNICODE» в прошлом. Например, чтобы удовлетворить отсутствие поддержки Unicode в самой Delphi;) . все еще, +1 . ваше решение кажется более чистым, если можно гарантировать, что ‘UNICODE’ еще не используется. – 0xC0000022L 25 ноя. 11 2011-11-25 14:33:44

@STATUS_ACCESS_DENIED В этом случае необходимо изменить код, который определяет и использует пользовательский условный символ с именем UNICODE. – David Heffernan 25 ноя. 11 2011-11-25 14:36:29

@ Давид: Я не уверен, что согласен. В C/C++ для определенных объектов (определений и функций) было принято, чтобы они начинались с двух ведущих подчеркиваний, если они специфичны для компилятора. Borland (et al.) Должен был бы сделать такие правила давно. Они меняют правила и постоянно нарушают код. В частности, поддержка Unicode/была бесполезной в этом отношении. Я до сих пор не понимаю, как совершенные дельфийцы могут оставаться такими спокойными;) . Я некоторое время оставил все это позади меня, хотя по-прежнему пользуюсь Delphi. – 0xC0000022L 25 ноя. 11 2011-11-25 14:53:46

@STATUS Как бы то ни было, это то, что есть, и если Emba определит ‘UNICODE’, тогда вам не нужно, нравится вам это или нет. – David Heffernan 25 ноя. 11 2011-11-25 14:54:52

@ Давид спасибо за информацию, используя директиву UNICODE намного лучше :)user741875 25 ноя. 11 2011-11-25 15:09:07

Ваш лучший выбор — это посмотреть на один из многих проектов JEDI, например, http://sourceforge.net/projects/jedi-apilib/ и посмотреть, как они это делают. У них есть общие файлы, содержащие именно те детали, которые вас интересуют. JVCL — еще один хороший выбор .

Создан 25 ноя. 11 2011-11-25 14:11:10 0xC0000022L

Да jvcl inc совершенен. Существует только каждая директива компилятора для кодирования некоторых разделов, относящихся к конкретным версиям. – az01 25 ноя. 11 2011-11-25 14:18:50

Директивы по версиям компилятора Delphi: <$ IFDEF VER180>— 2020

Подготовка к кодированию без барьеров. Узнайте, как преодолеть проблему с версией компилятора: компиляция кода Delphi для различных версий Delphi.

Если вы планируете писать код Delphi, который должен работать с несколькими версиями компилятора Delphi, вам необходимо знать, в каких версиях компилируется ваш код.

Предположим, вы пишете свой собственный (коммерческий) пользовательский компонент. Пользователи вашего компонента могут иметь разные версии Delphi, чем у вас.

Если они попытаются перекомпилировать код компонента (ваш код) — у них могут быть проблемы! Что если вы использовали параметры по умолчанию в ваших функциях, а у пользователя Delphi 3?

Директива компилятора: $ IfDef

Директивы компилятора — это специальные синтаксические комментарии, которые мы можем использовать для управления функциями компилятора Delphi. Компилятор Delphi имеет три типа директив: переключение директив, директивы параметров а также условные директивы, Условная компиляция позволяет нам выборочно компилировать части исходного кода в зависимости от того, какие условия установлены.

Директива компилятора $ IfDef запускает секцию условной компиляции.

Синтаксис выглядит так:

DefName представляет так называемый условный символ. Delphi определяет несколько стандартных условных символов. В приведенном выше «коде», если определено DefName, код выше $ Else компилируется.

Delphi Version Symbols

Распространенным применением директивы $ IfDef является тестирование версии компилятора Delphi.

В следующем списке указаны символы, которые необходимо проверить при условной компиляции для конкретной версии компилятора Delphi:

  • УСЛОВНОЕ ОБОЗНАЧЕНИЕ — Компиляционная версия
  • VER80 — Delphi 1
  • VER90 — Delphi 2
  • VER100 — Delphi 3
  • VER120 — Delphi 4
  • VER130 — Delphi 5
  • VER140 — Delphi 6
  • VER150 — Delphi 7
  • VER160 — Delphi 8
  • VER170 — Delphi 2005
  • VER180 — Delphi 2006
  • VER180 — Delphi 2007
  • VER185 — Delphi 2007
  • VER200 — Delphi 2009
  • VER210 — Delphi 2010
  • VER220 — Delphi XE
  • VER230 — Delphi XE2
  • WIN32 — Указывает, что операционной средой является Win32 API.
  • LINUX — Указывает, что операционной средой является Linux
  • MSWindows — Указывает, что операционной средой является MS Windows / li]
  • ПРИСТАВКА — Указывает, что приложение компилируется как консольное приложение.

Зная вышеупомянутые символы, можно написать код, который работает с несколькими версиями Delphi, используя директивы компилятора для компиляции соответствующего исходного кода для каждой версии.

Примечание: символ VER185, например, используется для обозначения компилятора Delphi 2007 или более ранней версии.

Использование символов «VER»

Обычно (и желательно) для каждой новой версии Delphi добавлять несколько новых подпрограмм RTL к языку.

Например, функция IncludeTrailingBackslash, представленная в Delphi 5, добавляет «» в конец строки, если ее там еще нет. В проекте Delphi MP3 я использовал эту функцию, и несколько читателей пожаловались, что не могут скомпилировать проект — у них есть какая-то версия Delphi до Delphi 5.

Одним из способов решения этой проблемы является создание собственной версии этой подпрограммы — функции AddLastBackSlash.

Если проект должен быть скомпилирован на Delphi 5, вызывается IncludeTrailingBackslash. Если используются некоторые из предыдущих версий Delphi, мы моделируем функцию IncludeTrailingBackslash.

Это может выглядеть примерно так:

функция AddLastBackSlash (ул: строка) : строка; начать Результат: = IncludeTrailingBackslash (str); если Copy (str, Length (str), 1) = «» затем Результат: = ул еще Результат: = str + «»; конец;

При вызове функции AddLastBackSlash Delphi выясняет, какая часть функции должна использоваться, а другая часть просто пропускается.

Delphi 2008?

Delphi 2007 использует VER180 для обеспечения неразрывной совместимости с Delphi 2006, а затем добавляет VER185 для разработки, которая по каким-либо причинам должна быть нацелена на Delphi 2007.

Примечание. Каждый раз, когда интерфейс модуля изменяет код, использующий этот модуль, его необходимо перекомпилировать.Delphi 2007 — выпуск без прерываний, означающий, что файлы DCU из Delphi 2006 будут работать как есть.

Илон Маск рекомендует:  Что такое код udm_add_search_limit
Понравилась статья? Поделиться с друзьями:
Кодинг, CSS и SQL