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


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

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

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

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

. Во всяком случае, в модуле я разделяю не-Unicode и Unicode следующим образом:

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

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

Директивы компилятора — Версии 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

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

разбираюсь с чужим проектом. В нем часто используется директива
<$IFDEF LOGXML>
.

но вот я не могу найти определения <$Define LOGXML>
Где может определяться символ LOGXML?? Подскажите.

Медвешонок Порошок ( 25.10.13 16:39 ) [1]

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

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

Andrey_Pl ( 25.10.13 16:47 ) [3]

где он может задаваться? так как я вижу что программа заходит в область
<$IFDEF LOGXML>
.

Andrey_Pl ( 25.10.13 16:52 ) [4]

> sniknik © (25.10.13 16:46) [2]
спасибо, так и есть! Нашел в опциях)

Германн © ( 26.10.13 01:19 ) [5]

> sniknik © (25.10.13 16:46) [2]
>
> в опциях проекта удобнее. там дефайн на все модули проекта
> распространяется.

Не только на все модули проекта. Но и вообще на все модули, чей код при сборке включается в исполняемый код. Лишь бы исходники этих модулей были бы доступны компилятору. Тот же эффект можно получить прописав явно эти дефайны (как и любые опции компилятора) в файл проекта.

jack128_ ( 14.11.13 16:21 ) [6]

> Тот же эффект можно получить прописав явно эти дефайны (как
> и любые опции компилятора) в файл проекта

если под «файлом проэкта» ты имеешь в виду dpr-файл, то дефайны заданные в нем не влияют на unit’ы. Только на сам dpr файл.

Германн © ( 14.11.13 17:11 ) [7]

> jack128_ (14.11.13 16:21) [6]

Твоя правда.

Директивы по версиям компилятора 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 будут работать как есть.

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

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

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

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

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

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

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

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

По умолчанию или

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

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

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

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

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

По умолчанию или

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

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

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

<$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 директивы .

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

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

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

По умолчанию или

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

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

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

По умолчанию или

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

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

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

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

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

По умолчанию или

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

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

Проверка диапазона длинных строк типа Long strings не производится.

Директива замедляет работу приложения и увеличивает его размер. Поэтому она обычно используется только во время отладки.

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

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

Директива компилятора указывает файлы ресурсов (.DFM, .RES), которые должны быть включены в выполняемый модуль или в библиотеку. Указанный файл должен быть файлом ресурсов Windows. По умолчанию расширение файлов ресурсов — .RES.

В процессе компоновки компилированной программы или библиотеки файлы, указанные в директивах , копируются в выполняемый модуль. Компоновщик Delphi ищет эти файлы сначала в том каталоге, в котором расположен модуль, содержащий директиву , а затем в каталогах, указанных при выполнении команды главного меню Project | Options на странице Directories/Conditionals диалогового окна в опции Search path или в опции /R командной строки DCC32.

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

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

3437 просмотра

3 ответа

2628 Репутация автора

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

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

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

  1. Какая польза от наличия Директив перед именем единицы, это делает их глобальными?
  2. И можем ли мы создавать свои собственные директивы в некоторых конкретных ситуациях?
  3. где определены директивы компилятора?

Автор: PresleyDiasИсточник Размещён: 17.01.2012 11:10

Ответы (3)

7 плюса

527596 Репутация автора

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

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

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

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

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

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

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

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

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

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

4 плюса

24047 Репутация автора

  1. Какая польза от наличия Директив перед именем единицы, это делает их глобальными?

Если под глобальным вы подразумеваете весь проект, ответ НЕТ. Каждый модуль компилируется самостоятельно.

  1. И можем ли мы создавать свои собственные директивы в некоторых конкретных ситуациях?

Они называются директивами компилятора, потому что компилятор их интерпретирует. Вы не можете создавать свои собственные директивы, если вы не в Embarcadero и не изменили компилятор.

Они определены в источниках компилятора. Они задокументированы в документации компилятора, и вы уже нашли отличную ссылку (ваша вторая ссылка)

плюса

1 Репутация автора

Спасибо, ребята, за совет CTRL OO, потому что я не знаю, что случилось с моим кодом, когда появились эти стандартные и определенные директивы.

Директива компилятора Delphi область — обратно совместимы единичные файлы?

Учитывая желание использовать директиву компилятора полезной области в единичных файлах, что лучший подход, чтобы эти же единица от использования в предыдущих версиях Delphi? Там, кажется, не быть «достойной» подход. (Желаемый IDE версия Delphi 7)

Мне нравится иметь регионы выше определений методов, чтобы скрыть / показать комментарии помогают определению метода и версии истории, но я должен был бы окружать директивы области с другими директивами компилятора, который своего родом убивает в «ЧИСТОТУ» директивы компилятора области.

Я полагаю, препроцессор может быть написано закомментировать все директивы Региона / EndRegion при использовании версии Delphi, которая не поддерживает regions..and добавить затем обратно для более поздних версий?

Я не 100% перешли на Delphi 2009 и должны поддерживать несколько версий IDE.

Я предполагаю, что D7 не хочет copile <$ REGION>или <$ ENDREGION>? У меня есть только D2007 / 9 установлен и не может проверить, что.

редактор D2009 создает область, как и ожидалось. D7 следует игнорировать $ РЕГИОН / $ ENDREGION если «UNDEF» не определен.

Вы можете использовать следующий код:

Есть несколько Delphi (7) редактор повышение-компоненты там, которые обеспечивают что — то вроде этого. Я думаю , что GExperts делает.

Если вы нормально с воздействием на вашем коде, вы можете рассмотреть <$ I>, чтобы разбивать большие файлы.

r3code

VALID INFO! My crazy life!

Задержись в реальности!

Столкнулся с проблемой сборки приложения из скрипта командной строки dcc32 неправильно обрабатывает параметры -B -D.
Приложение — тестовый проект DUnit, который должен запускаться, как консольное приложение.

Вот оновной код проекта:

dcc32 -B projTests.dpr должно заново компилировать все юниты, но это не происходит.
dcc32 -B -DCONSOLE_TESTRUNNER projTests.dpr не обрабатывает директиву компиляции или не перекомпилируюе юниты, потому я получаю опять GUI приложение вместо консольного.

Причем даже из самой среды команда Build All не помогает, то же самое. Однакое если сделать Build All и Compile, то проект собирается правильно.
Это и стало решением.

Сначала собираю проект

Затем еще раз компилирую

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

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

<$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+>, ‑ типизированные константы рассматриваются как переменные с исходными значениями.

Директивы условной компиляции

‑ определение условного идентификатора.

‑ отмена ранее определенного, условного идентификатора.

(<$IfNDef идентификатор>) ‑ возвращает истину (ложь), если определен указанный условный идентификатор.

‑ возвращает истину, если включена указанная ключевая директива компилятора (например, ).

‑ начало области действия ложности директивы Ifxxxx (IfDef,IfOpt, OfNDef).

‑ конец всей области действия условной директивы Ifxxxx.

Условная компиляция производится по схеме:

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

Пример задания параметра районного коэффициента к зарплате:

<$Define RegionalKoef>//параметр учета районного коэффициента

Этапы разработки проекта

Разработка интерфейса и программного кода

Разработка проекта состоит из двух шагов: создание интерфейса (внеш­ний вид форм, сценарии взаимодействия пользователя с приложе­ни­ем) и программного кода обработки данных (процедуры обработки собы­тий, ввода, обработки и вывода данных на различные носители).

Интер­фейс состоит из компонентов (п. 2.1.5), которые выбираются из палитры ком­понентов (п. 2.1.2) и визуально размещаются на формах проекта (п. 2.1.6).

Компиляция

Компиляция проекта выполняется по команде Project/Compile или кла­вишами ^F9. При компиляции проекта производятся следующие дей­ствия: компилируются все устаревшие модули и модули, которые под­клю­чают командой Uses устаревшие модули. Устаревшими модулями мо­гут быть исходные (Pas), объектные (Obj) и подключаемые (.Inc) модули. Пос­ле компиляции формируется исполняемый файл приложения с именем проек­та.

Cборка

Кроме компиляции можно выполнить сборку проекта командой Project/Build , при которой компилируются все файлы, а не только устаревшие.

Выполнение

Выполнить проект можно из среды Delphi командой Run/Run или клавишей F9; при этом устаревшие файлы будут откомпилированы заново. При таком запуске имеются ограничения: нельзя запустить копию приложения, продолжить разработку приложения можно только после завершения его выполнения. При зацикливании приложения завершение его работы производится командой Run/Program Reset или клавишами ^F2. Для отладки можно использовать средства отладки (п. 1.3.7). Если программа использует параметры, то их нужно задать в поле Run parameters одноименного окна, вызываемого командой Run/Parameters.

Из среды Windows приложение запускается, как и любое другое приложение. Программу можно запустить и из приложения (п. 1.7.8).

1.3.6.5. Выполнение консольного приложения и DOS‑программ

Консольное приложение имитирует работу в текстовом режиме. Ввод и вывод осуществляются процедурами Read, Readln, Write и Writeln. Достоинством консольного приложения является возможность переноса в Delphi программ, написанных на Паскале в среде Dos, и небольшой объем ис­полняемых EXE‑файлов. Такое приложение создается командой File/ New/Con­sole Wizard либо на основе уже существующего проекта: удалить форму командой Project/Remove From Project, вызвать окно редактора кода командой Project/View Source и произвести необходимые изменения.

Пример:

Program Project1; <$apptype console>//директива компилятора

Uses sysutils, Windows; //подключаемые модули

Begin SetConsoleTitle(‘Консольное окно’); //заголовок окна приложения

Writeln(‘Proverka’); Readln; End. //текст программы

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

Отладка

Отладка ‑ это процесс поиска и устранения ошибок в программе. Ошибки бывают двух типов: синтаксические (неверное написание предложений Паскаля), которые обнаруживаются самим компилятором, и логические (ошибки в самом кодируемом алгоритме).

Сообщения о синтаксических ошибках выводятся в нижней части ок­на редактора. При двойном щелчке на сообщении об ошибке подсве­чи­вает­­ся и становится текущей строка программы c ошибкой.

Для отладки имеется специальный встроенный отладчик, средства которого находятся в меню Run и подменю View/Debug Windows. Настройка отладчика производится командой Tools/Debugger Options.

Последнее изменение этой страницы: 2020-02-08; Нарушение авторского права страницы

$Align — директива компилятора

Posted by key under Delphi

Определяет, были ли данные выровнены или упакованы

Описание:

С $Align On (по умолчанию), сложные типы данных, такие как записи, хранят свои элементы, выровненные по 2, 4 или 8-байтовой границе, соответственно типу данных. Например, поле типа Word будет выровнено по 4-байтовой границе.

С $Align On, значением по умолчанию, вы можете перекрыть эти настройки с помощью опции packed для сложных типов данных.

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

$Align Off указывает Delphi игнорировать выравнивание, и таким образом пакует данные.

Пример кода:

// Declare a packed record
TPackedRecord = Packed Record
name1 : string[4];
floater : single;
name2 : char;
int : Integer;
end;

// Set alignment off

// Declare an unpacked record
// This will get treated as if packed was on
TUnPackedRecord = Record
name1 : string[4];
floater : single;
name2 : char;
int : Integer;
end;

var
alignedRec : TAlignedRecord;
packedRec : TPackedRecord;
unPackedRec : TUnPackedRecord;

begin
ShowMessage(‘Aligned record size = ‘+IntToStr(SizeOf(alignedRec)));
ShowMessage(‘Packed record size = ‘+IntToStr(SizeOf(packedRec)));
ShowMessage(‘UnPacked record size = ‘+IntToStr(SizeOf(unPackedRec)));
end;

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