Samarqand davlat universiteti raqamli texnologiyalar fakulteti informatika o

FName: TName;

FAddress: TAddress;

protected

Constructor Create (Name: TName);

Function GetName: TName;

Function GetAddress: TAddress;

Procedure SetAddress(NewAddress:TAddress);

Property Name: TName

read GetName;

Property Address: TAddress

read GetAddress

write SetAddress;

end;

Polimorfizm — bu har xil sinfga kiruvchi usullar uchun bir xil

nomlarni ishlatish imkoniyatini yaratishdir. Polimorfizm prinsipi shundan iboratki, sinf obyektiga mos b o ‘lgan biror ishning bajarilishida bir xil usulga murojaat qilish mumkinligini ta ’minlab beradi. Misol uchun biz yangi sinf tashkil qilishga qaror qildik. Bu sinfning bosh sinfdan farqi uning usulida algoritm o‘zgartirilgan deylik.

Natijada biz, bir xil nomli usulga ega bolgan ikkita sinfni tashkil qilgan bolam iz. U holda, tashkil qilingan yangi sinf «polimorfizm» xossasiga ega boladi. Sinflar dasturning Type bolim ida umumiy holda quyidagicha e’lon qilinadi: