public procedure show; // әдіс end

procedure show; // әдіс

Нысан деректері үшін жадты бөлу конструктор әдісінің қолданысының нәтиже мәнін нысан түріне (сынып) қосу арқылы жүзеге асырылады. Мысалы, нұсқауларды орындағаннан кейін

professor := TPerson.Create;

профессор объектісінің деректеріне қажетті жады бөлінеді.

Жадты бөлуден басқа, дизайнер, әдетте, объектінің өрістеріне бастапқы мәндерді тағайындау мәселесін шешеді, яғни, объектіні инициализациялайды. Төменде TPerson нысаны үшін конструктордың мысалға келтірілуі берілген:

constructor TPerson.Create; begin

fname := ' ';

faddress := ' ' ;

end;

Егер нысан бағдарламада бұдан былай пайдаланылмаса, осы нысанның өрістерінде орналасқан жадты босатуға болады. Бұл әрекетті орындау үшін Free destructor әдісін қолданыңыз. Мысалы, профессор объектісінің өрістерін босату үшін,

professor.Free;

Объектілі-бағдарланған бағдарламалау тұжырымдамасы жаңа сыныптарды анықтауға мүмкіндік береді, өрістерді, қасиеттерді және әдістерді бұрыннан бар сыныптарға қосу жолымен қабылдайды. Жаңа сыныптарды алу механизмі ұрпақ деп аталады. Бұл жағдайда, жаңа, балаларға негізделген сынып (бала) ата-ана мен ата-ананың қасиеттері мен әдістерін иеленеді.

Ата-ана сынып баланың сыныптық декларациясында көрсетіледі. Мысалы, TEmployee класы (қызметкер) FDepartment өрісін қосу арқылы талқыланған TPerson сыныбынан алынуы мүмкін. Бұл жағдайда TEmployee сыныптың мәлімдемесі келесідей болуы мүмкін:

TEmployee = class(TPerson)

FDepartment: integer; // номер отдела

constructor Create(Name:TName; Dep:integer);

end;

TEmployee сыныбында ата-аналық сынып пен оның өрістерін инициализациялауды қамтамасыз ететін өз конструкторы болуы керек. TEmployee конструкторын іске асырудың мысалы келтірілген:

constructor

TEmployee.Create(Name:TName;Dep:integer);

begin

inherited Create(Name); FDepartment:=Dep; end;

Мысалы, үш сынып белгіленді, олардың біреуі екіншісі үшін негізгі: