社区
Delphi
帖子详情
如何让窗口出现在鼠标点击的位置?(在线等待)
deeryu
2005-11-03 11:23:03
我想让无标题窗口出现在我鼠标点击的位置,想知道方法或者思路,请各位指点迷津.
...全文
169
4
打赏
收藏
如何让窗口出现在鼠标点击的位置?(在线等待)
我想让无标题窗口出现在我鼠标点击的位置,想知道方法或者思路,请各位指点迷津.
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
4 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
chenylin
2005-11-03
打赏
举报
回复
Mouse.CursorPos.X
Mouse.CursorPos.Y
wdswcy
2005-11-03
打赏
举报
回复
procedure TForm1.FormShow(Sender: TObject);
var
pt:Tpoint;
begin
getcursorpos(pt);
clienttoscreen(pt);
self.Top:=pt.y;
self.Left:=pt.x;
end;
对了,写到Show事件中就可以了
wdswcy
2005-11-03
打赏
举报
回复
刚才错了
你试试下面的代码:
procedure TForm1.FormCreate(Sender: TObject);
var
pt:Tpoint;
begin
getcursorpos(pt);
clienttoscreen(pt);
self.Top:=pt.y;
self.Left:=pt.x;
end;
wdswcy
2005-11-03
打赏
举报
回复
procedure TForm1.FormCreate(Sender: TObject);
begin
self.Top:=10;
self.Left:=10;
end;
C++ 获取
鼠标
点击
位置
C++ 获取
鼠标
点击
位置
1.检测
鼠标
点击
事件 GetAsyncKeyState函数可以检测按键
点击
事件 这里是它的函数原型: SHORT_stdcall GetAsyncKeyState(int vKey); 我们首先要根据这个函数定义一个宏KEY_DOWN,这样可以方便...
Qt
鼠标
点击
事件处理:显示
鼠标
点击
位置
(完整示例)
事件是对各种应用程序需要知道的由应用程序内部或者外部产生的...既然事件发生了,那么我们就需要对一个事件进行处理,就像我们
点击
了一下
鼠标
左键,程序就给了我们反馈一样,那么我们通过什么来对事件进行处理呢?
Qt实现弹出
窗口
,
点击
其他
位置
消失
Qt实现弹出
窗口
,
点击
其他
位置
消失 一开始时想的很美好,写button的
点击
事件,然后在弹窗界面中写eventFilter(QEvent *e)事件 if (event->type() == QEvent::ActivationChange) { if(QApplication::active...
Ubuntu设置终端打开时的默认
窗口
大小和
位置
坐标
1、打开一个终端,把它调整到自己想要的大小和
位置
2、在终端内执行xwininfo,此时
鼠标
变成十字,
等待
你用
鼠标
点击
终端
窗口
,
点击
终端
窗口
后就会
出现
终端
窗口
的信息,注意最后一行,比如:-geometry 76x11-...
C/C++ 实现模拟键盘
鼠标
因为 SendMessage 会
等待
目标返回的结果,如果你发送消息的
窗口
一直不返回结果,它就会一直
等待
下去,导致程序卡死在这里,而 PostMessage 不会去关心这些问题。今天写了点代码,功能是筛选桌面中符合某些条件的
窗口
...
Delphi
5,386
社区成员
262,729
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章