找回密码
 加入
搜索
查看: 2068|回复: 2

[GUI管理] 内镶IE加载皮肤后关闭时内存出错(已解决)

[复制链接]
发表于 2011-8-31 11:54:41 | 显示全部楼层 |阅读模式
本帖最后由 自然 于 2012-7-5 00:37 编辑

各位大大看看是什么原因,在论坛找了好久没找到解决的方法
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=10.ico
#AutoIt3Wrapper_UseUpx=n
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****

FileInstall("SkinCrafterDll.dll", @TempDir & "\SkinCrafterDll.dll", 1)
FileInstall("Konel.skf", @TempDir & "\Konel.skf", 1)
$Dll = DllOpen(@TempDir & "\SkinCrafterDll.dll")

Opt("TrayMenuMode",1)
$title="Test"
$oIE = ObjCreate("Shell.Explorer.2")
$Form1 = GUICreate($title, 600, 480, -1, -1 )
_SkinGUI(@TempDir & "\SkinCrafterDll.dll", @TempDir & "\Konel.skf", $Form1)
$GUIActiveX = GUICtrlCreateObj($oIE, -0, -0,1500, 1000)

GUISetState()
$oIE.document.body.scroll = "no"
$oIE.navigate("http://www.autoitx.com/")
ControlListView($title, "", "SysListView321", "ViewChange", "smallicons")
While 1
        if GUIGetMsg() = -3 Then Exit
WEnd


Func _SkinGUI($SkincrafterDll, $SkincrafterSkin, $Handle)
        $Dll = DllOpen($SkincrafterDll)
        DllCall($Dll, "int:cdecl", "InitLicenKeys", "wstr", "1", "wstr", "", "wstr", "1@1.com", "wstr", "1")
        DllCall($Dll, "int:cdecl", "InitDecoration", "int", 1)
        DllCall($Dll, "int:cdecl", "LoadSkinFromFile", "wstr", $SkincrafterSkin)
        DllCall($Dll, "int:cdecl", "DecorateAs", "int", $Handle, "int", 25)
        DllCall($Dll, "int:cdecl", "ApplySkin")
EndFunc   ;==>_SkinGUI


Func Quit()
        GUISetState(@SW_HIDE)
        DllCall($Dll, "int:cdecl", "DeInitDecoration")
        DllCall($Dll, "int:cdecl", "RemoveSkin")
        DllClose($Dll)
        FileDelete(@TempDir & "\SkinCrafterDll.dll")
        FileDelete(@TempDir & "\Konel.skf")
                Exit
EndFunc 
附上皮肤文件:

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2011-8-31 15:00:16 | 显示全部楼层
可能和系统或者IE浏览器有关系,我这边测试没有问题
 楼主| 发表于 2011-8-31 22:45:06 | 显示全部楼层
已解决,从新注册DLL文件已不提示,感谢楼上的测试提醒。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-6-3 00:29 , Processed in 0.080668 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表