Skin Help

keen · December 18, 2006

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 December 18, 2006 by keen

Valuater · December 18, 2006

; 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 December 18, 2006 by Valuater

keen · December 18, 2006

It cant find the skin folder.

Valuater · December 18, 2006

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)

keen · December 18, 2006

Ok i made my own skin graphics and it cant find graphic #0. Can you help? I have #0.

Valuater · December 18, 2006

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)

Valuater · December 18, 2006

Ok i made my own skin graphics and it cant find graphic #0. Can you help? I have #0.

you need to post EVEYTHING in a zip file here

your script, the folder for skin, skin pics and ini file, and XSkin.au3.... again EVERYTHING

so i can look at it for you

8)

keen · December 18, 2006

Wait... do the files have to be bmp?

Valuater · December 18, 2006

Wait... do the files have to be bmp?

All of them are bmp

http://www.autoitscript.com/forum/index.ph...st&p=243128

8)

keen · December 18, 2006

Ok Thanks!

keen · December 18, 2006

Wait... How can i make the graphics full scize when i put them on?

Valuater · December 18, 2006

Wait... How can i make the graphics full scize when i put them on?

not sue just what that question is asking...

maybe you want to work with GUICtrlCreatePic()

dunno

8)

keen · December 18, 2006

It reszizes my images to like 20x20.

Valuater · December 18, 2006

It reszizes my images to like 20x20.

look at the ini file....from instructions...

http://www.autoitscript.com/forum/index.ph...st&p=243093

8)

Sign In

Skin Help

Recommended Posts

keen

Valuater

keen

Valuater

keen

Valuater

Valuater

keen

Valuater

keen

keen

Valuater

keen

Valuater

Create an account or sign in to comment

Create an account

Sign in

Browse

AutoIt Resources

Release

Beta