论坛 › 已解决问题区 › FILEINSTALL 问题 请教大大

xuanniao110 发表于 2008-11-19 07:39:39

FILEINSTALL 问题 请教大大

FileInstall("E:\bak\DeskTop\Skin\vista.skf",@TempDir&"\skin")
FileInstall("E:\bak\DeskTop\Skin\skin.dll",@TempDir&"\skin")
Global $Dll
$Form2 = GUICreate("对话框", 357, 203, 303, 219)
_SkinGUI(@TempDir&"\skin\skin.dll", @TempDir&"\skin\vista.skf", $Form2)
GUISetIcon("D:\009.ico")
$GroupBox1 = GUICtrlCreateGroup("", 8, 8, 257, 185)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("确定(&O)", 272, 16, 75, 25, 0)
$Button2 = GUICtrlCreateButton("取消(&C)", 272, 48, 75, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Quit()
                        Exit

        EndSwitch
WEnd
Func Quit()
    GUISetState(@SW_HIDE)
    DllCall($dll, "int:cdecl", "DeInitDecoration")
    DllCall($dll, "int:cdecl", "RemoveSkin")
    DllClose($dll)
        ;DirRemove(@AppDataDir&"\skin",1)
    Exit
EndFunc

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



为什么不能编译到程序中   郁闷中

[ 本帖最后由 xuanniao110 于 2008-11-19 09:11 编辑 ]

xuanniao110 发表于 2008-11-19 07:43:45

程序运行出错 截图 上传

程序运行出错截图上传

xuanniao110 发表于 2008-11-19 09:12:39

感谢群中柴柴的帮助谢谢了原来是路径出问题咯

neity 发表于 2009-11-16 13:39:21

源文件要和脚本放在一个目录中，必须在同一级目录。

查看完整版本: FILEINSTALL 问题 请教大大