如何在出现树状事件。(100分)

有这样的一个组件
TBsFormMgr = class(TPersistent)
........
published
property OnAfterReadState: TNotifyEvent read FOnAfterReadState write FOnAfterReadState;
property OnAfterFormCreate: TNotifyEvent read FOnAfterFormCreate write FOnAfterFormCreate;
property OnEndCreate: TNotifyEvent read FOnEndCreate write FOnEndCreate;
property OnAfterCreate: TNotifyEvent read FOnAfterCreate write FOnAfterCreate;
property OnFirstShow: TNotifyEvent read FOnFirstShow write FOnFirstShow;
property Description: string read FDescription write FDescription;
end;

TAComponet =class(TCompoent)
......
published
property FormMgr:TBsFormMgr read FFormMgr;
end;

怎么样让FFormMgr也出现在Evenets栏里
像Dev的Properties一样，在设计时事件那边也可以赋值事件。

顶

本来想来取消问题的，我朋友帮我解答了。
分给你了。：）