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

Property Name:Tname

read GetName;

Property Address :Taddress

read GetAddress

write SetAddress;

end;

Замечание

Если надо чтобы элементы класса были полностью скрыты, то определение класса следует поместить в отдельный модуль.

Полиморфизм и виртуальные методы

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

Пусть определены три класса, один из них является базовым для двух других.

type // базовый класс

TPerson= class

fname: string; { имя }

constructor Create (name: string);

function info: string;

virtual;

end;

// производный от базовогоTperson

TStud=cl ass (TPerson)

f gr: integer;{ номер группы }

constructor Create (name: string; gr: integer);

function info: string; override;

end;

// производный от базового Tperson

Tprof=class (TPerson)

fdep: string; { название кафедры }

constructor Create(nam e:string; dep: string);

function info: s tring; override;