需要用到的命令:取事件组件、复制窗口组件
您可以参考一下,请新建一个窗体程序,任意放置一个按钮,添加代码如下
.版本 2
.子程序 __启动窗口_创建完毕
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 按钮集, 按钮, , "10,10"
_启动窗口.宽度 = 625
按钮1.可视 = 假
.计次循环首 (10, y)
.计次循环首 (10, x)
复制窗口组件 (按钮1, 按钮集 [x] [y])
按钮集 [x] [y].可视 = 真
按钮集 [x] [y].宽度 = 60
按钮集 [x] [y].高度 = 20
按钮集 [x] [y].左边 = 10 + 60 × (x - 1)
按钮集 [x] [y].顶边 = 10 + 20 × (y - 1)
按钮集 [x] [y].标题 = 到文本 (x) + “ ” + 到文本 (y)
.计次循环尾 ()
.计次循环尾 ()
.子程序 _按钮1_鼠标左键被放开, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
.局部变量 事件组件, 按钮
事件组件 = 取事件组件 ()
信息框 (“您所单击的按钮是” + 事件组件.标题, 0, )
先加入事件处理子程序“按下某键”后,会自动添加如下代码:子程序名返回值类型 公开 备注
.__启动窗口_按下某键 逻辑型
.参数名 类型
键代码 整数型
.功能键状态 整数型
上面这部分是自动添加的。
自己写入如下代码:
键代码=#F2
信息框(“内容”,,)
我也是莱鸟,其它慢慢研究。
首先,在[_启动窗口]窗体上拖放一个按钮组件。然后,为按钮组件设置一个[_按钮1_鼠标位置被移动]事件。并在该事件下添加如下语句:
添加提示(按钮1.取窗口句柄 (),"工具提示文字!",假,假)
编译并运行程序,将鼠标指向窗体上的“按钮”,随即将自动显示出“工具提示文字!”提示框。
需要注意的是,你的易语言编译器中,必须装载有“扩展功能支持库一”。若没有,可以自己在易语言窗口上打开【工具】-【支持库配置】对话窗口,找到“扩展功能支持库一”选项,将其前面的复选框选中,最后单击窗口上的【确认】按钮即可安装。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)