Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
BDE. Создание алиасов
Категория: Базы данных
Категория: Базы данных
Компонент PopupMenu
Категория: Компоненты
Категория: Компоненты
Вызов контекстного меню в позиции курсора
Категория: Компоненты
Категория: Компоненты
Как в Memo прокрутить текст
Категория: Компоненты
Категория: Компоненты
Сохранение странички в файл из TWebBrowser
Категория: Интернет и Сети
Категория: Интернет и Сети
Listbox - элементы вверх-вниз
Категория: Компоненты
Категория: Компоненты
Подсчитать количество слов в строке
Категория: Текст и строки
Категория: Текст и строки
Группировка TopAdvGrid
Категория: Компоненты
Категория: Компоненты
Прочитать содержимое папки
Категория: Файловая система
Категория: Файловая система
Перекодировка в DBASE
Категория: Базы данных
Категория: Базы данных
Delphi - Справочник: Uses
Uses
|
1 Uses Unit1 {Unit2, ...}; 2 Uses Unit1 in FileName1 {Unit2, ...}; |
Ключевое слово (Unit )
|
Объявляет список модулей (Units), которые будут импортированы
|
Описание:
|
Ключевое слово Uses определяет список одного или более модулей, которые используются текущим модулем, программой или библиотекой. Каждый модуль эффективно импортирует - все public или published подпрограммы и данные. Например, включение SysUtils делает доступными множество подпрограмм манипулирования данными, таких как IntToStr. Порядок модулей в списке важен. Те, что объявлены позже в этом списке имеют приоритет над объявленными раннее. В редкой ситуации, где та же самая подпрограмма или данные определены в двух или более модулях, вы можете принудить Delphi использовать желаемый модуль приписыванием имени модуля к имени подпрограммы или данных. Для модулей, Uses может находиться в разделах Interface и Implementation. Если модули используются только в разделе implementation, то их следует объявлять именно там, это поможет избежать излишних перекомпиляций. Версия 1: стандартная форма - она позволяет Delphi находить модули. Версия 2: определяет Имя файла, включая путь, где модуль постоянно находится. Это применимо только к программам и библиотекам. |
Пример кода: Простой пример
|
// Полный код Модуля.
// -----------------------------------------------------------
// Вы должны поместить этот код в модуль с именем 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.
Результат:
|
Number = 123 |
Примечание:
|
Модуль System включён по умолчанию. |