学习脚本制作：运行提示窗口教程

1、新建一个窗口，单独作为运行提示窗口

2014版不仅界面好看了，支持多窗口的功能也确实很给力。

步骤

1、点击新建窗口按钮，新建一个窗口form2.

2、2、  在form1窗口上画一个按钮，实现点击之后弹出form2窗口，再次点击则关闭form2窗口。        form1窗口：

3、 Form2窗口：

4、“开启脚本提示信息” 按钮，单击事件中代码如下：

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

5、新建窗口方式  pk 大漠Foobar提示窗口方式

        新建窗口方式

窗口标题栏不能设置，影响整体美观

 界面便于设计

6、用控件来画界面，调整控件的大小颜色位置即可。例如，用标签来画窗口，我们调整标签的标题为空，改变它的颜色，位置，大小即可。

大漠Foobar提示窗口方式

没有窗口标题栏，窗体可以随意设置

7、界面不便设计，颜色块位置等需要计算：

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")'设置矩形条颜色