易语言组件代码大全(易语言移动控件)
本文目录
易语言移动控件
你搞个按钮在窗口上,复制下面的代码可以实现自由拖动按钮的效果,其实就是设置按钮的左边和顶边参数的过程以下是代码——————————代码区———————————————.版本 2.程序集 窗口程序集1.程序集变量 拖动, 逻辑型.程序集变量 横位置, 整数型.程序集变量 纵位置, 整数型.子程序 _按钮1_鼠标左键被按下, 逻辑型.参数 横向位置, 整数型.参数 纵向位置, 整数型.参数 功能键状态, 整数型拖动 = 真横位置 = 横向位置纵位置 = 纵向位置.子程序 _按钮1_鼠标左键被放开, 逻辑型.参数 横向位置, 整数型.参数 纵向位置, 整数型.参数 功能键状态, 整数型拖动 = 假.子程序 _按钮1_鼠标位置被移动, 逻辑型.参数 横向位置, 整数型.参数 纵向位置, 整数型.参数 功能键状态, 整数型.判断开始 (拖动 = 真) .判断开始 (横位置 < 横向位置 且 横向位置 < 按钮1.宽度 且 横向位置 > 0 且 纵向位置 < 按钮1.高度 且 纵向位置 > 0) 按钮1.左边 = 按钮1.左边 + 1 .判断 (横位置 > 横向位置 且 横向位置 < 按钮1.宽度 且 横向位置 > 0 且 纵向位置 < 按钮1.高度 且 纵向位置 > 0) 按钮1.左边 = 按钮1.左边 - 1 .判断 (纵位置 < 纵向位置 且 纵向位置 < 按钮1.高度 且 纵向位置 > 0 且 横向位置 < 按钮1.宽度 且 横向位置 > 0) 按钮1.顶边 = 按钮1.顶边 + 1 .判断 (纵位置 > 纵向位置 且 纵向位置 < 按钮1.高度 且 纵向位置 > 0 且 横向位置 < 按钮1.宽度 且 横向位置 > 0) 按钮1.顶边 = 按钮1.顶边 - 1 .默认 .判断结束.默认.判断结束————————————代码结束————————————
求易语言代码
A程序是否是自己编写的?
是的话,在A程序中加入
这个Dll命令,创建一个同步对象,用法
.版本 2
.如果真 (打开事件同步对象 (2031619, 假, “这个字串为任意字串,长度长一些,尽量保证唯一性”) ≠ 0) ---这个字串与在B进程中运用的创建同步对象用的字串要一样的。
这个是检测这个全局对象是否创建,在判断线程中循环判断,如果为真,表明创建该同步对象的进程已经运行。
创建全局对象用法:
__事件句柄 = 创建事件同步对象 (0, 假, 假, “这个字串为任意字串,长度长一些,尽量保证唯一性”)。
更多文章:
北斗卫星导航地图免费下载(北斗卫星导航免费官方下载是真的吗)
2024年4月6日 03:25
Win8.1设置个性主题详细教程?手机QQ空间个性化主题背景和挂件怎么设置
2024年6月9日 08:48
和平精英体验服官网(和平精英突变团竞2.0体验服在哪里下载)
2024年8月19日 02:15
赛车游戏大全免费下载(求赛车游戏手游排行,有哪些比较推荐的)
2024年7月20日 09:45
金山打字通怎么打字作弊(我们学校有速度测试,就是打一篇文章,有没有作弊版的金山打字通呢)
2024年8月25日 18:30
ofd文件用什么软件打开(电脑上的ofd格式文件如何打开呢)
2024年8月5日 10:46