danyweb Posted August 12, 2011 Share Posted August 12, 2011 Is there anyone who have skincrafter.dll (v 3.5.1) without the stupid pop-up? Because i have tried to use skin for autoit, but in demo version .dll has a pop-up... after when it's close, autoit.exe crash, i don't know why... i used this code (it's an example): #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <SkinCrafter.au3> Opt('MustDeclareVars', 1) _LoadSkinCrafter("SkinCrafterDLL.dll") Navigate() Func Navigate() Local $oIE, $GUIActiveX, $gui Local $GUI_Button_Stop, $msg $oIE = ObjCreate ("Shell.Explorer.2") $gui = GUICreate("Autosurfer", 200, 150) _InitializeSkinCrafter($gui, "A_67.skf") $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 20, 180, 60) $GUI_Button_Stop = GUICtrlCreateButton("Stop", 10, 100, 180, 30) GUISetState() ;Show GUI $oIE.navigate("http://www.autoitscript.com") ; Waiting for user to close the window While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $GUI_Button_Stop ExitLoop EndSelect WEnd GUIDelete() EndFunc ;==>Example and this is the udf expandcollapse popupGlobal $nSkinCrafterDll Func _LoadSkinCrafter($nDLL) $nSkinCrafterDll = DllOpen($nDLL) If Not FileExists($nDLL) Then SetError(1) Return 0 EndIf If $nSkinCrafterDll = -1 Then SetError(2) Return 0 EndIf DllCall($nSkinCrafterDll, "int:cdecl", "InitLicenKeys", "wstr","SKINCRAFTER", "wstr","SKINCRAFTER.COM", "wstr", "support@skincrafter.com","wstr","DEMOSKINCRAFTERLICENCE") DllCall($nSkinCrafterDll, "int:cdecl", "DefineLanguage", "int", 0) Return 1 EndFunc Func _InitializeSkinCrafter($nHWND, $nSkin) If Not WinExists($nHWND) Then SetError(1) Return 0 EndIf If Not FileExists($nSkin) Then SetError(2) Return 0 EndIf DllCall($nSkinCrafterDll, "int:cdecl", "InitDecoration", "int", 1) DllCall($nSkinCrafterDll, "int:cdecl", "LoadSkinFromFile", "wstr", $nSkin) DllCall($nSkinCrafterDll, "int:cdecl", "ApplySkin") DllCall($nSkinCrafterDll, "int:cdecl", "DecorateAs","long",$nHWND,"long",1) Return 1 EndFunc Func _ApplySkin($nHWND, $nSkinID) If Not WinExists($nHWND) Then SetError(1) Return 0 EndIf If $nSkinID > 1 Then DllCall($nSkinCrafterDll, "int:cdecl", "ApplyAddedSkin","long",$nHWND,"long",$nSkinID) Return 1 Else SetError(2) Return 0 EndIf EndFunc Func _LoadSkin($nSkin, $nSkinID) If Not FileExists($nSkin) Then SetError(1) Return 0 EndIf If $nSkinID > 1 Then DllCall($nSkinCrafterDll, "int:cdecl", "AddSkinFromFile", "wstr", $nSkin, "short",$nSkinID) Return 1 Else SetError(2) Return 0 EndIf EndFunc Func _ExcludeSkin($nHWND) If Not WinExists($nHWND) Then SetError(1) Return 0 EndIf DllCall($nSkinCrafterDll, "int:cdecl", "ExcludeWnd", "long", $nHWND) Return 1 EndFunc Link to comment Share on other sites More sharing options...
PsaltyDS Posted August 14, 2011 Share Posted August 14, 2011 (edited) Is there anyone who have skincrafter.dll (v 3.5.1) without the stupid pop-up?Because i have tried to use skin for autoit, but in demo version .dll has a pop-up... after when it's close, autoit.exe crash, i don't know why... i used this code (it's an example):Skincrafter is a commercial product. It sounds like you have the freeware demo version, which includes a nag screen. If you don't like that, buy a license to the full version and you'll get the .dll without the nag screen. Edited August 14, 2011 by PsaltyDS Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now