Jump to content
Sign in to follow this  
keen

Skin Help

Recommended Posts

The skin in this script isnt working and i cant figure it out. It says that it cant findthe skin. I tryed it with other skins too and it wont work.

Script:

#include <GUIConstants.au3>
#include <File.au3>
#include <XSkin.au3> 

FileWrite("c:/blank.txt", "")
Global $oRP


; folder of skin
$Skin_Folder = @ScriptDir & "\Graphics Files"

$XSkinGui = XSkinGUICreate("Vault - Version 1.0.0", 1002, 727, 149, 114, $Skin_Folder)

GUISetBkColor(0xFFFFFF)
$Pic1 = GUICtrlCreatePic("S:\My Documents\JORDANS STUFF\Vault - Mrs. Johnsons Program\Graphics Files\Main-Image.gif", 104, 0, 750, 150, BitOR($SS_NOTIFY,$WS_GROUP))
GUISetBkColor(0xFFFFFF)

$Button1 = GUICtrlCreateButton("Admin Login", 850, 10, 81, 25, 0)

GUICtrlCreateTab(10, 170, 975, 547)
GUISetBkColor(0xFFFFFF)
$Date1 = GUICtrlCreateDate("", 32, 680, 233, 24)
$TabSheet2 = GUICtrlCreateTabItem("Check Out")
$Label1 = GUICtrlCreateLabel("Welcome to the checkout system. Please fill out the information at the bottom of the screen to check a book out.", 14, 237, 966, 20, $SS_CENTER)
$Group1 = GUICtrlCreateGroup("Check Out", 64, 320, 857, 337)
$Input1 = GUICtrlCreateInput("", 248, 368, 241, 24)
$Label2 = GUICtrlCreateLabel("Your Name (First And Last)", 80, 368, 163, 20)
$Label3 = GUICtrlCreateLabel("Class Period:", 80, 416, 84, 20)
$Input2 = GUICtrlCreateInput("", 168, 416, 17, 24)
$Label4 = GUICtrlCreateLabel("Name Of Book:", 232, 416, 95, 20)
$Input3 = GUICtrlCreateInput("", 336, 416, 241, 24)
$Label5 = GUICtrlCreateLabel("Date Checked Out:", 624, 416, 116, 20)
$Input4 = GUICtrlCreateInput("", 744, 416, 145, 24)
$Button2 = GUICtrlCreateButton("Log Book Checkout", 424, 576, 125, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$TabSheet3 = GUICtrlCreateTabItem("Returning Books")
$Label1 = GUICtrlCreateLabel("Welcome to the checkout system. Please fill out the information at the bottom of the screen to Return a book.", 14, 237, 966, 20, $SS_CENTER)
$Group2 = GUICtrlCreateGroup("Return", 64, 320, 857, 337)
$Inpur1 = GUICtrlCreateInput("", 248, 368, 241, 24)
$Labelr2 = GUICtrlCreateLabel("Your Name (First And Last)", 80, 368, 163, 20)
$Labelr4 = GUICtrlCreateLabel("Name Of Book:", 232, 416, 95, 20)
$Inpur3 = GUICtrlCreateInput("", 336, 416, 241, 24)
$Labelr5 = GUICtrlCreateLabel("Date Returned:", 624, 416, 116, 20)
$Inpur4 = GUICtrlCreateInput("", 744, 416, 145, 24)
$Laber3 = GUICtrlCreateLabel("Class Period:", 80, 416, 84, 20)
$Inpur2 = GUICtrlCreateInput("", 168, 416, 17, 24)
$Buttor2 = GUICtrlCreateButton("Log Book Return", 424, 576, 110, 25, 0)


GUISetState(@SW_SHOW)

While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button2
          IniWrite (@ScriptDir & "\CheckedOut.ini","","1","  Name: "&GUICTrlRead($Input1)&"  Period: "&GUICTrlRead($Input2)&"  Name of book: "&GUICTrlRead($Input3)&"  Date Checked Out: "&GUICTrlRead($Input4))
            GUICtrlSetData ($Input1,"")
            GUICtrlSetData ($Input2,"")
            GUICtrlSetData ($Input3,"")
            GUICtrlSetData ($Input4, "")
            MsgBox (0,"Logged", "Checkout Information has been Logged!")
        Case $Buttor2
            IniWrite (@ScriptDir & "\Return.ini","","1",@CRLF &"  Name: "&GUICTrlRead($Inpur1)&"  Name of book: "&GUICTrlRead($Inpur3)&"  Period: "&GUICTrlRead($Inpur2)&"  Date Returned: "&GUICTrlRead($Inpur4))
            GUICtrlSetData ($Inpur1,"")
            GUICtrlSetData ($Inpur3,"")
            GUICtrlSetData ($Inpur2,"")
            GUICtrlSetData ($Inpur4,"")
            MsgBox (0,"Logged", "Return Information has been Logged!")
            
    EndSwitch
WEnd
Edited by keen

[center]Kesne's Bar & Grill[/center]

Share this post


Link to post
Share on other sites

; per instructions

; $XSkinGui = XSkinGUICreate( $guiTitle, $guiWidth, $guiHeight, $Skin_Folder) ; uses defaults

; so...................

$XSkinGui = XSkinGUICreate("Vault - Version 1.0.0", 1002, 727, $Skin_Folder)

WinMove($XSkinGui, "", 149, 114) ; move the gui

GUISetState()

8)

Edited by Valuater

Share this post


Link to post
Share on other sites

this worked for me...

I only changed 2 lines

$Skin_Folder = @ScriptDir & "\Skins\Blackjack"

$XSkinGui = XSkinGUICreate("Vault - Version 1.0.0", 1002, 727, $Skin_Folder)

#include <GUIConstants.au3>
#include <File.au3>
#include <XSkin.au3>

FileWrite("c:/blank.txt", "")
Global $oRP


; folder of skin
;$Skin_Folder = @ScriptDir & "\Graphics Files"

$Skin_Folder = @ScriptDir & "\Skins\Blackjack" 

$XSkinGui = XSkinGUICreate("Vault - Version 1.0.0", 1002, 727, $Skin_Folder)

GUISetBkColor(0xFFFFFF)
$Pic1 = GUICtrlCreatePic("S:\My Documents\JORDANS STUFF\Vault - Mrs. Johnsons Program\Graphics Files\Main-Image.gif", 104, 0, 750, 150, BitOR($SS_NOTIFY,$WS_GROUP))
GUISetBkColor(0xFFFFFF)

$Button1 = GUICtrlCreateButton("Admin Login", 850, 10, 81, 25, 0)

GUICtrlCreateTab(10, 170, 975, 547)
GUISetBkColor(0xFFFFFF)
$Date1 = GUICtrlCreateDate("", 32, 680, 233, 24)
$TabSheet2 = GUICtrlCreateTabItem("Check Out")
$Label1 = GUICtrlCreateLabel("Welcome to the checkout system. Please fill out the information at the bottom of the screen to check a book out.", 14, 237, 966, 20, $SS_CENTER)
$Group1 = GUICtrlCreateGroup("Check Out", 64, 320, 857, 337)
$Input1 = GUICtrlCreateInput("", 248, 368, 241, 24)
$Label2 = GUICtrlCreateLabel("Your Name (First And Last)", 80, 368, 163, 20)
$Label3 = GUICtrlCreateLabel("Class Period:", 80, 416, 84, 20)
$Input2 = GUICtrlCreateInput("", 168, 416, 17, 24)
$Label4 = GUICtrlCreateLabel("Name Of Book:", 232, 416, 95, 20)
$Input3 = GUICtrlCreateInput("", 336, 416, 241, 24)
$Label5 = GUICtrlCreateLabel("Date Checked Out:", 624, 416, 116, 20)
$Input4 = GUICtrlCreateInput("", 744, 416, 145, 24)
$Button2 = GUICtrlCreateButton("Log Book Checkout", 424, 576, 125, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$TabSheet3 = GUICtrlCreateTabItem("Returning Books")
$Label1 = GUICtrlCreateLabel("Welcome to the checkout system. Please fill out the information at the bottom of the screen to Return a book.", 14, 237, 966, 20, $SS_CENTER)
$Group2 = GUICtrlCreateGroup("Return", 64, 320, 857, 337)
$Inpur1 = GUICtrlCreateInput("", 248, 368, 241, 24)
$Labelr2 = GUICtrlCreateLabel("Your Name (First And Last)", 80, 368, 163, 20)
$Labelr4 = GUICtrlCreateLabel("Name Of Book:", 232, 416, 95, 20)
$Inpur3 = GUICtrlCreateInput("", 336, 416, 241, 24)
$Labelr5 = GUICtrlCreateLabel("Date Returned:", 624, 416, 116, 20)
$Inpur4 = GUICtrlCreateInput("", 744, 416, 145, 24)
$Laber3 = GUICtrlCreateLabel("Class Period:", 80, 416, 84, 20)
$Inpur2 = GUICtrlCreateInput("", 168, 416, 17, 24)
$Buttor2 = GUICtrlCreateButton("Log Book Return", 424, 576, 110, 25, 0)


GUISetState(@SW_SHOW)

While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button2
          IniWrite (@ScriptDir & "\CheckedOut.ini","","1","  Name: "&GUICTrlRead($Input1)&"  Period: "&GUICTrlRead($Input2)&"  Name of book: "&GUICTrlRead($Input3)&"  Date Checked Out: "&GUICTrlRead($Input4))
            GUICtrlSetData ($Input1,"")
            GUICtrlSetData ($Input2,"")
            GUICtrlSetData ($Input3,"")
            GUICtrlSetData ($Input4, "")
            MsgBox (0,"Logged", "Checkout Information has been Logged!")
        Case $Buttor2
            IniWrite (@ScriptDir & "\Return.ini","","1",@CRLF &"  Name: "&GUICTrlRead($Inpur1)&"  Name of book: "&GUICTrlRead($Inpur3)&"  Period: "&GUICTrlRead($Inpur2)&"  Date Returned: "&GUICTrlRead($Inpur4))
            GUICtrlSetData ($Inpur1,"")
            GUICtrlSetData ($Inpur3,"")
            GUICtrlSetData ($Inpur2,"")
            GUICtrlSetData ($Inpur4,"")
            MsgBox (0,"Logged", "Return Information has been Logged!")
            
    EndSwitch
WEnd

8)

Share this post


Link to post
Share on other sites

additionaly...

1

you will need to re-size the controls based on the size of your skin

2

you use... GUISetBkColor(0xFFFFFF) 3 times, remember there is a difference in

GUISetBkColor(0xFFFFFF)... and

GUICtrlSetBkColor( $control, 0xFFFFFF)

3

I would suggest you use the XSkin Icons for the minnimize/Exit buttons at the top right

$XIcon = XSkinIcon ($XSkinGui, 2)

; $XIcon[1] = Exit, $XIcon[2] = minimize

and in the loop...

Case $msg = $XIcon[1]

Exit

Case $msg = $XIcon[2]

GUISetState(@SW_MINIMIZE)

8)

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  

×
×
  • Create New...