控件继承于Tedit,其中又有Tspeedbutton,请问：如何使用Tspeedbutton所带的事件(100分)

控件继承于Tedit,其中又有Tspeedbutton(代码如下）
TTable_edit=class(TEdit)
private
SBT:TSpeedButton;
请问：如何让用户使用Tspeedbutton所带的事件，，如：onclick,等！

没试，大概是这个意思。
TTable_Edit = class(TEdit)
FOnBtnClick: TNotifyEvent;
private
procedure DoClick(Sender: TObject);
property
property OnBtnClick: TNotifyEvent read FOnBtnClick write FOnBtnClick;
end;

constructor TTable_Edit.Create(AOwner: TComponent);
begin
...
SBT.OnClick := DoClick;
end;

procedure TTable_Edit.DoClick(Sender: TObject);
begin
if Assigned(FOnBtnClick) then FOnBtnClick(Self);
end;

line6: property 应为 published。

非常感谢， Croco！我试过成功了,给你加100分