在较高版本的autoIt中为什么she皮肤不起作用呢?
#include <GUIConstantsEx.au3>#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
FileInstall("E:\auto\IT Tools\skin\aero.she",@TempDir & "\aero.she")
FileInstall("E:\auto\IT Tools\skin\Skin.dll",@TempDir & "\Skin.dll")
$skins=@TempDir & "\aero.she"
$Dll = DllOpen(@TempDir & "\Skin.dll")
DllCall($Dll, "int", "SkinH_AttachEx", "str", $skins, "str", "mhgd")
DllCall($Dll, "int", "SkinH_SetAero", "int", 1)
$Form1 = GUICreate("skin", 633, 454, 192, 114)
$ok=GUICtrlCreateButton("ok",50,60,100,50)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $ok
MsgBox(0,"ok","ok")
EndSwitch
WEnd如上代码,在3.3.6以上版本为什么无效呢? 跟版本没关系哈,我一直最新版用SHE哈 那跟什么有关?skin.dll文件有关?请帮忙 7,8,9行移到12行之后 7,8,9行移到12行之后
3mile 发表于 2011-11-25 21:10 http://www.autoitx.com/images/common/back.gif#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
FileInstall("E:\auto\IT Tools\skin\aero.she",@TempDir & "\aero.she")
FileInstall("E:\auto\IT Tools\skin\Skin.dll",@TempDir & "\Skin.dll")
$skins=@TempDir & "\aero.she"
$Form1 = GUICreate("skin", 633, 454, 192, 114)
$ok=GUICtrlCreateButton("ok",50,60,100,50)
$Dll = DllOpen(@TempDir & "\Skin.dll")
DllCall($Dll, "int", "SkinH_AttachEx", "str", $skins, "str", "mhgd")
DllCall($Dll, "int", "SkinH_SetAero", "int", 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $ok
MsgBox(0,"ok","ok")
EndSwitch
WEnd
代码移动后还是不行啊,求帮忙,我目前使用的版本是从论坛下的,版本信息如下:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
FileInstall("Skin.dll", @TempDir &"\Skin.dll",1)
FileInstall("aero.she", @TempDir &"\aero.she",1)
$sDll= DllOpen(@TempDir &"\Skin.dll")
DllCall($sDll, "int", "SkinH_AttachEx","str",@TempDir & "\aero.she","str","mhgd")
DllCall($sDll, "int", "SkinH_SetAero","int",1)
$Form1 = GUICreate("skin", 633, 454, 192, 114)
$ok=GUICtrlCreateButton("ok",50,60,100,50)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $ok
MsgBox(0,"ok","ok")
EndSwitch
WEnd
回复 5# chinaxx
你更改了代码,,当然用不了。 本帖隐藏的内容需要回复才可以浏览 跟版本没关系哈,我一直最新版用SHE哈 回复 6# zcx880517
复制了你的代码,结果运行后还是不行啊,什么原因?太神奇了
只要回到之前的版本又OK了,代码一模一样啊 回复 10# chinaxx
你现在是什么版本? 帮顶。。。 这个不是编译器的介绍么 本帖最后由 chinaxx 于 2011-11-30 11:31 编辑
回复 11# zcx880517
如我5楼所发的图片,版本是SciTE 程序版本:2.29 顶一下,求助高手
页:
[1]