Ы маамммтттттngy s,,,,,,,,,,,C, xf

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

end;

Bu misolda TEmployee sinfi TPerson sinfining vorisidir.

TEmpioyee o’z konstruktoriga ega bo’lishi lozim. TEmployee sinfi konstruktori quyidagicha berilishi mumkin:

constructor TEmpioyee.Create(Name:Tname;Dep:integer);

begin

inherited Create(Name);

FDepartment:=Dep;

end;

Bu misolda inherited direktivasi bilan ajdod sinf konstruktori chaqiriladi va avlod sinf maydoniga qiymat beriladi

protected i private direktivalari

Sinf elementlariga murojaatni boshqarish uchun protected (himoyalangan) va private (xususiy), direktivalaridan foydalaniladi.

Himoyalangan, ya’ni protected sinf elementlariga sinfdan tashqari faqat voris sinflarda murojaat qilish mumkin. Odatda protected sekstiyasiga sinf usullari ta’rifi joylashtiriladi.

Yopiq, ya’ni private sinf elementlari faqat modul ichida murojaat qilish mumkin. Odatda bu sekstiyaga sinf maydonlari ta’riflari joylash-tiriladi.

Quyida murojaatni boshqarish direktivalaridan foydalanilgan TPerson sinfi ta’rifi keltirilgan.
TPerson = class private

FName: TName;

FAddress: TAddress;