文件名称：Delphi打开关闭外部程序并加入到Windows菜单中.rar
文件大小：7KB
文件格式：RAR
更新时间：2022-07-30 10:57:37
Delphi源码-系统相关
Delphi打开关闭外部程序，并获取系统菜单句柄，把程序自身菜单加入到Windows菜单中，要解决这个问题，有两个工作要做： Ⅰ：如何把用户菜单项加入系统菜单， Ⅱ：如何才能响应这一菜单项。 解决问题Ⅰ：首先需要获取系统菜单的句柄，这一点可用API函数getsystemmenu()来获取，有了系统菜单句柄，用API函数appendmenu()向系统菜单中加入用户菜单选项了。 解决问题Ⅱ：需要重载WM_SYSCOMMAND或WM_MENUSELECT消息。当用户从菜单中选一项时，系统便会发出WM_COMMMAND消息，而对于系统菜单，则会发出WM_SYSCOMMAND消息，重载这个消息，并判断选中菜 单的ID值是否为用户设定值便可以了。 在Private声明部分，说明了过程，procedure User_SysMenu(var msg:twmmenuselect); message wm_syscommand;用于响应用户菜单事件。
【文件预览】：
srcfans.com
----Delphi打开外部程序、把菜单加入系统菜单中()
--------U00407.pas(2KB)
--------P00407.dof(919B)
--------P00407.cfg(325B)
--------00407.txt(2KB)
--------U00407.dcu(5KB)
--------P00407.dpr(188B)
--------P00407.res(876B)
--------U00407.dfm(616B)