Объявляет список модулей (Units), которые будут импортированы
unit
1 Uses Unit1 {Unit2, ...};
2 Uses Unit1 in FileName1 {Unit2, ...};
Описание
Ключевое слово Uses определяет список одного или более модулей, которые используются текущим модулем, программой или библиотекой.
Каждый модуль эффективно импортирует - все public или published подпрограммы и данные.
Например, включение SysUtils делает доступными множество подпрограмм манипулирования данными, таких как IntToStr.
Порядок модулей в списке важен. Те, что объявлены позже в этом списке имеют приоритет над объявленными раннее. В редкой ситуации, где та же самая подпрограмма или данные определены в двух или более модулях, вы можете принудить Delphi использовать желаемый модуль приписыванием имени модуля к имени подпрограммы или данных.
Для модулей, Uses может находиться в разделах Interface и Implementation.
Если модули используются только в разделе implementation, то их следует объявлять именно там, это поможет избежать излишних перекомпиляций.
Версия 1: стандартная форма - она позволяет Delphi находить модули.
Версия 2: определяет Имя файла, включая путь, где модуль постоянно находится. Это применимо только к программам и библиотекам.
Примечания
Модуль System включён по умолчанию.
Похожие команды
Implementation Начинает раздел исполняемого кода в модуле
Interface Используется для внешних определений модуля, и как скелет класса
Unit
Пример кода : Простой пример
// Полный код Модуля. // ----------------------------------------------------------- //
Вы должны поместить этот код в модуль с именем Unit1 и с формой //
названную Form1, которая имеет событие OnCreate названное FormCreate.
unit Unit1;
interface // Определяет внешнее представление этого модуля Uses
Forms;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
end;
var
Form1: TForm1;
Implementation // Выполняет Interface этого
модуля
{$R *.dfm} // Включение определений формы Uses // Частные модули
Dialogs, SysUtils; // Частная подпрограмма - не предопределенный в
разделе Interface
procedure SayNumber(number : Integer);
begin // Показываем число как строку //
Обратите внимание, что мы явно указываем модуль подпрограммы IntToStr: //
это модуль SysUtils
ShowMessage('Number = '+SysUtils.IntToStr(number));
end; // Подпрограмма, предопределенная в разделе
Interface
procedure TForm1.FormCreate(Sender: TObject);
begin // Показываем число
SayNumber(123);
end;
end.
