aux649350702 发表于 2011-10-29 18:17:39

已解决Window封装部署环境下窗体运行失败？

本帖最后由 aux649350702 于 2011-11-17 21:14 编辑

各位高手，本人用AU3设计了个窗口，在Windows 封装部署环境下不能正常运行，求高手解决。

程序源代码：
#include <GUIConstantsEx.au3>
Opt("GUIOnEventMode", 1)
Local $msg,$time
$time =300
$Form1 = GUICreate("xx公司信息部装机专用系统", 400, 450) ; 创建一个居中显示的 GUI 窗口
GUICtrlSetFont ($Form1,10)
GUICtrlSetColor($Form1,0xee00ee)
$Pic1 = GUICtrlCreatePic(".\pic\syfx.jpg",-1,-1,400,380)
$Label1 =GUICtrlCreateLabel("正在为部署系统而初始化设置,请稍等..."&$time&"秒",20,385,400,20)
$Label2 =GUICtrlCreateLabel("设计制作:xxx",280,430,120,20)
$progressbar1 = GUICtrlCreateProgress(0, 405, 400, 20)
GUICtrlSetFont ($Label1,11)
GUICtrlSetColor($Label1,0x0000ff)
GUICtrlSetFont ($Label2,9)
GUICtrlSetColor($Label2,0x0000ff)
GUICtrlSetColor($progressbar1,0x0000ff)
GUISetOnEvent(-3, "GuiEvent")
GUISetState(@SW_SHOW) ; 显示一个空白的窗口
WinSetState ($Form1, "", @SW_DISABLE)
Local $i = 300,$j=0
While $i
      $i -= 1
      $j=300-$i
       GUICtrlSetData($Label1,"   正在为部署系统而初始化设置,请稍等... "&$i&"秒")
           GUICtrlSetData($progressbar1, Int($j/3))
       Sleep(1000)
WEnd
Func GuiEvent()
      Exit
EndFunc

hzxymkb 发表于 2011-10-30 07:15:00

有什么问题，请直接说明问题·

hzxymkb 发表于 2011-10-30 07:15:47

不说明问题叫我们去VM下帮你测试？我才懒得去呢！我的机开VM很卡的

xms77 发表于 2011-10-30 07:29:18

什么叫Window封装部署环境？

menfan1 发表于 2011-10-30 10:01:59

没描述清楚，代码也不全哈

aux649350702 发表于 2011-11-2 10:18:40

问题已经解决,原来是要包含:
#include <date.au3>#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>
这些问件.

aux649350702 发表于 2011-11-2 10:18:46

问题已经解决,原来是要包含:
#include <date.au3>#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>
这些问件.

aux649350702 发表于 2011-11-2 11:37:47

本帖最后由 aux649350702 于 2011-11-2 11:39 编辑

问题已经解决,原来是要包含:
#include <date.au3>#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>
这些问件.
页: [1]
查看完整版本: 已解决Window封装部署环境下窗体运行失败？