Лабораторная работа: Создание компиляция и отладка простого приложения

Uses

Forms,

Unit 1 in ‘ Unit 1. pas’ { Form 1}, Unit 2 in ‘ Unit 2. pas’ { Form 2 };

В этом предложении перечисляются модули, загружаемые программой. Первый модуль Forms является системным, а следующие - модулями разработанными самостоятельно форм. Данный пример подразумевает, что в проекте были созданы две формы с именами Form1, Form2 в модулях Unit1, Unit2. Заключенные в фигурные скобки название форм представляют собой комментарии.

3) Следующая строка текста - {$ R *. res } - представляет собой директиву компилятора, связанную с использованием файлов ресурсов. Указанный файл должен быть файлом ресурсов Windows. По умолчанию используется расширение. RES для файлов ресурсов.

4) Первый оператор в теле программы Application. Initialize ; - инициализирует приложение, следующий за ним оператор Application. CreateForm (TForm 1, Form 1); и Application. CreateForm (TForm 2, Form 2); - создают объекты формы1 и формы2, последний оператор Application.ru n ; - начинает выполнение приложения.

Общая структура файла модуля:

Unit < имя модуля >;

Interface // Открытый интерфейс модуля (могут помещаться списки подключаемых модулей, объявление типов, констант, переменных, функций и процедур, к которым будет доступ из других модулей)

Implementation // Реализация модуля (могут помещаться списки подключаемых модулей, объявление типов, констант, переменных, функций и процедур, к которым не будет доступа из других модулей)

Initialization // ( Необязательный раздел - операторы выполняются один раз при первом обращении к модулю)

Finalization // ( Необязательный раздел - операторы выполняются при любом завершении работы модуля)

End.

Рассмотрим теперь текст модуля с пустой формой:

Unit Unit1;

Interface // Открытый интерфейс модуля

Uses { Список подключаемых модулей }

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;

Type { Объявление класса формы }

TForm1 = class ( TForm)

Private // закрытый раздел класса

Public // открытый раздел класса

End;

Var

Form 1: TForm1;

Implementation // Реализация модуля

{$ R *. dfm }