Jump to content
Sign in to follow this  
ken82m

WORKING Skincrafter Example?

Recommended Posts

ken82m

I've found a bunch of old examples for Skincrafter but none of them seem to work.

Does anyone have an example that works with 3.3?

Thanks,

Kenny


My Contributions _StringMultiReplace PC Builders Console - Secure PDF Creator - Cisco VPN Installer MS DNS Server Backup Script - MS DHCP Backup Script IT Admin Console - Toggle Admin Mode - MyMovies-Add Discs Script - IT Help Desk and System Information Tool - Set On Lid Close Power Option - Streaming Media Server & Website "I believe that when we leave a place, part of it goes with us and part of us remains... Go anywhere, when it is quiet, and just listen.. After a while, you will hear the echoes of all our conversations, every thought and word we've exchanged.... Long after we are gone our voices will linger in these walls for as long as this place remains."

Share this post


Link to post
Share on other sites
BrettF

Share this post


Link to post
Share on other sites
ken82m

Well here's the simplest one I found

They all just crash

Windows says"AutoIT3 has stopped working"

SciTe gives me rc:-1073741783

Thanks,

Kenny

#include <GUIConstantsEx.au3>

;Used by SkinCrafter
$dll = DllOpen(@ScriptDir & "\SkinCrafterDLL.dll")
DllCall ($Dll, 'int', 'InitLicenKeys', _
        'int', BSTR ('0'), _
        'int', BSTR ('SKINCRAFTER'), _
        'int', BSTR ('SKINCRAFTER.COM'), _
        'int', BSTR ('support@skincrafter.com'), _
        'int', BSTR ('DEMOSKINCRAFTERLICENCE'))
DllCall ($Dll, 'int', 'DefineLanguage', 'int', 0)
DllCall ($Dll, 'int', 'InitDecoration', 'int', 1)
DllCall ($Dll, 'int', 'LoadSkinFromFile', 'int', BSTR (@ScriptDir & '\Skinastic.skf') );Select the skin to use here
DllCall ($Dll, 'int', 'ApplySkin')

GuiCreate("Test", 300, 270,(@DesktopWidth-220)/2, (@DesktopHeight-220)/2)
GUICtrlCreateButton("Test Button Ctrl", 10, 10, 190, 25)
GuiSetState()

DllCall($dll, "int", "UpdateControl", "int", 0)

While 1
    $msg = GuiGetMsg()
    Switch $msg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd


Func BSTR($str)
    $len = StringLen($str)
    $buff = DllCall("oleaut32.dll", "int", "SysAllocStringLen", "int", 0, "int", $len)
    DllCall("kernel32.dll", "int", "MultiByteToWideChar", "int", 0, "int", 0, "str", $str, "int", $len, "ptr", $buff[0], "int", $len)
    Return $buff[0]
EndFunc

Func OnAutoITExit()
    GUISetState(@SW_HIDE)
    DllCall($dll, "int", "DeInitDecoration")
    DllCall($dll, "int", "RemoveSkin")
    DllClose($dll)
    Exit
EndFunc

My Contributions _StringMultiReplace PC Builders Console - Secure PDF Creator - Cisco VPN Installer MS DNS Server Backup Script - MS DHCP Backup Script IT Admin Console - Toggle Admin Mode - MyMovies-Add Discs Script - IT Help Desk and System Information Tool - Set On Lid Close Power Option - Streaming Media Server & Website "I believe that when we leave a place, part of it goes with us and part of us remains... Go anywhere, when it is quiet, and just listen.. After a while, you will hear the echoes of all our conversations, every thought and word we've exchanged.... Long after we are gone our voices will linger in these walls for as long as this place remains."

Share this post


Link to post
Share on other sites
ken82m

Great, I'm lovin this thing lol

Thanks Again!

Kenny :P

Edited by ken82m

My Contributions _StringMultiReplace PC Builders Console - Secure PDF Creator - Cisco VPN Installer MS DNS Server Backup Script - MS DHCP Backup Script IT Admin Console - Toggle Admin Mode - MyMovies-Add Discs Script - IT Help Desk and System Information Tool - Set On Lid Close Power Option - Streaming Media Server & Website "I believe that when we leave a place, part of it goes with us and part of us remains... Go anywhere, when it is quiet, and just listen.. After a while, you will hear the echoes of all our conversations, every thought and word we've exchanged.... Long after we are gone our voices will linger in these walls for as long as this place remains."

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×