Delphi-Help

Implementation

Печать
Рейтинг пользователей: / 0
ХудшийЛучший 

Implementation

Описание

Unit UnitName;
Interface
Declarations...
Implementation
Declarations...
End;

Ключевое слово Implementation начинает активный раздел кода модуля - где объявления интерфейса реализовываются.
Модуль Delphi кажется внешним от его объявлений в разделе Interface. Внутренне, они реализованы в разделе Implementation. Только изменения в секции интерфейс вызовут перекомпиляцию внешних модулей.
В пределах раздела Implementation, функции и процедуры, определенные в разделе Interface закодированы. Этот раздел может иметь свои собственные функции, процедуры и данные к тем, что уже определенны в Interface. Они являются частными по отношению к модулю.
Он может также иметь свой собственный раздел Uses, где модули определяются как используемые только в секции Implementation. Они определены к выполнению в данном модуле, и внешние пользователи модуля не должны знать о них.

Пример кода

// Весь код модуля.
// -----------------------------------------------------------
// Вы должны поместить этот код в модуль называемый Unit1 с формой
// называемой Form1 которая имеет событие OnCreate названное FormCreate.
unit Unit1;

interface         // Определяет внешнюю видимость этого модуля

uses
Forms;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
end;
var
Form1: TForm1;

Implementation // Осуществляет Интерфейс этого модуля
{$R *.dfm}       // Включить определения формы

uses             // Частные модули
Dialogs;
var              // Частные переменные
msg : string;
const            // Частные константы
MSG_TEXT = 'Hello World';
// Частная подпрограмма - не предопределенный в разделе Интерфейса
procedure SayHello;
begin
// Скажем привет Миру
msg := MSG_TEXT;
ShowMessage(msg);
end;
// Подпрограмма, предопределенная в разделе Интерфейса
procedure TForm1.FormCreate(Sender: TObject);
begin
// Сказать привет
SayHello;
end;
end.

Hello World

Примечание

Авторизация



Счетчики