var
MHandle: THandle;
mRect: TRect;
P: Tpoint;
begin
mRect:=Rect(0,0,100,100);
mhandle:=getsystemmenu(Application.handle,false);
GetCursorPos(P);
TrackPopupMenu(MHandle,TPM_RIGHTALIGN,P.x+1,P.y+1,0,Application.handle,@mRect);
end;
MHandle: THandle;
mRect: TRect;
P: Tpoint;
begin
mRect:=Rect(0,0,100,100);
mhandle:=getsystemmenu(Application.handle,false);
GetCursorPos(P);
TrackPopupMenu(MHandle,TPM_RIGHTALIGN,P.x+1,P.y+1,0,Application.handle,@mRect);
end;
解决方案 »
- 带有quickreport打印窗体怎么最小化?或禁用最小、最大化??
- 关于SQL语句单引号的问题。
- 怎样判断pchar字符串为空值?
- 象RealPlayer和WMediaPlayer全屏播放时一样,隐藏/再现光标?
- 一个关于用"nmstmp"发送EMAIL的问题
- 简单问题,请帮手,在线等……
- 急死人!我下了一个RXRichEdit,但不知道用法!救命呀!
- 请问:MDI子窗体菜单为什么覆盖了父窗体的菜单?
- 我想问问,如果我想编一个像linux的东西(比如这方面的),需要学什末数学。2
- 请教高人(40分相送)(东大阿尔派面试题)
- 送分地第一个有奖怎样,怎样连接远程数据模块啊
- 如果获得一个TQRMemo控件中文本的行数?多谢!
请各位看官指教!
先致谢!
如此说来,发WM_INITMENUPOPUP消息可以弹出系统菜单了,我立马就试,谢谢!