在控件中如何获截Owner 是 TFORM的消息?WM_SYSCOMMAND .WM_COMMAND (50分)

J

Jhdandcl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-14

• #1

我的一个控件中要用到一段代码去缉获 Owner (Owner 是一个TFORM类） 的消息.
我用AppendMenu 在一个FORM系统菜单增加了我的一些自定义菜单项,
当用户选中了我的那个菜单项,系统消息是如何派发的?

我查了相关资料好象是应该先Handle WM_SYSCOMMAND 再Handle WM_COMMAND,
但我没成功,望高手指导....

 

G

goddy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-14

• #2

用tag

 

S

sherman

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-14

• #3

你如果只是实现动态菜单的话，不需要hook，只要在添加tmenuitem的后
mi := TMenuItem.Create(...);
mi.OnClick := your_owner_click_process_procedure;
就可以了

 

J

Jhdandcl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-14

• #4

To : sherman:
我不是要实现动态菜单 ,而是在一个控件里实现所在TFORM的消息过腻.
也就是实现owner类的消息过历.

 

小

小人物

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-14

• #5

listen...

 

J

Jhdandcl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-15

• #6

这个问题我解决了,

SetWindowLong(FWnd , GWL_WNDPROC, LongInt(FoldWinProc ));
.....

过滤WM_SSYCOMMAND 消息.

多谢各位.

 

J

Jhdandcl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-15

• #7

多人接受答案了。