精华区文章阅读

发信人: bloom (├┝┞┟┠┢┣�), 信区: VB
标题: TrackPopupMenu(菜单函数)(转载)
发信站: 哈工大紫丁香 (2000年09月07日18:42:15 星期四), 转信

【以下文字转载自 cnTemp 讨论区】
【原文由 bloom 所发表】
发信人: yucheng (无话可说), 信区: VisualBasic
发信站: BBS 水木清华站 (Mon Apr 3 01:33:53 2000) WWW-POST

TrackPopupMenu, TrackPopupMenuBynum

VB声明
Declare Function TrackPopupMenu& Lib "user32" (ByVal hMenu As Long, ByVal
wFlags As Long, ByVal x As Long, ByVal y As Long, ByVal nReserved As Long,
ByVal hwnd As Long, lprc As Rect)
Declare Function TrackPopupMenuBynum& Lib "user32" Alias "TrackPopupMenu"
(ByVal hMenu As Long, ByVal wFlags As Long, ByVal x As Long, ByVal y As Long,
ByVal nReserved As Long, ByVal hwnd As Long, ByVal lprc As Long)
说明
在屏幕的任意地方显示一个弹出式菜单
返回值
Long，非零表示成功，零表示失败。会设置GetLastError
参数表
参数类型及说明
hMenu Long，弹出式菜单的句柄
wFlags Long，位置标志和鼠标追踪标志的组合，见下表
位置标志说明
TPM_CENTERALIGN 菜单在指定位置水平居中
TPM_LEFTALIGN 菜单的左侧置于水平x坐标处
TPM_RIGHTALIGN 菜单的右侧置于水平x坐标处
TPM_LEFTBUTTON 鼠标左键标准运作方式
TPM_RIGHTBUTTON 用鼠标右键进行菜单追踪
x,y Long，这个点指定了弹出式菜单在屏幕坐标系统中的位置
nReserved Long，未使用，设为零
hwnd Long，用于接收弹出式菜单命令的窗口的句柄。应该使用窗体的窗口句柄——窗体
中有一个菜单能象弹出式菜单那样接收相同的命令ID集
lprc Rect，用屏幕坐标定义的一个矩形，如用户在这个矩形的范围内单击，则弹出式菜
单不会关闭。如单击弹出式菜单之外的任何一个地方，则会关闭菜单。可以设为NULL
注解
用这个函数创建的菜单，菜单中的命令ID并不与vb期望的那些相符

--

--
☆ 来源:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: blo0m.bbs@smth.org]
--
※ 转载:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: 202.118.247.254]

VB 版 (精华区)