作者在 2016-05-18 08:38:10 发布以下内容
1.在类库MyVcx中建立一个工具栏类MyToolBar，将工具栏的ShowWindow属性设置为1——最上层表单；
2.给顶层表单添加一个自定义属性TopToolBar；
3.编辑顶层表单的Activate event,输入以下代码：
This.TopToolBar=NewObject("MyToolBar","MyVcx")
This.TopToolBar.show()
This.TopToolBar.dock(0)
现在，你就可以享受顶层表单的工具栏了！
