Результатом компиляции всех Delphi-проектов является исполняемый файл. Для компиляции исходных файлов, входящих в проект, используется команда Project/Compile главного меню интегрированной среды разработчика или комбинация клавиш Ctrl+F9. При этом выполняются следующие действия:
1) компилируются файлы с исходным текстом всех модулей, содержимое которых изменилось после последней компиляции. В результате для каждого файла с исходным текстом модуля создается файл с расширением *.Dcu. Если были внесены изменения в интерфейсную часть модуля, то перекомпилируется не только этот модуль, но и модули, использующие его (через директиву Uses);
2) после того как откомпилированы все модули, входящие в проект, Delphi компилирует файл проекта и создает *.Exe файл с именем, эквивалентным имени проекта.
При сборке проекта (в отличие от компиляции) компилируются все файлы, входящие в проект, вне зависимости от того, были в них внесены изменения после предыдущей компиляции или нет. Для сборки проекта используется команда Project/Build All главного меню интегрированной среды разработчика.
Для выполнения программы используется команда Run/Run главного меню интегрированной среды разработчика или клавиша F9. При вызове этой команды происходят те же действия, что и при вызове команды Project/Compile и Project/Build All, но после компиляции и сборки программа запускается на выполнение.
Установка параметров проекта
Существует два способа управления параметрами проекта. Можно установить параметры с помощью диалоговой панели Project Options, вызываемой с помощью команды Project/Options главного меню интегрированной среды разработчика, а можно воспользоваться директивами компилятора, расположенными в исходном тексте программы.
Диалоговая панель параметров проекта (рис. 17) состоит из нескольких страниц:
Forms – определяет главную форму, порядок создания остальных форм;
Application – задает название приложения, справочный файл, иконку;
Compiler – определяет параметры компилятора;
Linker – определяет параметры компоновщика;
Directories/Conditions – задает рабочие каталоги;
VersionInfo – установка параметров версии проекта;
Packages – позволяет определить, какие пакеты доступны для использования при разработке приложения, и прилинковать их при создании результирующего файла.
В проекте Delphi может быть несколько форм, но одна из форм является главной. Главная форма является исходной формой при запуске приложения и, как правило, первой отражается на экране. На странице Forms можно назначить любую из существующих в проекте форм главной. В списке Autocreate forms указываются названия форм, которые будут создаваться одновременно с главной формой. Формы могут создаваться и в процессе выполнения программы.
Для того чтобы задать название приложения, которое будет отображаться вместе с иконкой, когда окно будет минимизировано, необходимо выбрать параметр Title на странице Application. Здесь же можно задать имя файла, содержащего справочную систему для создаваемого приложения, и иконку, которая будет символизировать приложение.
На странице Compiler задаются параметры компилятора. Наиболее важным из них является использование или отмена использования отладочной информации – этот параметр сильно влияет на размер результирующего *.Exe-файла.
Назначение пунктов главного меню приводится в приложении 2 файла материалов.
Язык Object Pascal
Языком программирования Delphi является Object Pascal. В том, что касается основных программных конструкций, этот язык очень напоминает Pascal седьмой версии среды Borland Pascal. Под программными конструкциями следует понимать структуры, определяющие, в какой последовательности выполняются инструкции в программе. Примерами программных конструкций могут служить условные операторы If-Then-Else, операторы цикла Repeat-Until, а также механизмы вызова методов. Перенос в Delphi программ, написанных на языке Pascal, выполнить не всегда просто. Причина заключается в многочисленных изменениях, внесенных в язык, используемый в среде разработки приложений Borland Pascal.
Object Pascal является объектно-ориентированным языком программирования. Приложение Delphi состоит из объектов. Все элементы управления интерфейса программы (кнопки, списки, панели и т.д.) являются объектами. Объекты обеспечивают выполнение и стандартных, и специфических функций приложения.
Усовершенствованную модель объектного типа Turbo Pascal представляют собой классы Object Pascal. Классы Object Pascal имеют много общего с типом Object языка Turbo Pascal.
Классы
Класс – это определенный пользователем тип данных, который обладает внутренними данными и методами в форме процедур или функций и обычно описывает родовые признаки и способы поведения ряда похожих объектов. Экземпляр типа класс называется объектом. Объекты класса всегда распределяются в куче в отличие от экземпляров объектного типа. Предварительно определенные объекты, используемые в программе (такие как, например, компоненты Delphi), – это в действительности экземпляры классов.
В Object Pascal имеется также тип Object. До введения термина “класс” в языке Pascal существовала двусмысленность определения “объект”, который мог обозначать и тип, и переменную этого типа. В Object Pascal существует четкая граница: класс – это описание, объект – то, что создано в соответствии с этим описанием.
Типкласс– это структура данных, состоящая из полей, методов, свойств. Поля содержат данные определенного типа. Методы – это функции и процедуры, описанные внутри класса и предназначенные для операций над его полями. Свойства – это специальный механизм классов, регулирующий доступ к полям. Свойство описывает один или два метода, которые осуществляют некоторые действия над данными того же типа, что и свойство. Например, обычная кнопка в окне приложения обладает такими свойствами, как цвет, размеры, положение. Для экземпляра класса “кнопка” значения этих атрибутов задаются при помощи свойств – специальных переменных, определяемых ключевым словом Property. Цвет может задаваться свойством Color, размеры – свойствами Width и Height и т.д.
Так как свойство обеспечивает обмен данными с внешней средой, то для доступа к его значению используются специальные методы класса. Например:
Type
TAnObject = Class(TObject)
Function GetColor: TSomeType;
Procedure SetColor (aNewValue: TSomeType);
Property AСolor: TSomeType Read GetColor Write SetColor;
End;
В данном примере доступ к значению свойства AСolor осуществляется через вызовы методов GetColor и SetColor. К методам в явном виде не обращаются. Достаточно записать:
AnObject.Acolor:= Avalue;
Avariable:= AnObject.Acolor;
и компилятор оттранслирует эти операторы в вызовы методов.
Особым видом свойств являются события. События для среды Windows – это специфические сообщения о возникшей ситуации, которые перехватываются и обрабатываются Windows, чтобы обеспечить функциональные возможности интерфейса.
В Object Pascal событие – это свойство процедурного типа, предназначенное для создания пользовательской реакции на то или иное входное воздействие:
Property OnMyEvent: TMyEvent Read FOnMyEvent Write FOnMyEvent;
здесь FOnMyEvent – поле процедурного типа, содержащее адрес некоторого метода. Присвоить такому свойству значение – значит указать объекту адрес метода, который будет вызываться в момент наступления события. Такие методы называют обработчиками событий (обработчик события – фрагмент программы, который выполняется в ответ на определенное изменение в программе или в Windows).
Каждый новый класс в Delphi должен быть объявлен. Для этого используется зарезервированное слово Class. В отличие от других типов, тип Сlass можно объявлять только глобально. Объявление определяет функциональные возможности класса. Объявление классов в модуле производится в разделе объявления типов. Пример объявления класса и объекта в программе на Delphi:
Type
TForm1 = Class(TForm)
Label1: TLabel;
Label2: TLabel;
CloseBtn: TBitBtn;
OkBtn: TBitBtn;
End;
Var Form1: TForm1;
В объявлении типа определен новый класс – TForm1, наследуемый от класса TForm, содержащегося в библиотеке визуальных компонентов. На это указывает зарезервированное слово Class. Данный тип содержит указатели на компоненты, которые были помещены в форму: два компонента Label – объекты типа TLabel (иначе говоря, экземпляры класса TLabel) и два экземпляра класса TBitBtn. Для определения экземпляра нового класса объявлена переменная Form1.
Область видимости идентификатора компонента, объявленного в описании класса, простирается от его объявления до конца определения класса, а также распространяется на все потомки этого класса и на все блоки реализации методов класса. Область видимости идентификатора компонента зависит от атрибута видимости раздела, в котором объявлен этот идентификатор.
В объявлениях типов классов имеются разделы частных (private), общих (public), защищенных (protected) и опубликованных (published) объявлений.
В разделе частных объявлений размещаются поля данных и методы, недоступные за пределами модуля, содержащего объявление данного класса. Данные, описанные в этом разделе, могут обрабатываться только путем вызова методов внутри класса, а также внутри данного модуля.
Поля данных и методы, объявленные в разделе общих объявлений класса, доступны для всех процедур, программный код которых расположен в области видимости данного объекта. В разделе общих объявлений типа класс должны быть объявлены поля данных и методы, к которым будут иметь доступ методы объектов других модулей.
Поля, свойства и методы секции protected также доступны только внутри модуля с описываемым классом, но они доступны в классах, являющихся потомками данного класса, в том числе и в других модулях.
Все классы Object Pascal порождены от единственного родителя – класса TОbject. Этот класс не имеет полей и свойств, но включает в себя методы самого общего назначения, обеспечивающие весь жизненный цикл любых объектов – от их создания до уничтожения. Новый класс можно создать на основе этого базового класса.
В приведенном ниже тексте программы определяется новый тип класса, предназначенного для анализа данных, представляющих собой последовательность результатов измерений.
Type
TSeries = Class(TObject);
Public
{Поля данных}
NumberOf Samples, NumberOfMaterials: Integer;
IsStandard, IsNoStandard: Boolean;
MaterialName: TStringList;
{Методы}
Function CountSamples: Integer;
Function CountMaterials: Integer;
Function Standard: Boolean;
Procedure GetNames;
End;
По результатам серии экспериментов необходимо получить следующую информацию: число измерений, число определенных материалов в серии, какие результаты лежат в пределах допуска и какие вне его. Даны также названия испытываемых материалов. В качестве полей данных нового объекта определяются следующие переменные: два поля целочисленного типа; логическое поле; поле длинной строки для названия.
Для обеспечения доступа к данным пишется программный код, обрабатывающий эти данные. Код реализации этих методов помещается в implementation-секции модуля. В объявлении класса помещается только заголовок процедуры или функции. Процедура GetNames предназначена для определения названия материала. Для решения остальных задач описываются функции.
Принцип наследования приводит к созданию ветвящегося дерева классов, постепенно разрастающегося при перемещении от TObject к его потомкам. Каждый потомок дополняет возможности своего родителя новыми свойствами и передает их своим потомкам.
Для примера на рис. 18 показан небольшой фрагмент дерева Delphi. Класс TPersistent обогащает возможности своего родителя TObject: он умеет сохранять данные в файле и получать их из него, в результате это умеют делать и его потомки. Класс TComponent, в свою очередь, умеет взаимодействовать со средой разработчика и передает это умение своим потомкам. TControl не только способен работать с файлами и средой разработчика, но он уже умеет создавать и обслуживать видимые на экране изображения, а его потомок TWinControl может создавать Windows-окна и т.д.
В состав Delphi входит более 300 различных классов.
