Курсовая работа: Основы программирования в среде Delphi 70

Ball: Real; {среднийбалл}

End ;

Однако можно сохранить тип TPerson путем создания поля Student типа TPerson внутри типа TStudent.

TSudent = Record

Student: TPerson;

Ball: Real;

End ;

Такая конструкция удобна и проста, поэтому постоянно используется в программировании. Для студента тип TStudent должен содержать все поля, которые имеются в записи TPerson, при этом тип TStudent является типом потомком для типа TPerson. TStudent наследует все, что принадлежит TPerson, и кроме того, содержит новые поля, которые делают TSudent уникальным.

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

TPersonal = Object

Name: String [30];

Date: String [10];

RazV: Real;

End ;

5) Операции и методы . Функция (или преобразование), которую можно применять к объектам данного класса, называется операцией. Если одна и та же операция применяется к объектам разного класса, то ее называют полиморфной. Обычно при работе с записями возникает проблема инициализации полей записи. Для присвоения полям, в рассмотренном ранее примере, начальных значений можно использовать оператор With, но при необходимости инициализировать более одной записи придется использовать большое число операторов With, которые будут выполнять одни и те же действия. Поэтому естественным является создание инициализирующей процедуры, которая обобщает применение оператора with к любому экземпляру типа TPerson, передаваемого в качестве параметра:

Procedure Init (var Person: TPerson; N, D: String; R: Real);

Begin

With Person do begin

Name: = N;

Date: = D;

RazV: = R;

End;

End ;

Процедура Init, включенная в объект специально для обслуживания типа TPerson, называется методом, т.е. метод – это процедура или функция, включенная в объект таким образом, что экземпляр данного типа становится доступным для нее изнутри. Поля и методы являются двумя составными частями новой структуры, называемой объектом. С учет вышесказанного объект TPerson можно описать следующим образом:

Type

Tperson = Object;

Name: String [30];

Date: String [10];

RazV: Real;