可以换个方法变通下啊。
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_Icon=..\..\..\WINDOWS\system32\SHELL32.dll
#AutoIt3Wrapper_Outfile=3.exe
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#Region
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#Include <GuiEdit.au3>
#EndRegion
$Form1 = GUICreate("Form1", 623, 442, -1, -1)
$MenuItem3 = GUICtrlCreateMenu("菜单(&F)")
$MenuItem2 = GUICtrlCreateMenu("查看(&V)")
$MenuItem1 = GUICtrlCreateMenu("帮助(&H)")
$MenuItem4 = GUICtrlCreateMenuItem("关于(&A)", $MenuItem1)
GUISetState(@SW_SHOW)
Func _About()
$Software_Name = "test" ;名称
$ver = "v0.1"
$About_Soft_notic = "test test test test test test test";说明
$About_Form1 = GUICreate("关于", 361, 331,-1,-1)
GUISetIcon(@ScriptDir & "\1.ico", -222, $About_Form1)
$About_Icon1 = GUICtrlCreateIcon("", -1, 20, 24, 32, 32, BitOR($SS_NOTIFY, $WS_GROUP))
GUICtrlSetImage(-1, @ScriptDir & "\1.ico", -222)
$About_Label1 = GUICtrlCreateLabel("软件名称:", 88, 24, 64, 17)
$About_Label2 = GUICtrlCreateLabel($Software_Name, 160, 24, 103, 17)
$About_Label3 = GUICtrlCreateLabel("软件版本:", 88, 56, 64, 17)
$About_Label4 = GUICtrlCreateLabel($ver, 160, 56, 25, 17)
$About_Group1 = GUICtrlCreateGroup("说明", 8, 80, 345, 137)
$about_Edit1 = GUICtrlCreateEdit($About_Soft_notic, 16, 96, 329, 113, BitOR($ES_AUTOVSCROLL, $ES_WANTRETURN, $WS_VSCROLL))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$About_Group2 = GUICtrlCreateGroup("相关链接", 8, 224, 345, 57)
$About_Label5 = GUICtrlCreateLabel("官方网站:", 24, 248, 64, 17)
$About_Url1 = GUICtrlCreateLabel("www.autoitx.com", 88, 248, 78, 17)
GUICtrlSetColor(-1, 0x191970)
GUICtrlSetFont(-1, "9", "400", 4)
GUICtrlSetCursor(-1, 0)
$About_Label7 = GUICtrlCreateLabel("常逛论坛:", 176, 248, 64, 17)
$About_Url2 = GUICtrlCreateLabel("www.autoitx.com", 240, 248, 97, 17)
GUICtrlSetColor(-1, 0x191970)
GUICtrlSetFont(-1, "9", "400", 4)
GUICtrlSetCursor(-1, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$About_Button1 = GUICtrlCreateButton("确定", 280, 296, 75, 25)
GUISetState(@SW_SHOW)
WinSetOnTop($About_Form1, "", 1);置顶
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE, $About_Button1
GUIDelete($About_Form1)
Return 0
Case $About_Url1
Run("explorer.exe http://www.autoitx.com")
Case $About_Url2
Run("explorer.exe http://www.autoitx.com")
EndSwitch
WEnd
EndFunc
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $MenuItem4
_About()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
|