Sign in to follow this  
Followers 0
Kyme

Gui skining help

10 posts in this topic

#1 ·  Posted (edited)

i try to skin gui whit EzSkin but i have problems......

i have script

#include <EzSkin.au3>
#include <GuiConstants.au3>
#Include <GUIListBox.au3>
#include <string.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>


Global $Ini = @ScriptDir & "\Data_Base.ini"
Opt("TrayMenuMode",1)
TraySetIcon(@ScriptDir & "\E2.ico")


$Menu1= GUICreate("Universal Hider",180,220,-1,-1,-1,BitOR(@SW_SHOW,$WS_EX_TOOLWINDOW))
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Menu1, "int", 500, "long", 0x00040010)
AnimateTitle($Menu1, "Universal Hider", 100)
GUISetState(True)


GUICtrlCreateLabel('Connector:',10,15,52,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlCreateLabel('Bot:',10,40,50,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlCreateLabel('Game:',10,67,50,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlCreateGroup("",75, 8, 100, 78, $BS_CENTER)
$1=GUICtrlCreateLabel((IniRead("data.ini", "Settings", "Connector:", "")),80,16,90,2*9)
GUICtrlSetColor(-1, 0x3A80F3)
$2=GUICtrlCreateLabel((IniRead ("data.ini", "Settings", "Bot:", "")),80,40,90,2*9)
GUICtrlSetColor(-1, 0x3A80F3)
$3=GUICtrlCreateLabel((IniRead ("data.ini", "Settings", "Client:", "")),80,67,90,2*9)
GUICtrlSetColor(-1, 0x3A80F3)


GUICtrlCreateLabel('Bot:',10,120,52,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlCreateLabel('Game:',10,140,52,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlCreateLabel('Connector:',10,100,52,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")

;~ GUICtrlCreateGroup("",75,85, 100, 78, $BS_CENTER)
$10=GUICtrlCreateLabel("",80,100,52,2*9)
$11=GUICtrlCreateLabel("",80,120,52,2*9)
$12=GUICtrlCreateLabel("",80,140,52,2*9)



$filecap = GUICtrlCreateMenu ("&File")
$set = GUICtrlCreateMenuitem ("Settings",$filecap)
$delete = GUICtrlCreateMenuitem ("Delete Data",$filecap)
$filein = GUICtrlCreateMenuitem ("Quit",$filecap)



$hide = Guictrlcreatebutton("Hide Master", 8, 160, 2*40)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFF0000)
$show = Guictrlcreatebutton("Show Master", 95, 160, 2*40)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFF0000)



$help = GUICtrlCreateMenu ("Help")
$help1 = GUICtrlCreateMenuitem ("Hot Keys",$help)
$aboutcap = GUICtrlCreateMenu ("About")
$aboutin = GUICtrlCreateMenuitem ("About",$aboutcap)


$displaymenu = TrayCreateMenu("Display")
$thide = TrayCreateItem("Hide (Shift+F1)",$displaymenu)
$tshow = TrayCreateItem("Show (Shift+F2)",$displaymenu)
$abouttray = TrayCreateItem("Created By")
$exittray = TrayCreateItem("Exit")

$conecth = IniRead("data.ini", "Settings", "Connector:", "")
$both = IniRead ("data.ini", "Settings", "Bot:", "")
$clienth = IniRead ("data.ini", "Settings", "Client:", "")

$Menu2=GUICreate("Settings",320,87,-1,-1,-1,BitOR(@SW_HIDE,$WS_EX_TOOLWINDOW))
$conector = GuiCtrlCreateInput('',75,8,100,2*9)
GUICtrlCreateLabel('Connector:',10,10,52,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
$saveconect = Guictrlcreatebutton("Save", 180, 6, 35,20)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x000000)
$helpconect = Guictrlcreatebutton("?", 215, 6, 20,20)
GUICtrlSetColor(-1, 0xD5BA02)
$sconect = Guictrlcreatebutton("S", 235, 6, 20,20)
GUICtrlSetColor(-1, 0x00BF00)
$hconect = Guictrlcreatebutton("H", 255, 6, 20,20)
GUICtrlSetColor(-1, 0x7B04FF)
$kconect = Guictrlcreatebutton("Kill", 275, 6, 40,20)
GUICtrlSetColor(-1, 0xFF0404)

$bot = GuiCtrlCreateInput('',75,33,100,2*9)
GUICtrlCreateLabel('Bot:',10,35,50,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
$savebot = Guictrlcreatebutton("Save", 180, 32, 35,20)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x000000)
$helpbot = Guictrlcreatebutton("?", 215, 32, 20,20)
GUICtrlSetColor(-1, 0xD5BA02)
$sbot = Guictrlcreatebutton("S", 235, 32, 20,20)
GUICtrlSetColor(-1, 0x00BF00)
$hbot = Guictrlcreatebutton("H", 255, 32, 20,20)
GUICtrlSetColor(-1, 0x7B04FF)
$kbot = Guictrlcreatebutton("Kill", 275, 32, 40,20)
GUICtrlSetColor(-1, 0xFF0404)



$client = GuiCtrlCreateInput('',75,58,100,2*9)
GUICtrlCreateLabel('Client:',10,62,50,2*9)
$saveclient = Guictrlcreatebutton("Save", 180, 57, 35,20)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x000000)
$helpclient = Guictrlcreatebutton("?", 215, 57, 20,20)
GUICtrlSetColor(-1, 0xD5BA02)
$sclient = Guictrlcreatebutton("S", 235, 57, 20,20)
GUICtrlSetColor(-1, 0x00BF00)
$hclient = Guictrlcreatebutton("H", 255, 57, 20,20)
GUICtrlSetColor(-1, 0x7B04FF)
$kclient = Guictrlcreatebutton("Kill", 275, 57, 40,20)
GUICtrlSetColor(-1, 0xFF0404)





$Menu3= GUICreate("Welcome",600,220,-1,280,BitOR($WS_POPUP,$WS_EX_TOOLWINDOW))
WinSetOnTop("Welcome", "", 1)
GuiSetState(False)
GuiCtrlCreatePic("w1.bmp",0,0, 600,220)

hotkeyset("!{F1}", "hide");alt F1
hotkeyset("!{F2}", "show");alt F2
hotkeyset("!{F12}", "delete");alt F12
hotkeyset("+{F1}", "hideuni");shift F1
hotkeyset("+{F2}", "showuni");shift F2
hotkeyset("+{F4}", "exit_");shift F4


$Menu4= GUICreate("HotKeys",600,220,-1,-1,-1,BitOR(@SW_HIDE,$WS_EX_TOOLWINDOW))
GuiSetState(False)
GuiCtrlCreatePic("hk.jpg",0,0, 600,220)

While 1
    $tray = TrayGetMsg()
    $msg = GUIGetMsg()
    Select
        Case $msg= $kconect
            WinClose($conecth)
        Case $msg= $Kbot
            WinClose($both)             
        Case $msg= $kclient
            WinClose($clienth)
        case $tray= $thide
            hideuni()
        case $tray= $tshow
            showuni()
        case $tray= $abouttray
            MsgBox(4144,"Info:","Created by Kyme")  
        case $tray= $exittray
            Exit(DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Menu1, "int", 500, "long", 0x00050010))
        case $msg= $set
        GUISetState(@SW_show, $Menu2)
        Case $msg= $filein
            ExitLoop
        Case $msg= $aboutin
            GUISetState(@SW_SHOW, $Menu3)
            Sleep(2000)
            Send("{ESC}")
        Case $msg= $help1
            GUISetState(@SW_SHOW, $Menu4)
        Case $msg= $delete
                delete()
        case $msg= $saveconect
            GUISetState(@SW_HIDE, $Menu2)
            GUISetState(@SW_HIDE, $Menu1)
            IniWrite ("data.ini", "Settings", "Connector:", GUICtrlRead($conector))
            GUICtrlSetData ($1, IniRead ("data.ini", "Settings", "Connector:", ""))
            ToolTip(" ",450,-1,"Saving...",4144)
            Sleep(1500)
                Run(@ScriptDir & "\UH6.exe")
                    Exit
        case $msg= $helpconect
            MsgBox(0,"",(IniRead ("data.ini", "Settings", "Connector:", "")))
        case $msg= $savebot
            GUISetState(@SW_HIDE, $Menu2)
            GUISetState(@SW_HIDE, $Menu1)
            IniWrite ("data.ini", "Settings", "Bot:", GUICtrlRead($bot))
            GUICtrlSetData ($2, IniRead ("data.ini", "Settings", "Bot:", ""))
            ToolTip(" ",450,-1,"Saving...",4144)
            Sleep(1500)
                Run(@ScriptDir & "\UH6.exe")
                    Exit
        case $msg= $helpbot
            MsgBox(0,"",(IniRead ("data.ini", "Settings", "Bot:", "")))
        case $msg= $saveclient
            GUISetState(@SW_HIDE, $Menu2)
            GUISetState(@SW_HIDE, $Menu1)
            IniWrite ("data.ini", "Settings", "Client:", GUICtrlRead($client))
            GUICtrlSetData ($3, IniRead ("data.ini", "Settings", "Client:", ""))
            ToolTip(" ",450,-1,"Saving...",4144)
            Sleep(1500)
                Run(@ScriptDir & "\UH6.exe")
                    Exit
        case $msg= $helpclient
            MsgBox(0,"",(IniRead ("data.ini", "Settings", "Client:", "")))
        case $msg= $sconect
            cshow()
        case $msg= $hconect
            chide()
        case $msg= $sbot
            bshow()
        case $msg= $hbot
            bhide()
        case $msg= $sclient
            clshow()
        case $msg= $hclient
            clhide()                 
        
    EndSelect

        If WinExists($conecth) Then
            GUICtrlSetData ($10, "Online")
            GUICtrlSetFont($10, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($10, 0x00B900)
        EndIf
        If Not WinExists($conecth) Then
            GUICtrlSetData ($10, "Offline")
            GUICtrlSetFont($10, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($10, 0xFF0000)
        EndIf
                If WinExists($both) Then
            GUICtrlSetData ($11, "Online")
            GUICtrlSetFont($11, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($11, 0x00B900)
        EndIf
        If Not WinExists($both) Then
            GUICtrlSetData ($11, "Offline")
            GUICtrlSetFont($11, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($11, 0xFF0000)
        EndIf
                If WinExists($clienth) Then
            GUICtrlSetData ($12, "Online")
            GUICtrlSetFont($12, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($12, 0x00B900)
        EndIf
        If Not WinExists($clienth) Then
            GUICtrlSetData ($12, "Offline")
            GUICtrlSetFont($12, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($12, 0xFF0000)
        EndIf
        If $msg = -3 Then 
        If WinActive($Menu1) then Exit(DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Menu1, "int", 500, "long", 0x00050010))
            GUISetState(@SW_HIDE, $Menu2)
            GUISetState(@SW_HIDE, $Menu3)
            GUISetState(@SW_HIDE, $Menu4)
        EndIf
        If $msg= $hide Then
            hide()
        EndIf
        If $msg= $show Then
            show()
        EndIf
    WEnd
    
func.............................................

i try to be $Menu1= EzSkinGUICreate("Universal Hider",180,220)

and i got some err...

can give me somebody some clue???

tnx

Edited by Kyme

Share this post


Link to post
Share on other sites



this worked for me

BUT, EzSkin does not work with GUICtrlCreateMenu

#region ; Code generated by EzSkin_1-2-3, Created by Valuater
; For personal use only, All Rights Reserved
; Author of this code: Valuater
; Thank you big_daddy and Joscpe




#include <EzSkin.au3>
#include <GuiConstants.au3>
#Include <GUIListBox.au3>
#include <string.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <ButtonConstants.au3>


Global $Ini = @ScriptDir & "\Data_Base.ini"
Opt("TrayMenuMode",1)
TraySetIcon(@ScriptDir & "\E2.ico")


$Menu1= EzSkinGUICreate("Universal Hider",180,220);,-1,-1,-1,BitOR(@SW_SHOW,$WS_EX_TOOLWINDOW))
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Menu1, "int", 500, "long", 0x00040010)
;AnimateTitle($Menu1, "Universal Hider", 100)
GUISetState(True)


GUICtrlCreateLabel('Connector:',10,15,52,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlCreateLabel('Bot:',10,40,50,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlCreateLabel('Game:',10,67,50,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlCreateGroup("",75, 8, 100, 78, $BS_CENTER)
$1=GUICtrlCreateLabel((IniRead("data.ini", "Settings", "Connector:", "")),80,16,90,2*9)
GUICtrlSetColor(-1, 0x3A80F3)
$2=GUICtrlCreateLabel((IniRead ("data.ini", "Settings", "Bot:", "")),80,40,90,2*9)
GUICtrlSetColor(-1, 0x3A80F3)
$3=GUICtrlCreateLabel((IniRead ("data.ini", "Settings", "Client:", "")),80,67,90,2*9)
GUICtrlSetColor(-1, 0x3A80F3)


GUICtrlCreateLabel('Bot:',10,120,52,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlCreateLabel('Game:',10,140,52,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlCreateLabel('Connector:',10,100,52,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")

;~ GUICtrlCreateGroup("",75,85, 100, 78, $BS_CENTER)
$10=GUICtrlCreateLabel("",80,100,52,2*9)
$11=GUICtrlCreateLabel("",80,120,52,2*9)
$12=GUICtrlCreateLabel("",80,140,52,2*9)



$filecap = GUICtrlCreateMenu ("&File")
$set = GUICtrlCreateMenuitem ("Settings",$filecap)
$delete = GUICtrlCreateMenuitem ("Delete Data",$filecap)
$filein = GUICtrlCreateMenuitem ("Quit",$filecap)



$hide = Guictrlcreatebutton("Hide Master", 8, 160, 2*40)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFF0000)
$show = Guictrlcreatebutton("Show Master", 95, 160, 2*40)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0xFF0000)



$help = GUICtrlCreateMenu ("Help")
$help1 = GUICtrlCreateMenuitem ("Hot Keys",$help)
$aboutcap = GUICtrlCreateMenu ("About")
$aboutin = GUICtrlCreateMenuitem ("About",$aboutcap)


$displaymenu = TrayCreateMenu("Display")
$thide = TrayCreateItem("Hide (Shift+F1)",$displaymenu)
$tshow = TrayCreateItem("Show (Shift+F2)",$displaymenu)
$abouttray = TrayCreateItem("Created By")
$exittray = TrayCreateItem("Exit")

$conecth = IniRead("data.ini", "Settings", "Connector:", "")
$both = IniRead ("data.ini", "Settings", "Bot:", "")
$clienth = IniRead ("data.ini", "Settings", "Client:", "")

$Menu2=GUICreate("Settings",320,87,-1,-1,-1,BitOR(@SW_HIDE,$WS_EX_TOOLWINDOW))
$conector = GuiCtrlCreateInput('',75,8,100,2*9)
GUICtrlCreateLabel('Connector:',10,10,52,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
$saveconect = Guictrlcreatebutton("Save", 180, 6, 35,20)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x000000)
$helpconect = Guictrlcreatebutton("?", 215, 6, 20,20)
GUICtrlSetColor(-1, 0xD5BA02)
$sconect = Guictrlcreatebutton("S", 235, 6, 20,20)
GUICtrlSetColor(-1, 0x00BF00)
$hconect = Guictrlcreatebutton("H", 255, 6, 20,20)
GUICtrlSetColor(-1, 0x7B04FF)
$kconect = Guictrlcreatebutton("Kill", 275, 6, 40,20)
GUICtrlSetColor(-1, 0xFF0404)

$bot = GuiCtrlCreateInput('',75,33,100,2*9)
GUICtrlCreateLabel('Bot:',10,35,50,2*9)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
$savebot = Guictrlcreatebutton("Save", 180, 32, 35,20)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x000000)
$helpbot = Guictrlcreatebutton("?", 215, 32, 20,20)
GUICtrlSetColor(-1, 0xD5BA02)
$sbot = Guictrlcreatebutton("S", 235, 32, 20,20)
GUICtrlSetColor(-1, 0x00BF00)
$hbot = Guictrlcreatebutton("H", 255, 32, 20,20)
GUICtrlSetColor(-1, 0x7B04FF)
$kbot = Guictrlcreatebutton("Kill", 275, 32, 40,20)
GUICtrlSetColor(-1, 0xFF0404)



$client = GuiCtrlCreateInput('',75,58,100,2*9)
GUICtrlCreateLabel('Client:',10,62,50,2*9)
$saveclient = Guictrlcreatebutton("Save", 180, 57, 35,20)
GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x000000)
$helpclient = Guictrlcreatebutton("?", 215, 57, 20,20)
GUICtrlSetColor(-1, 0xD5BA02)
$sclient = Guictrlcreatebutton("S", 235, 57, 20,20)
GUICtrlSetColor(-1, 0x00BF00)
$hclient = Guictrlcreatebutton("H", 255, 57, 20,20)
GUICtrlSetColor(-1, 0x7B04FF)
$kclient = Guictrlcreatebutton("Kill", 275, 57, 40,20)
GUICtrlSetColor(-1, 0xFF0404)





$Menu3= GUICreate("Welcome",600,220,-1,280,BitOR($WS_POPUP,$WS_EX_TOOLWINDOW))
WinSetOnTop("Welcome", "", 1)
GuiSetState(False)
GuiCtrlCreatePic("w1.bmp",0,0, 600,220)

;hotkeyset("!{F1}", "hide");alt F1
;hotkeyset("!{F2}", "show");alt F2
;hotkeyset("!{F12}", "delete");alt F12
;hotkeyset("+{F1}", "hideuni");shift F1
;hotkeyset("+{F2}", "showuni");shift F2
;hotkeyset("+{F4}", "exit_");shift F4


$Menu4= GUICreate("HotKeys",600,220,-1,-1,-1,BitOR(@SW_HIDE,$WS_EX_TOOLWINDOW))
GuiSetState(False)
GuiCtrlCreatePic("hk.jpg",0,0, 600,220)

While 1
    $tray = TrayGetMsg()
    $msg = GUIGetMsg()
    Select
        Case $msg= $kconect
            WinClose($conecth)
        Case $msg= $Kbot
            WinClose($both)                
        Case $msg= $kclient
            WinClose($clienth)
        case $tray= $thide
            ;hideuni()
        case $tray= $tshow
            ;showuni()
        case $tray= $abouttray
            MsgBox(4144,"Info:","Created by Kyme")    
        case $tray= $exittray
            Exit(DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Menu1, "int", 500, "long", 0x00050010))
        case $msg= $set
        GUISetState(@SW_show, $Menu2)
        Case $msg= $filein
            ExitLoop
        Case $msg= $aboutin
            GUISetState(@SW_SHOW, $Menu3)
            Sleep(2000)
            Send("{ESC}")
        Case $msg= $help1
            GUISetState(@SW_SHOW, $Menu4)
        Case $msg= $delete
                ;delete()
        case $msg= $saveconect
            GUISetState(@SW_HIDE, $Menu2)
            GUISetState(@SW_HIDE, $Menu1)
            IniWrite ("data.ini", "Settings", "Connector:", GUICtrlRead($conector))
            GUICtrlSetData ($1, IniRead ("data.ini", "Settings", "Connector:", ""))
            ToolTip(" ",450,-1,"Saving...",4144)
            Sleep(1500)
                Run(@ScriptDir & "\UH6.exe")
                    Exit
        case $msg= $helpconect
            MsgBox(0,"",(IniRead ("data.ini", "Settings", "Connector:", "")))
        case $msg= $savebot
            GUISetState(@SW_HIDE, $Menu2)
            GUISetState(@SW_HIDE, $Menu1)
            IniWrite ("data.ini", "Settings", "Bot:", GUICtrlRead($bot))
            GUICtrlSetData ($2, IniRead ("data.ini", "Settings", "Bot:", ""))
            ToolTip(" ",450,-1,"Saving...",4144)
            Sleep(1500)
                Run(@ScriptDir & "\UH6.exe")
                    Exit
        case $msg= $helpbot
            MsgBox(0,"",(IniRead ("data.ini", "Settings", "Bot:", "")))
        case $msg= $saveclient
            GUISetState(@SW_HIDE, $Menu2)
            GUISetState(@SW_HIDE, $Menu1)
            IniWrite ("data.ini", "Settings", "Client:", GUICtrlRead($client))
            GUICtrlSetData ($3, IniRead ("data.ini", "Settings", "Client:", ""))
            ToolTip(" ",450,-1,"Saving...",4144)
            Sleep(1500)
                Run(@ScriptDir & "\UH6.exe")
                    Exit
        case $msg= $helpclient
            MsgBox(0,"",(IniRead ("data.ini", "Settings", "Client:", "")))
        case $msg= $sconect
            ;cshow()
        case $msg= $hconect
            ;chide()
        case $msg= $sbot
            ;bshow()
        case $msg= $hbot
            ;bhide()
        case $msg= $sclient
            ;clshow()
        case $msg= $hclient
            ;clhide()                
        
    EndSelect

        If WinExists($conecth) Then
            GUICtrlSetData ($10, "Online")
            GUICtrlSetFont($10, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($10, 0x00B900)
        EndIf
        If Not WinExists($conecth) Then
            GUICtrlSetData ($10, "Offline")
            GUICtrlSetFont($10, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($10, 0xFF0000)
        EndIf
                If WinExists($both) Then
            GUICtrlSetData ($11, "Online")
            GUICtrlSetFont($11, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($11, 0x00B900)
        EndIf
        If Not WinExists($both) Then
            GUICtrlSetData ($11, "Offline")
            GUICtrlSetFont($11, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($11, 0xFF0000)
        EndIf
                If WinExists($clienth) Then
            GUICtrlSetData ($12, "Online")
            GUICtrlSetFont($12, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($12, 0x00B900)
        EndIf
        If Not WinExists($clienth) Then
            GUICtrlSetData ($12, "Offline")
            GUICtrlSetFont($12, 8, 400, 0, "Comic Sans MS")
            GUICtrlSetColor($12, 0xFF0000)
        EndIf
        If $msg = -3 Then
        If WinActive($Menu1) then Exit(DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Menu1, "int", 500, "long", 0x00050010))
            GUISetState(@SW_HIDE, $Menu2)
            GUISetState(@SW_HIDE, $Menu3)
            GUISetState(@SW_HIDE, $Menu4)
        EndIf
        If $msg= $hide Then
            ;hide()
        EndIf
        If $msg= $show Then
            ;show()
        EndIf
    WEnd

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

i have some problem

i print screen to understand my problem

Posted Image

some idea?

i think it's some problem whit EzSkin.au3....or i use autoit too high version???

Edited by Kyme

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

1st try replacing the EzSkin file ( make a new one )

... other than that I have no Idea, I gave you a script that worked

You are not mixing EzSkin with XSkin are you??

8)

Edited by Valuater

NEWHeader1.png

Share this post


Link to post
Share on other sites

#5 ·  Posted (edited)

1st try replacing the EzSkin file ( make a new one )

... other than that I have no Idea, I gave you a script that worked

You are not mixing EzSkin with XSkin are you??

8)

i have take EzSkin.au3 from EzSkin but i think have some bug:( if you wanna i upload EzSkin.au3 for check it:D

i don't know what it's the problem:((

tnx

Edit:i have some idea...if you have time upload EzSkin.au3 and my gui skined....maybe my autoit it's the problem...(too high version...)or try to skin it and say my the rezult...if it's work upload EzSkin.au3 to try whit you'res^^

Edited by Kyme

Share this post


Link to post
Share on other sites

ok place the code/script and the folder with EzSkin and the pics in a zip file and I will look at it!

... again

place EVERYTHING the code/script and the folder with EzSkin.au3 and the pics in a zip file and I will look at it!

just upload it here

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

i make it:D i was reinstall my windows and then "BOOM"....it work:D:D:D

now i have 1 question...how i can make it multi skin???

whit out copy command???

other one...what i need to change in EzSkin.au3 to can rename EzSkin folder to skins???

tnx alot

Share this post


Link to post
Share on other sites

#8 ·  Posted (edited)

can somebody give me some ideea how to make skin changer

i don't know how to make:

#Include <XSkin.au3> 

; folder of skin
$Skin_Folder = @ScriptDir & Iniread ("C:\data.ini", "Settings", "Skin", "")

$XSkinGui = XSkinGUICreate( "My GUI", 400, 450, $Skin_Folder)
$filecap = GUICtrlCreateMenu ("&File")
$skinset1 = GUICtrlCreateMenuitem ("Skin1",$filecap)
$skinset2 = GUICtrlCreateMenuitem ("Skin2",$filecap)
$skinset3 = GUICtrlCreateMenuitem ("Skin3",$filecap)

While 1
    $msg = GUIGetMsg()
    Select
        case $msg= $skinset1
            Iniwrite ("C:\data.ini", "Settings", "Skin", "skin1")
        case $msg= $skinset2
            Iniwrite ("C:\data.ini", "Settings", "Skin", "skin2")
        Case $msg= $skinset3
            Iniwrite ("C:\data.ini", "Settings", "Skin", "skin3")
    EndSelect
WEnd

skin1 skin2 skin3 it's folders

how to set it whit GUICtrlCreateMenuitem???

tnx alot

Edited by Kyme

Share this post


Link to post
Share on other sites

That is close!!!

but, you are confusing me XSkin and EzSkin are two different progs!!!...???

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

That is close!!!

but, you are confusing me XSkin and EzSkin are two different progs!!!...???

8)

i have use XSkin whit this i can make multi skin but i have problems whit skin list:(

if you have time and you can help me see This topic

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  
Followers 0