Реферат: Программирование. Delphi

В каждом из этих классов определен метод info. В базовом классе при помощи директивы virtual метод info объявлен виртуальным. Объявление метода виртуальным дает возможность дочернему классу произвести замену виртуального метода своим собственным. В каждом дочернем классе определен свой метод info, который замещает соответствующий метод родительского класса (метод порожденного класса, замещающий виртуальный метод родительского класса, помечается директивой override). Ниже приведено определение метода info для каждого класса.

function TPerson.info: string;

begin

result=’’ ;

end;

function TStud.info: string;

begin

result :=fnam e+' г p.' +IntTostr(fgr);

end;

function TProf. info: string;

begin

result :=fname+' каф. '+fdep;

end;

В программе список людей можно представить массивом объектов класса TPerson.

list:array[1..SZL ]of TPerson;

Замечание

Здесь следует вспомнить, что объект - это указатель.

Объявить подобным образом список можно потому, что Object Pascal позволяет указателю на родительский класс присвоить значение указателя на дочерний класс. Поэтому элементами массива list могут быть как объекты классаTStud, так и объекты классаTprof.

Вывод списка можно осуществить применением метода info к элементам массива, например, так:

st:=’’;

for i:=l to SZL do// SZL - раз мер массива-списка

if list[i]<> NIL

then st:= st+info.l ist[i]+# 13; Sh owMessage(st);

Во время работы программы каждый элемент массива может содержать как объект типа TStud, так и объект типа Tprof. Концепция полиморфизма обеспечивает применение объекту именно того метода, который соответствует типу объекта.

ПроцедураTForml.Button1click, которая запускается в результате щелчка на кнопке Добавить (Button1), создает объект list[n] классаTStud или TProf. Класс создаваемого объекта определяется состоянием радиокнопки студент (RadioButton1),

Процедура TForm l.Bu tt on2Click , которая выполняется в результате щелчка на кнопке Список (Button2), применяя метод info к каждому объекту списка (элементу массива), формирует строку, представляющую собой весь список.

Классы и объекты Delphi

Для реализации интерфейса Delphi использует библиотеку классов, которая -содержит большое количество разнообразных классов, поддерживающих форму и различные компоненты (командные кнопки, поля редактирования и т. д.).

Во время проектирования формы приложения Delphi автоматически добавляет в текст программы необходимые объекты. Если сразу после запуска Delphi просмотреть содержимое окна редактора кода, то там можно обнаружить следующие строки: