استفاده از property های یک کلاس در کلاسی دیگر

[hamid_14]

چگونه می تونم از property های یک کلاس در کلاس دیگر استفاده کنم,مرسی

[firststep]

منظورتون چیه کاملتر توضیح بدین

[hamid_14]

مثلا میخوام از property کلاس TCustomSubPanel در کلاس TCustomButtonEdit استفاده کنم.


TCustomSubPanel = class(TWinControl)
private
FPanel :TPanel;
FShape :TShape;
FButton :TButton;
FCaptionButton : String;
protected
public
Constructor Create(AOwner: TComponent); Override;
Destructor Destroy; override;
published
property Caption : string read FCaptionButton write FCaptionButton;
end;



TCustomButtonEdit = class(TCustomEdit)
private
FSubPanel : TCustomSubPanel ;
protected

public
constructor Create(AOwner: TComponent); override;

published
property Anchors;
property BiDiMode;
property AutoSelect;
property BorderStyle;
property Color;
property Ctl3d;
property DragCursor;
property DragMode;
property Font;
end;

[یوسف زالی]

در تعریف اجزای کلاستون می تونی با دادن FSubPanel به اجزاش دسترسی داشته باشی.
اما اگر منظورت اینه که برنامه نویس بتونه مقادیرش رو دست کاری کنه، دو تا راه کلی داری،
- آوردن ساب پنل به بخش عمومی
- آوردن لیست خصیصه های ساب پنل در خصیصه های کلاس اصلی، و به تبع اون نوشتن هندلر های مناسب برای ست و گت