Unit/ru: what changed
Revision 0 to 1. Removed lines have a minus sign; added lines have a plus sign.
Title: Unit/ru
| Old | New | Line | |
|---|---|---|---|
| 1 | + | Назад к [[Reserved words/ru|Зарезервированным словам]]. | |
| 2 | + | ||
| 3 | + | A `Unit` - это файл [[Source code|исходного кода]] (или [[Binary|двоичный]], скомпилированный из этого [[File|файла]]), который был написан с использованием языка программирования [[Pascal]] и разработан как отдельный модуль в [[Application|Приложении]] или [[Object module|Объектном модуле]]. Слово `Unit` - это [[Reserved word/ru|зарезервированное слово]]. | |
| 4 | + | ||
| 5 | + | ## Назначение | |
| 6 | + | ||
| 7 | + | Модуль может использоваться там, где функциональность должна быть предоставлена прикладной программе или другим модулям. Он позволяет писать код, который выполняет эту функцию один раз и может использоваться во многих местах. Это может снизить вероятность ошибок и увеличить повторное использование кода. | |
| 8 | + | ||
| 9 | + | Двоичный модуль может использоваться, когда автор модуля желает предоставить определенные функции для использования в [[Program|программе]] языка Паскаль, но не желает предоставлять исходный код, который выполняет эти функции. | |
| 10 | + | ||
| 11 | + | Модули также использовались в более старых версиях Паскаля, когда на компьютерах с ограниченными ресурсами было необходимо иметь возможность загружать [[Routine|подпрограммы]] по мере необходимости, а не хранить каждую подпрограмму [[Executable program|исполняемой программы]] в памяти все время. | |
| 12 | + | ||
| 13 | + | Модуль, которому требуется доступ, например, [[Procedure|процедуры]] и [[Data type|типы данных]] в другом модуле, должен указывать те модули, к которым он должен получить доступ, в разделе [[Uses|uses]] (но связывание выполняется без необходимости писать make-файл, как в C). | |
| 14 | + | ||
| 15 | + | Модуль также можно использовать для объявления серии глобальных [[Const|констант]] или [[Global variables|переменных]] для использования всем приложением без фактического содержания исполняемого кода. Это похоже на [[Keyword/ru|ключевое слово]] `common` в языке программирования [[Fortran]]. | |
| 16 | + | ||
| 17 | + | ## Формат | |
| 18 | + | ||
| 19 | + | Модуль задается с помощью ключевого слова `unit`, за которым следует идентификатор модуля. Идентификатор модуля (в следующем примере имя модуля - «minimalunit») должен соответствовать имени файла, в котором он записан. Минимальный рабочий пример (который ничего не делает): | |
| 20 | + | ||
| 21 | + | ``` pascal | |
| 22 | + | unit minimalunit; | |
| 23 | + | interface | |
| 24 | + | // здесь функционал, которые модуль публикует открыто | |
| 25 | + | implementation | |
| 26 | + | // здесь идет реализация предлагаемого функционала и, | |
| 27 | + | // возможно, внутреннего функционала (видимого только внутри модуля) | |
| 28 | + | end. | |
| 29 | + | ``` | |
| 30 | + | ||
| 31 | + | где часть после раздела [[Interface|interface]] соответствует `public`-части других языков и раздел [[Implementation|implementation]] делает это для `private`. | |
| 32 | + | ||
| 33 | + | Более продвинутая базовая структура: | |
| 34 | + | ||
| 35 | + | ``` pascal | |
| 36 | + | unit advancedunit; | |
| 37 | + | interface | |
| 38 | + | ||
| 39 | + | implementation | |
| 40 | + | ||
| 41 | + | initialization | |
| 42 | + | // здесь может быть размещен код, | |
| 43 | + | // который выполняется при загрузке модуля | |
| 44 | + | finalization | |
| 45 | + | // код, выполняемый по окончании программы | |
| 46 | + | ||
| 47 | + | end. | |
| 48 | + | ``` | |
| 49 | + | ||
| 50 | + | Необязательные разделы [[Initialization|initialization]] и [[Finalization|finalization]] могут следовать за кодом, который выполняется в начале/конце программы. | |
| 51 | + | ||
| 52 | + | ### Подробный пример модуля | |
| 53 | + | ||
| 54 | + | Пошаговый пример: | |
| 55 | + | ||
| 56 | + | ``` pascal | |
| 57 | + | unit randomunit; | |
| 58 | + | // этот модуль что-то делает | |
| 59 | + | ||
| 60 | + | // public - - - - - - - - - - - - - - - - - - - - - - - - - | |
| 61 | + | interface | |
| 62 | + | ||
| 63 | + | type | |
| 64 | + | // тип TRandomNumber становится видимым глобально, | |
| 65 | + | // поскольку он где-то подключен (в операторе uses) | |
| 66 | + | TRandomNumber = integer; | |
| 67 | + | ||
| 68 | + | // конечно, возможны блоки const и var, также | |
| 69 | + | // список сигнатур процедур/функций делает | |
| 70 | + | // их доступными вовне модуля | |
| 71 | + | function getRandomNumber(): TRandomNumber; | |
| 72 | + | ||
| 73 | + | // реализация функции/процедуры | |
| 74 | + | // не должна находиться в разделе interface | |
| 75 | + | ||
| 76 | + | // private - - - - - - - - - - - - - - - - - - - - - - - - - | |
| 77 | + | implementation | |
| 78 | + | ||
| 79 | + | var | |
| 80 | + | // var разделе private | |
| 81 | + | // => может изменяться только внутри этого модуля | |
| 82 | + | chosenRandomNumber: TRandomNumber; | |
| 83 | + | ||
| 84 | + | function getRandomNumber(): TRandomNumber; | |
| 85 | + | begin | |
| 86 | + | // возвращаем значение | |
| 87 | + | getRandomNumber := chosenRandomNumber; | |
| 88 | + | end; | |
| 89 | + | ||
| 90 | + | // раздел initialization - это часть, выполняемая | |
| 91 | + | // при загрузке/включении модуля | |
| 92 | + | initialization | |
| 93 | + | begin | |
| 94 | + | // выбираем наше случайное число | |
| 95 | + | chosenRandomNumber := 3; | |
| 96 | + | // выбранное броском игральной кости, | |
| 97 | + | // гарантированно случайное | |
| 98 | + | end; | |
| 99 | + | ||
| 100 | + | // finalization запускается по окончанию программы | |
| 101 | + | finalization | |
| 102 | + | begin | |
| 103 | + | // этот модуль говорит "пока" по завершению программы | |
| 104 | + | writeln('пока'); | |
| 105 | + | end; | |
| 106 | + | end. | |
| 107 | + | ``` | |
| 108 | + | ||
| 109 | + | Чтобы подключить модуль, просто используйте оператор `uses`. | |
| 110 | + | ||
| 111 | + | ``` pascal | |
| 112 | + | program chooseNextCandidate; | |
| 113 | + | uses | |
| 114 | + | // подключение модуля | |
| 115 | + | randomunit; | |
| 116 | + | ||
| 117 | + | begin | |
| 118 | + | writeln('следующий кандидат: №. ' + getRandomNumber()); | |
| 119 | + | end. | |
| 120 | + | ``` | |
| 121 | + | ||
| 122 | + | При компиляции FPC проверяет эту программу на зависимости модулей. Он должен быть в состоянии найти модуль "randomunit". | |
| 123 | + | ||
| 124 | + | Самый простой способ удовлетворить это - иметь модуль, имя которого совпадает с именем файла, в котором он записан (добавление `.pas` - это нормально и приветствуется). Файл модуля может находиться в том же каталоге, где находится исходник программы, или в пути к модулю, по которым FPC ищет модули. | |
| 125 | + | ||
| 126 | + | ## Приоритетность модуля | |
| 127 | + | ||
| 128 | + | Когда в разделе uses описано несколько модулей, могут возникнуть конфликты с идентификаторами (процедурами, типами, функциями и т.д.), которые имеют одно и то же имя в нескольких модулях. В FreePascal последний упомянутый модуль становится «победителем» и предоставляет код для модуля, в который он включен. | |
| 129 | + | ||
| 130 | + | Если вы хотите добиться другого поведения, вы можете явно добавить *`unitname.`*`identifier`, чтобы указать модуль, который вы хотите использовать, или изменить порядок модулей. Первый вариант часто оказывается наиболее очевидным. | |
| 131 | + | ||
| 132 | + | ``` pascal | |
| 133 | + | unit interestCalculations; | |
| 134 | + | ||
| 135 | + | interface | |
| 136 | + | ||
| 137 | + | type | |
| 138 | + | basisType = currency; | |
| 139 | + | ||
| 140 | + | implementation | |
| 141 | + | ||
| 142 | + | end. | |
| 143 | + | ``` | |
| 144 | + | ||
| 145 | + | Явное указание объявленного модуля: | |
| 146 | + | ||
| 147 | + | ``` Pascal | |
| 148 | + | program interestCalculator; | |
| 149 | + | ||
| 150 | + | uses | |
| 151 | + | interestCalculations; | |
| 152 | + | ||
| 153 | + | type | |
| 154 | + | // мы уже загрузили объявление "basicType" | |
| 155 | + | // из модуля InterestCalculations, но мы снова | |
| 156 | + | // переобъявляем его здесь ("затенение") | |
| 157 | + | basisType = extended; | |
| 158 | + | ||
| 159 | + | var | |
| 160 | + | // последнее объявление приоритетнее: originalCapital является расширенным | |
| 161 | + | originalCapital: basisType; | |
| 162 | + | // указываем область, в которой будет использоваться корректное объявление | |
| 163 | + | monthlyMargin: interestCalculations.basisType; | |
| 164 | + | ||
| 165 | + | begin | |
| 166 | + | end. | |
| 167 | + | ``` | |
| 168 | + | ||
| 169 | + | Обратите внимание, что модуль `interestCalculations` по-прежнему будет выполнять свои собственные вычисления со своим собственным `basisType` (здесь [[Currency/ru|currency]]). Вы можете изменять («тень») объявления только в текущей [[Scope|области видимости]] (и по убыванию). | |
| 170 | + | ||
| 171 | + | ## См.также | |
| 172 | + | ||
| 173 | + | - [“Unit scope” in the “reference guide”](https://www.freepascal.org/docs-html/ref/refsu91.html) (FPC HTML documentation) | |
| 174 | + | - [“Compiling a unit” in the “users's guide”](https://www.freepascal.org/docs-html/user/userse11.html) (FPC HTML documentation) | |
| 175 | + | - [§ “Units” in the WikiBook “Pascal Programming”](https://en.wikibooks.org/wiki/Pascal_Programming/Units) | |
| 176 | + | ||
| 177 | + | --- | |
| 178 | + | *From the Free Pascal wiki, page "Unit/ru", as it stood on 2022-08-06 after a change by Kai Burghardt, 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).* |
