- 初中三年级
- 2220985
- 396
- 0
- 532 朵
- 2506 个
- 334 个
- 480
- 2013-10-27
|
1#
t
T
发表于 2014-11-07 16:25
|
|只看楼主
2014版按键轻松制作脚本运行提示窗口 新建一个窗口,单独作为运行提示窗口2014版不仅界面好看了,支持多窗口的功能也确实很给力。 |
步骤 1、 点击新建窗口按钮,新建一个窗口form2.
- 您所在的用户组无法下载或查看附件
2、 在form1窗口上画一个按钮,实现点击之后弹出form2窗口,再次点击则关闭form2窗口。 form1窗口:
- 您所在的用户组无法下载或查看附件
form2窗口:
- 您所在的用户组无法下载或查看附件
“开启脚本提示信息” 按钮,单击事件中代码如下:- Event Form1.Button1.Click
- If i= 0 Then // 变量不赋值则默认值为0,第一次判断符合,则显示form2窗口
- Form2.Show
- Form1.Button1.Caption = "关闭脚本提示信息"
- i=1 //改变i的值,使得第二次判断,if第一个条件不符合,则执行else中的内容,隐藏窗口
- Else
- Form2.Hide
- Form1.Button1.Caption = "开启脚本提示信息"
- i=0 //改变i的值为0
- End If
- End Event
复制代码
3、 在form2窗口中使用控件来画出我们想要的提示界面(小编审美太渣,所以界面黑糊糊的一坨 TT) 效果演示:
- 您所在的用户组无法下载或查看附件
| 新建窗口方式 pk 大漠Foobar提示窗口方式新建窗口方式 | 大漠Foobar提示窗口方式 | 窗口标题栏不能设置,影响整体美观 | 没有窗口标题栏,窗体可以随意设置 | - 您所在的用户组无法下载或查看附件
| - 您所在的用户组无法下载或查看附件
| 界面便于设计 | 界面不便设计,颜色块位置等需要计算 | 用控件来画界面,调整控件的大小颜色位置即可。例如,用标签来画窗口,我们调整标签的标题为空,改变它的颜色,位置,大小即可。 | - foobar = dm.CreateFoobarRoundRect(hwnd, 10, 10, 700, 400, 30, 30)'画圆角窗口
- dm_ret = dm.FoobarSetFont(foobar,"宋体",14,1)'设置文本字体大小,加粗
- dm_ret = dm.FoobarFillRect(foobar,0,0,800,400,"000000")'设置矩形条颜色
- dm_ret = dm.FoobarFillRect(foobar, 0, 0, 800, 50, "353535")'设置矩形条颜色
- dm_ret = dm.FoobarFillRect(foobar, 10, 10, 790, 40, "262626")'设置矩形条颜色
- dm_ret = dm.FoobarFillRect(foobar, 490, 60, 690, 90, "353535")'设置矩形条颜色
复制代码 |
[backcolor=rgb(154, 205, 50)] 我们同样也可以新建一个窗口来放脚本说明,这样主界面上看过去就清爽整洁了许多。
| 如果童鞋们对于本帖里的内容有疑问或者建议,欢迎跟帖讨论~~ 本文由按键学院提供技术支持 [backcolor=rgb(46, 139, 87)]2个月学会赚大钱的脚本 按键学院10月实战班卷土来袭
|