易语言无边框透明窗口如何移动
易语言初学者(自学)做一个桌面快捷小工具,是无边框透明窗口。问题是如何移动窗口?比如鼠标左键按下窗口移动,或在窗口顶部加一个画板,鼠标左键按下画板移动。昨天提问悬赏50,...
易语言初学者(自学)做一个桌面快捷小工具,是无边框透明窗口。问题是如何移动窗口?比如鼠标左键按下窗口移动,或在窗口顶部加一个画板,鼠标左键按下画板移动。昨天提问悬赏50,问题却被百度吃掉了,所以这次问题得到解决后追加50。
如图
先前有人告诉我是鼠标移动事件错了,说这样鼠标动窗口就动,可我只去掉窗口透明就正常了,按下放开都写了 展开
如图
先前有人告诉我是鼠标移动事件错了,说这样鼠标动窗口就动,可我只去掉窗口透明就正常了,按下放开都写了 展开
展开全部
.版本 2
.支持库 spec
.子程序 _画板1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
延迟 (3000)
_启动窗口.左边 = 取鼠标水平位置 ()
_启动窗口.顶边 = 取鼠标垂直位置 ()
---------------------------------------------------------------
在“画板1”上点“鼠标左键”后移动鼠标3秒后“启动窗口”左上角自动移到鼠标所在位置.
.支持库 spec
.子程序 _画板1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
延迟 (3000)
_启动窗口.左边 = 取鼠标水平位置 ()
_启动窗口.顶边 = 取鼠标垂直位置 ()
---------------------------------------------------------------
在“画板1”上点“鼠标左键”后移动鼠标3秒后“启动窗口”左上角自动移到鼠标所在位置.
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2012-06-13
展开全部
先前人家说得对!鼠标移动事件确实错了,你吧纵向移动也写成左边,不错才怪。把如果Y...里边的左边改成顶边就行,我按你的代码试过了,没问题
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
窗口透明达到一定程度时,可能会接收不到事件
窗口要允许移动
在鼠标左键被按下添加以下代码(窗口 是你想要移动的窗口名称)
窗口.发送信息 (161, 2, 0)
窗口要允许移动
在鼠标左键被按下添加以下代码(窗口 是你想要移动的窗口名称)
窗口.发送信息 (161, 2, 0)
追问
因为初学易语言没人教,不知道“发送信息”怎么用
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
设置下鼠标按下事件,鼠标左键按下的时候,窗口的位置等于鼠标的位置,具体精确你要计算鼠标在程序窗口的位置,方法就是这样,鼠标左键放开,就不移动
追问
都设置了,但是不行
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询