大家好，我是一个新手，开发环境是delphi 5.0,windows 2000我有一个关于工具栏拖动的问题 (50分)

J

juky_ma

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-05

• #1

大家好，我是一个新手，开发环境是delphi 5.0,windows 2000
我有一个关于工具栏拖动的问题，问题如下：
我在一个Form1上放一个CollBar1和ToolBar1,并且属性设置如下
CollBar1.DockSite为true,CollBar1.DragKind为dkDock,CollBar1.DragMode为dmAutomatic,
ToolBar1.DragKind为dkDock,ToolBar1.DragMode为dmAutomatic.
在运行时，我可以将ToolBar1从CoolBar1中拖出停靠在Form1上，
并且ToolBar1的右上角有一个小 X 按钮，通过此小按钮可以关闭ToolBar1，
在关闭ToolBar1时，我想要菜单做一些改变（像word中的视图--工具栏中那样有所变动）。
不知道怎样来截获ToolBar1关闭的事件或消息。
谢谢大家。

 

J

juky_ma

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-05

• #2

怎么没有人回答，快快帮助啊!我受不了了？!

 

T

taozhiyu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-05

• #3

注意换行！看得太累！[]

 

D

D影子D

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-05

• #4

toolbar1的onexit事件

 

M

mercury78

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-05

• #5

我做过同样的东东，告诉你我的解决方法：
1。ToolBar关闭之后，没有free掉，只是hide了，所以只要再show出来就好了。
2。你可以在菜单项onclick时候去检测,
; ;menuiten.checked:=toolbar.visibl;

 

J

juky_ma

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-05

• #6

在菜单项onclick时候去检测,
; ;menuiten.checked:=toolbar.visibl;
这样做要外界主动触发菜单项的onclick事件，
如果外界不触发，菜单就改变不了。有没有其他的办法，在
toolbar隐藏时就触发菜单项的onclick事件。

 

J

juky_ma

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-05

• #7

大家帮帮忙，快点回答呀，多谢谢啦！