Macros and Conditionals/ru: what changed
Revision 1 to 2. Removed lines have a minus sign; added lines have a plus sign.
| Old | New | Line | |
|---|---|---|---|
| 1 | 1 | # Обзор | |
| 2 | 2 | ||
| 3 | 3 | Макросы можно использовать в путях поиска и именах файлов, чтобы IDE автоматически адаптировала их к целевой платформе. | |
| 4 | 4 | ||
| 5 | 5 | **Build macros** (Макросы сборки) - это макросы, специфичные для проекта/пакета. Они **не** передаются компилятору. Ярким примером является **LCLWidgetType**, который определяется пакетом *LCL* и позволяет выбирать набор виджетов (carbon, gtk, qt, win32, wince, ...). | |
| 6 | 6 | ||
| 7 | 7 | **Conditionals** (Условные определения) - это правила, позволяющие задавать макросы в зависимости от целевой платформы и/или других макросов. Например, вы можете использовать их для определения специальных параметров компоновщика при компиляции для Mac OS X. Они используют язык сценариев типа паскаль, позволяющий определять даже сложные правила. | |
| 8 | 8 | ||
| 9 | 9 | Вы можете задать макросы сборки через [[IDE Window: Compiler Options/ru|Project / Project Options / Compiler Options / Additions and Overrides]]. | |
| 10 | 10 | ||
| 11 | 11 | Вы можете задать условные определения через Project / Project Options / Compiler Options / Other / Conditionals (прим.перев.: в версиях Лазаруса 2.0.х и выше опция находится здесь Project / Project Options / Compiler Options / Custom Options). | |
| 12 | 12 | ||
| 13 | - | ||
| 14 | 13 | <img src="conditional.png" title="conditional.png" width="600" /> | |
| 15 | - | ||
| 16 | - | ||
| 17 | 14 | ||
| 18 | 15 | Макросы сборки и условные определения существуют с Lazarus 0.9.29. | |
| 19 | 16 | ||
| 20 | - | ||
| 21 | - | ||
| 22 | - | ||
| 23 | - | ||
| 17 | + |  | |
| 24 | 18 | ||
| 25 | 19 | # Условные определения | |
| 26 | 20 | ||
| 27 | 21 | В условных определениях используется простой язык сценариев. | |
| 28 | 22 | ||
| 29 | 23 | ## Изменение параметров компилятора с помощью условных определений | |
| 30 | 24 | ||
| 31 | 25 | Сценарий условных определений может задавать некоторые переменные, значения которых используются IDE для параметров компилятора: | |
| 32 | 26 | ||
| 33 | 27 | - **UnitPath**: добавляется к *Other Source Files (-Fu)*. Символы `/` и `\` автоматически преобразуются в разделитель текущего пути. После добавления пути поиска с точкой с запятой макросы заменяются, а относительные пути расширяются каталогом пакета/проекта. | |
| 34 | 28 | - **IncPath**: добавляется к *Include Files (-Fi)*. | |
| 35 | 29 | - **LibraryPath**: добавляется к *Libraries (-Fl)*. | |
| 36 | 30 | - **SrcPath**: добавляется к *Other sources (не используются компилятором, только IDE)*. | |
| 37 | 31 | - **DebugPath**: добавляется к *Debugger path addition (не используется ни компилятором, ни инструментами кода, используется только отладчиком)*. | |
| 38 | 32 | - **LinkerOptions**: добавляется к параметрам компоновщика (-k). Разделители путей не меняются. Относительные пути не расширяются. Макросы заменяются. | |
| 39 | 33 | - **CustomOptions**: добавляется к параметрам компилятора. Разделители путей не меняются. Относительные пути не расширяются. Макросы заменяются. | |
| 40 | 34 | - **OutputDir**: если задано, он заменит текущий каталог вывода. Разделители путей не меняются. Относительные пути не расширяются. Макросы заменяются. | |
| 41 | 35 | ||
| 42 | 36 | Для пакетов существует больше переменных для параметров использования. Эти пути наследуются, то есть добавляются ко всем пакетам/проектам, использующим этот пакет, прямо или косвенно: | |
| 43 | 37 | ||
| 44 | 38 | - **UsageUnitPath**: добавляется к используемым путям *Unit (-Fu)*. Символы `/` и `\` автоматически конвертиуются в текущий разделитель путей. После добавления пути поиска с точкой с запятой макросы заменяются, а относительные пути расширяются каталогом пакета/проекта. | |
| 45 | 39 | - **UsageIncPath**: добавляется к используемым путям *Include (-Fi)*. | |
| 46 | 40 | - **UsageLibraryPath**: добавляется к используемым путям *Library (-Fl)*. | |
| 47 | 41 | - **UsageSrcPath**: добавляется к используемым путям *Source (не используются компилятором, только IDE)*. | |
| 48 | 42 | - **UsageDebugPath**: добавляется к используемым путям *Debugger (не используется ни компилятором, ни инструментами кода, используется только отладчиком)*. | |
| 49 | 43 | - **UsageLinkerOptions**: добавляется к используемым параметрам компоновщика (-k). Разделители путей не меняются. Относительные пути не расширяются. Макросы заменяются. | |
| 50 | 44 | - **UsageCustomOptions**: добавляется к используемым параметрам компилятора. Разделители путей не меняются. Относительные пути не расширяются. | |
| 51 | 45 | ||
| 52 | 46 | ## Синтаксис условных определений | |
| 53 | 47 | ||
| 54 | 48 | ### Поддерживаемые синтактические конструкции | |
| 55 | 49 | ||
| 56 | 50 | - If \<условие\> then \<выражение\>; | |
| 57 | 51 | - If \<условие\> then \<выражение\> else \<выражение\>; | |
| 58 | 52 | - begin \<выражение\>; ... \<выражение\>; end; | |
| 59 | 53 | - \<Переменная\>:=\<условие\>; | |
| 60 | 54 | - \<Переменная\>+=\<условие\>; | |
| 61 | 55 | - \<Комментарий\> //, { }, (* *) | |
| 62 | 56 | - Пробелы, табуляции и переводы строк то же самое. Как и в Паскале, они нужны только для разделения двух идентификаторов/ключевых слов. | |
| 63 | 57 | ||
| 64 | 58 | ### Переменные | |
| 65 | 59 | ||
| 66 | 60 | Переменные задаются просто путем присвоения значения. Есть несколько предопределенных переменных. См. список ниже. | |
| 67 | 61 | ||
| 68 | 62 | Переменные могут быть определены или не определены: | |
| 69 | 63 | ||
| 70 | 64 | ``` pascal | |
| 71 | 65 | if defined(Name) then ... | |
| 72 | 66 | if undefined(Name) then ... | |
| 73 | 67 | undefine(Name); | |
| 74 | 68 | ``` | |
| 75 | 69 | ||
| 76 | 70 | Если переменная задана, она имеет один из трех типов: | |
| 77 | 71 | ||
| 78 | 72 | - none | |
| 79 | 73 | - string | |
| 80 | 74 | - number (int64) | |
| 81 | 75 | ||
| 82 | 76 | Переменная является **false**, если она имеет номер 0 или строку '0'. В противном случае это **true**. Это означает, что переменная без значения истинна и неопределенная переменная также истинна. | |
| 83 | 77 | ||
| 84 | 78 | Вы можете изменить тип переменной с помощью: | |
| 85 | 79 | ||
| 86 | 80 | ``` pascal | |
| 87 | 81 | a := '1'; // строка | |
| 88 | 82 | a := integer(a); // преобразование в число с помощью StrToInt(), в случае неудачи 'a' остается строкой | |
| 89 | 83 | a := int64(a); // преобразование в число с помощью StrToInt6(), в случае неудачи 'a' остается строкой | |
| 90 | 84 | a := string(a); // преобразование в строку | |
| 91 | 85 | ``` | |
| 92 | 86 | ||
| 93 | 87 | ### Константы | |
| 94 | 88 | ||
| 95 | 89 | ``` pascal | |
| 96 | 90 | a := 1234; // десятичная | |
| 97 | 91 | a := $A1B; // шестнадцатеричная | |
| 98 | 92 | a := &127; // восьмеричная | |
| 99 | 93 | a := %101; // двоичная | |
| 100 | 94 | a := '10'; // строковая | |
| 101 | 95 | a := #123; // символьная | |
| 102 | 96 | ``` | |
| 103 | 97 | ||
| 104 | 98 | ### Операторы | |
| 105 | 99 | ||
| 106 | 100 | - **+**: Два числа складываются, иначе они рассматриваются как строки и объединяются. | |
| 107 | 101 | - **\<**, **\>**, **\<=**, **\>=**, **=**, **\<\>**: Два числа сравниваются математически, в противном случае они рассматриваются как строки и сравниваются лексикографически (с учетом регистра). | |
| 108 | 102 | - **not**: Унарный (с изменением знака) логический оператор | |
| 109 | 103 | - **and**, **or**, **xor**: Логические операторы | |
| 110 | 104 | - **(**,**)**: Групповые операторы | |
| 111 | 105 | - **:=**: Присвоение. Не допускается в выражениях. | |
| 112 | 106 | - **+=**: Добавление и назначение. Не допускается в выражениях. | |
| 113 | 107 | ||
| 114 | 108 | Уровни приоритета: | |
| 115 | 109 | ||
| 116 | 110 | - 1 Not и унарный минус | |
| 117 | 111 | - 1 And | |
| 118 | 112 | - 2 Or | |
| 119 | 113 | - 2 XOr | |
| 120 | 114 | - 2 + | |
| 121 | 115 | - 4 = | |
| 122 | 116 | - 4 \<\> | |
| 123 | 117 | - 4 \< | |
| 124 | 118 | - 4 \<= | |
| 125 | 119 | - 4 \> | |
| 126 | 120 | - 4 \>= | |
| 127 | 121 | ||
| 128 | 122 | ## Предопределенные переменные | |
| 129 | 123 | ||
| 130 | 124 | Перед запуском условного сценария среда IDE инициализирует несколько переменных: | |
| 131 | 125 | ||
| 132 | 126 | - **TargetOS**: целевая операционная система проекта, определенная fpc. например 'linux', 'win32', 'darwin', 'freebsd', 'wince'. | |
| 133 | 127 | - **TargetCPU**: целевой процессор проекта, определенный fpc. например 'i386', 'x86_64', 'arm' | |
| 134 | 128 | - **SrcOS**: значение 'win' для всех платформ MS Windows и 'unix' для всех unix-подобных платформ. Значение зависит от TargetOS. | |
| 135 | 129 | - **SrcOS2**: значение 'bsd' для всех платформ, подобных BSD. Значение зависит от TargetOS. | |
| 136 | 130 | - **True**: значение 1 | |
| 137 | 131 | - **False**: значение 0 | |
| 138 | 132 | - все макросы сборки, определенные в текущем проекте. | |
| 139 | 133 | - все макросы сборки, определенные используемыми пакетами. Это означает, что если в проекте не определено значение для макроса пакета, будет использоваться значение условных операторов используемого пакета. | |
| 140 | 134 | ||
| 141 | 135 | ## Предопределенные функции | |
| 142 | 136 | ||
| 143 | 137 | - **Defined(Variable)**: возвращает 1 (истина), если переменная определена, иначе 0 (ложь). Пример, `if Defined(Macro1) then ;` | |
| 144 | 138 | - **Undefine(Variable)**: отменяет определение переменной. Пример: `Undefine(A);` | |
| 145 | 139 | - **Int64(expression)**: возвращает значение выражения int64. Пример: `i:=int64('3');` | |
| 146 | 140 | - **Integer(expression)**: возвращает целочисленное значение выражения. Пример: `i:=integer('3');` | |
| 147 | 141 | - **String(expression)**: возвращает строковое значение выражения. Пример: `s:=string(3);` | |
| 148 | 142 | - **GetIDEValue(string)**: См. [[IDE Macros in paths and filenames/ru|IDE macros]] | |
| 149 | 143 | - GetIDEValue('OS'): возвращает ОС, с которой была скомпилирована IDE (начиная с 1.0). | |
| 150 | 144 | - GetIDEValue('CPU'): возвращает процессор, с которым была скомпилирована IDE (начиная с 1.0). | |
| 151 | 145 | - GetIDEValue('SrcOS'): SrcOS IDE (начиная с 1.0). | |
| 152 | 146 | - GetIDEValue('SrcOS2'): SrcOS2 IDE (начиная с 1.0). | |
| 153 | 147 | - GetIDEValue('LCLWidgeType'): платформа LCL среды IDE, которая может отличаться от проекта. lazbuild возвращает win32, carbon или gtk2 в зависимости от ОС (начиная с 1.0). | |
| 154 | 148 | - **GetEnv(string)**: возвращает переменную среды. Например, GetEnv('HOME') возвращает в Linux домашний каталог пользователя (начиная с 1.0). | |
| 155 | 149 | - **GetProjValue(string)**: возвращает значение проекта. | |
| 156 | 150 | - GetProjValue('FPC_FULLVERSION'): возвращает FPC_FULLVERSION, полученный из компилятора проекта. Версия является целым числом, например 20701 (начиная с 1.3). | |
| 157 | 151 | ||
| 158 | 152 | # Порядок вычисления макроса | |
| 159 | 153 | ||
| 160 | 154 | 1. берутся значения текущего проекта | |
| 161 | 155 | 2. если в проекте не определены значения для TargetOS, TargetCPU, IDE устанавливает значения по умолчанию | |
| 162 | 156 | 3. SrcOS и SrcOS2 вычисляются из TargetOS | |
| 163 | 157 | 4. вычисляются условные выражения используемых пакетов. Если пакет A использует пакет B, то условные выражения B вычисляются перед условными операторами A. | |
| 164 | 158 | 5. Каждый условный сценарий начинается со значений проекта. | |
| 165 | 159 | - Если проект не определяет значение для макроса пакета, используется результат используемого пакета. | |
| 166 | 160 | - Сценарий может изменять любой макрос во время выполнения, но используются только макросы сборки и встроенные макросы. Например, вы можете установить для TargetOS другое значение, но это не повлияет ни на какой другой сценарий, ни на какой путь поиска с использованием \$(TargetOS), даже на путь поиска самого пакета. | |
| 167 | 161 | - Если два пакета определяют один и тот же макрос сборки, то оба могут изменять значение (если только проект не устанавливает значение). Точный эффект зависит от порядка зависимости. | |
| 168 | 162 | 6. Макросы IDE по умолчанию используются последними. | |
| 169 | 163 | ||
| 170 | 164 | # Примеры | |
| 171 | 165 | ||
| 172 | 166 | ## Добавление флага компилятора для цели Linux | |
| 173 | 167 | ||
| 174 | 168 | ``` pascal | |
| 175 | 169 | if TargetOS = 'linux' then | |
| 176 | 170 | CustomOptions := '-dUseCThreads'; | |
| 177 | 171 | ``` | |
| 178 | 172 | ||
| 179 | 173 | Примечание: | |
| 180 | 174 | ||
| 181 | 175 | - TargetOS - это предопределенный макрос IDE. | |
| 182 | 176 | - CustomOptions - это результирующая переменная, используемая IDE. | |
| 183 | 177 | - Идентификаторы нечувствительны к регистру, а оператор **=**(равно) - нет. Макрос TargetOS использует тот же регистр, что и компилятор, но в настоящее время все в нижнем регистре. | |
| 184 | 178 | - IDE автоматически добавляет первое пространство при добавлении пользовательских параметров. | |
| 185 | 179 | - При использовании в пакете вышеуказанное будет применяться только к параметрам, используемым для компиляции пакета, но не к проекту, использующему пакет. | |
| 186 | 180 | ||
| 187 | 181 | ## Добавление некоторых параметров компоновщика для цели Mac OS X | |
| 188 | 182 | ||
| 189 | 183 | Компилятор использует для *Mac OS X* значение 'darwin' для *TargetOS*. | |
| 190 | 184 | ||
| 191 | 185 | ``` pascal | |
| 192 | 186 | if TargetOS = 'darwin' then begin | |
| 193 | 187 | LinkerOptions += ' -framework Cocoa'; | |
| 194 | 188 | if TargetCPU = 'i386' then | |
| 195 | 189 | LinkerOptions += ' -framework OpenGL'; | |
| 196 | 190 | end; | |
| 197 | 191 | ``` | |
| 198 | 192 | ||
| 199 | 193 | Примечание: | |
| 200 | 194 | ||
| 201 | 195 | - TargetOS и TargetCPU - это предопределенные в среде IDE макросы. | |
| 202 | 196 | - Оператор **+=** добавляет строку или число. | |
| 203 | 197 | - При добавлении нескольких опций вы должны добавить пробел между опциями. | |
| 204 | 198 | - IDE автоматически добавляет первое пространство при добавлении параметров компоновщика. | |
| 205 | 199 | - Вы можете вложить **begin**..**end** точно так же, как в Паскаль. | |
| 206 | 200 | - Если выполняются оба условия, **LinkerOptions** будет содержать значение ' -framework Cocoa -framework OpenGL'. | |
| 207 | 201 | - Среда IDE автоматически добавляет параметр -k при передаче параметров компоновщика компилятору. | |
| 208 | 202 | - Вышеуказанное работает только для условных выражений проекта. | |
| 209 | 203 | ||
| 210 | 204 | ## Добавление некоторых параметров компоновщика для Mac OS X для всех проектов с использованием пакета | |
| 211 | 205 | ||
| 212 | 206 | Пакеты имеют два разных набора опций. Набор, используемый для компиляции самого пакета, и параметры, добавленные ко всем проектам/пакетам, использующим пакет. Вам необходимо изменить параметр **usage** пакета: | |
| 213 | 207 | ||
| 214 | 208 | ``` pascal | |
| 215 | 209 | if TargetOS = 'darwin' then begin | |
| 216 | 210 | UsageLinkerOptions += ' -framework Cocoa'; | |
| 217 | 211 | if TargetCPU = 'i386' then | |
| 218 | 212 | UsageLinkerOptions += ' -framework OpenGL'; | |
| 219 | 213 | end; | |
| 220 | 214 | ``` | |
| 221 | 215 | ||
| 222 | 216 | ## Добавление опции в пакет | |
| 223 | 217 | ||
| 224 | 218 | Если ваш пакет предоставляет некоторые дополнительные части, например возможность использовать opengl, вы можете определить макрос сборки. Далее объясняется, как это настроить шаг за шагом: | |
| 225 | 219 | ||
| 226 | 220 | Допустим, ваш пакет называется *Pkg1* и позволяет включить поддержку opengl, скомпилировав его с флагом **-dEnableOpenGL**. В пакете должен быть логический параметр **Pkg1_UseOpenGL** со значениями 'True' и 'False'. | |
| 227 | 221 | ||
| 228 | 222 | Откройте редактор пакетов 'pkg1', нажмите *compiler options* (Параметры компилятора), выберите страницу *IDE Macros* (Макросы IDE). | |
| 229 | 223 | ||
| 230 | 224 | Нажмите кнопку слева **+**, чтобы добавить новый макрос. Он будет называться 'Pkg1_Macro1'. Щелкните узел дерева, чтобы переименовать его в 'Pkg1_UseOpenGL'. | |
| 231 | 225 | ||
| 232 | 226 | Нажмите среднюю кнопку **+**, чтобы добавить новое значение макроса. Он будет называться 'Value1'. Щелкните узел дерева, чтобы переименовать его в 'True'. Повторите это для значения 'False'. | |
| 233 | 227 | ||
| 234 | 228 | Добавьте следующий код в текстовое поле Conditionals (Compiler Options / Other / Conditionals): | |
| 235 | 229 | ||
| 236 | 230 | ``` pascal | |
| 237 | 231 | if Pkg1_UseOpenGL = 'True' then | |
| 238 | 232 | CustomOptions := '-dEnableOpenGL'; | |
| 239 | 233 | ``` | |
| 240 | 234 | ||
| 241 | - | ||
| 242 | - | ||
| 243 | - | ||
| 244 | - | ||
| 235 | + |  | |
| 245 | 236 | ||
| 246 | 237 | Примечание: | |
| 247 | 238 | ||
| 248 | 239 | - Значение 'True' чувствительно к регистру. Поскольку значение обычно выбирается из поля со списком, вероятность опечаток отсутствует. | |
| 249 | 240 | - Если пользователь не установил никакого значения для макроса, переменная 'Pkg1_UseOpenGL' не определена, а результат выражения - 'false'. | |
| 250 | 241 | ||
| 251 | 242 | ## Добавление режима release/debug | |
| 252 | 243 | ||
| 253 | 244 | ### Режим release/debug для вашего проекта и всех ваших пакетов | |
| 254 | 245 | ||
| 255 | 246 | Примечание: для этого требуется Lazarus 0.9.31 или выше. | |
| 256 | 247 | ||
| 257 | 248 | В параметрах компилятора проекта (Project / Project Options / Compiler Options / Build modes) добавьте режим сборки *Release*. Добавление этого режима сборки автоматически активирует его, поэтому все изменения параметров компилятора теперь выполняются только в этом режиме сборки. | |
| 258 | 249 | ||
| 259 | 250 | В "Set Macro Values" (Установить значения макроса) щелкните левый столбец в последней строке "(none)". Установите его в "MyPackageOptions". Примечание: его нет в поле со списком. | |
| 260 | 251 | ||
| 261 | 252 | Установите его значение в опции. Например, "-O3". | |
| 262 | 253 | ||
| 263 | - | ||
| 264 | - | ||
| 265 | - | ||
| 266 | - | ||
| 254 | + |  | |
| 267 | 255 | ||
| 268 | 256 | Этот макрос можно использовать в параметрах компилятора проекта и во всех пакетах. | |
| 269 | 257 | ||
| 270 | 258 | Для каждого пакета выполните: Откройте параметры компилятора пакета, перейдите на страницу *Other*. Добавьте в *Custom options* текст \$(MyPackageOptions). | |
| 271 | 259 | ||
| 272 | 260 | ### Специальный режим release/debug для одного пакета | |
| 273 | 261 | ||
| 274 | 262 | Допустим, нормальный режим - это режим debug, и вам нужен другой режим для release. | |
| 275 | 263 | ||
| 276 | 264 | Откройте редактор пакетов 'pkg1', нажмите *compiler options*, выберите страницу *Build Macros*. | |
| 277 | 265 | ||
| 278 | 266 | В разделе *Build macros* нажмите кнопку слева **+**, чтобы добавить новый макрос. Он будет называться 'Pkg1_Macro1'. Щелкните узел дерева, чтобы переименовать его в 'Pkg1_Release'. | |
| 279 | 267 | ||
| 280 | 268 | Нажмите среднюю кнопку **+**, чтобы добавить новое *значение* макроса. Он будет называться 'Value1'. Щелкните узел дерева, чтобы переименовать его в 'True'. Повторите это для значения 'False'. | |
| 281 | 269 | ||
| 282 | 270 | Добавьте следующий код в текстовое поле Conditionals: | |
| 283 | 271 | ||
| 284 | 272 | ``` pascal | |
| 285 | 273 | if Pkg1_Release = 'True' then | |
| 286 | 274 | // режим release | |
| 287 | 275 | CustomOptions := '-O3' | |
| 288 | 276 | else | |
| 289 | 277 | // режим debug | |
| 290 | 278 | CustomOptions := '-Sa Ctroi'; | |
| 291 | 279 | ``` | |
| 292 | 280 | ||
| 293 | 281 | Примечание: | |
| 294 | 282 | ||
| 295 | 283 | - Значение 'True' чувствительно к регистру. Поскольку значение обычно выбирается из поля со списком, вероятность опечаток отсутствует. | |
| 296 | 284 | - Если пользователь не установил никакого значения для макроса, переменная 'Pkg1_Release' не определена, а результат выражения - false. | |
| 297 | 285 | ||
| 298 | 286 | ## Добавление макроса для путей поиска для работы с разными платформами | |
| 299 | 287 | ||
| 300 | 288 | Допустим, ваш пакет называется *Pkg1* и использует Windows GDI в MS Windows и X11 в Linux и BSD. Независимые от платформы модули находятся в основном каталоге пакета, и вы создали два подкаталога 'gdi' и 'x11', содержащие зависящие от платформы модули: | |
| 301 | 289 | ||
| 302 | 290 | ``` bash | |
| 303 | 291 | /path/of/your/package/pkg1/ | |
| 304 | 292 | pkg1.lpk | |
| 305 | 293 | pkg1.pas | |
| 306 | 294 | generalunit.pas | |
| 307 | 295 | gdi/ | |
| 308 | 296 | backend.pas | |
| 309 | 297 | x11/ | |
| 310 | 298 | backend.pas | |
| 311 | 299 | ``` | |
| 312 | 300 | ||
| 313 | 301 | Модуль *backend* в *gdi* следует использовать в Win32, Win64 и WinCE, а в Linux и FreeBSD следует использовать модуль *backend* в *x11*. Это означает, что путь поиска *Other unit files (-Fu)* (Другие файлы модулей (-Fu)) должен быть адаптирован в зависимости от целевой ОС. Ниже описывается, как настроить это шаг за шагом: | |
| 314 | 302 | ||
| 315 | 303 | Откройте редактор пакетов 'pkg1', щелкните параметры компилятора, выберите страницу *Build Macros* (Сборка макросов). | |
| 316 | 304 | ||
| 317 | 305 | Нажмите кнопку слева **+**, чтобы добавить новый макрос. Он будет называться 'Pkg1_Macro1'. Щелкните узел дерева, чтобы переименовать его в 'Pkg1_Backend'. | |
| 318 | 306 | ||
| 319 | 307 | Нажмите среднюю кнопку **+**, чтобы добавить новое значение макроса. Он будет называться 'Value1'. Щелкните узел дерева, чтобы переименовать его в 'gdi'. Повторите это для значения 'x11'. | |
| 320 | 308 | ||
| 321 | 309 | Добавьте следующий код в текстовое поле Conditionals: | |
| 322 | 310 | ||
| 323 | 311 | ``` pascal | |
| 324 | 312 | // выбираем значение для Pkg1_Backend в зависимости от TargetOS | |
| 325 | 313 | if undefined(Pkg1_Backend) then begin | |
| 326 | 314 | if SrcOS='win' then | |
| 327 | 315 | Pkg1_Backend:='gdi' | |
| 328 | 316 | else | |
| 329 | 317 | Pkg1_Backend:='x11'; | |
| 330 | 318 | end; | |
| 331 | 319 | ``` | |
| 332 | 320 | ||
| 333 | 321 | Макрос **\$(Pkg1_Backend)** станет доступным после нажатия кнопки ОК. Итак, нажмите 'Ok', чтобы закрыть параметры компилятора, и откройте его снова, чтобы использовать его в пути поиска *Other unit files (-Fu)* (Другие файлы модулей (-Fu)). | |
| 334 | 322 | ||
| 335 | - | ||
| 336 | - | ||
| 337 | - | ||
| 338 | - | ||
| 323 | + |  | |
| 339 | 324 | ||
| 340 | 325 | Примечание: | |
| 341 | 326 | ||
| 342 | 327 | - Пользователь может изменить значение Pkg1_Backend. Поэтому рекомендуется заключить настройку в *if undefined(Pkg1_Backend)*. | |
| 343 | 328 | - Вместо макроса SrcOS вы можете использовать `if (TargetOS='win32') or (TargetOS='win64') or (TargetOS='wince') then ...` | |
| 344 | 329 | ||
| 345 | 330 | --- | |
| 346 | 331 | *From the Free Pascal wiki, page "Macros and Conditionals/ru", as it stood on 2021-01-24 after a change by Zoltanleo, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).* |
