Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>

    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  BDE. Создание алиасов
   Категория: Базы данных
  Компонент PopupMenu
   Категория: Компоненты
  Как в Memo прокрутить текст
   Категория: Компоненты
  Сохранение странички в файл из TWebBrowser
   Категория: Интернет и Сети
  Listbox - элементы вверх-вниз
   Категория: Компоненты
  Подсчитать количество слов в строке
   Категория: Текст и строки
  Группировка TopAdvGrid
   Категория: Компоненты
  Прочитать содержимое папки
   Категория: Файловая система
  Перекодировка в DBASE
   Категория: Базы данных

Delphi - Справочник: Uses

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 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 включён по умолчанию.

  << Вернуться