Jump to content

Xskin


Recommended Posts

can any help me, i am making a program called 'Runescape-Agrors'

and i would like the Gui to be skined: i have the file with the skin,(you can download it at bottome of post)

Here is my script so far:

CODE
#include <GUIConstants.au3>

MsgBox (4564, "error", "This is only a 15 day free trial, to get the full version go to http://pic5.piczo.com/agrors/?g=30053100")

GUICreate("Runescape-Agrors") ; will create a dialog box that when displayed is centered

GUISetBkColor(0x00E0FFFF)

GUISetFont(9, 300)

$tab=GUICtrlCreateTab (0,0,500,25)

$tab0=GUICtrlCreateTabitem ("Runescape-agrors")

$tab2=GUICtrlCreateTabitem ("Agrors")

$tab3=GUICtrlCreateTabitem ("Runehq")

GUISetState ()

; Run the GUI until the dialog is closed

While 1

$msg = GUIGetMsg()

If $msg = $GUI_EVENT_CLOSE Then ExitLoop

Wend

can any one post the script back with the skin added plz!

Ok im 14 with a spelling age of a 9 year old... that explanes all my spelling mistakes

Link to comment
Share on other sites

I will glady help and support XSkin....

But I need to see some effort..

here is the best way to show you

#include <XSkin.au3> 

; folder of skin
$Skin_Folder = @ScriptDir & "\Skins\Black-Yellow"

$XSkinGui = XSkinGUICreate( "My GUI", 400, 450, $Skin_Folder)

GUISetState()

While 1
    Sleep(10)
WEnd

XSkin Demonstration Page

8)

this don't work it open the skin and my other gui

here is my script now:

CODE
#include <XSkin.au3>

; folder of skin

$Skin_Folder = @ScriptDir & "\Skins\Blue-Gray"

$XSkinGui = XSkinGUICreate( "Runescape-Agrors", 400, 450, $Skin_Folder)

GUISetState()

#include <GUIConstants.au3>

MsgBox (4564, "error", "This is only a 15 day free trial, to get the full version go to http://pic5.piczo.com/agrors/?g=30053100")

GUICreate("Runescape-Agrors") ; will create a dialog box that when displayed is centered

GUISetBkColor(0x00E0FFFF)

GUISetFont(9, 300)

$tab=GUICtrlCreateTab (0,0,500,25)

$tab0=GUICtrlCreateTabitem ("Runescape-agrors")

$tab2=GUICtrlCreateTabitem ("Agrors")

$tab3=GUICtrlCreateTabitem ("Runehq")

GUISetState ()

; Run the GUI until the dialog is closed

While 1

$msg = GUIGetMsg()

If $msg = $GUI_EVENT_CLOSE Then ExitLoop

Wend

While 1

Sleep(10)

WEnd

Edited by SalazarCheats

Ok im 14 with a spelling age of a 9 year old... that explanes all my spelling mistakes

Link to comment
Share on other sites

Thats because you "made" 2 GUI's

#include <XSkin.au3>

; folder of skin
$Skin_Folder = @ScriptDir & "\Skins\Blue-Gray"

$XSkinGui = XSkinGUICreate( "Runescape-Agrors", 500, 550, $Skin_Folder)

;GUISetState()


#include <GUIConstants.au3>
MsgBox (4564, "error", "This is only a 15 day free trial, to get the full version go to http://pic5.piczo.com/agrors/?g=30053100")

;GUICreate("Runescape-Agrors") ; will create a dialog box that when displayed is centered

;GUISetBkColor(0x00E0FFFF)
GUISetFont(9, 300)

$tab=GUICtrlCreateTab (50,50,400,350)

$tab0=GUICtrlCreateTabitem ("Runescape-agrors")

$tab2=GUICtrlCreateTabitem ("Agrors")

$tab3=GUICtrlCreateTabitem ("Runehq")

GUISetState ()

; Run the GUI until the dialog is closed
While 1
$msg = GUIGetMsg()

If $msg = $GUI_EVENT_CLOSE Then ExitLoop
Wend
While 1
Sleep(10)
WEnd

8)

NEWHeader1.png

Link to comment
Share on other sites

Will this worked for me:

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

$Skin_Folder = @ScriptDir & "\Skins\Blue-Gray" ; folder of skin
$XSkinGui = XSkinGUICreate( "Runescape-Agrors", 400, 450, $Skin_Folder)
GUISetState()
MsgBox (4564, "error", "This is only a 15 day free trial, to get the full version go to http://pic5.piczo.com/agrors/?g=30053100")
GUICreate("Runescape-Agrors")  ; will create a dialog box that when displayed is centered
GUISetBkColor(0x00E0FFFF)
GUISetFont(9, 300)
$tab=GUICtrlCreateTab (0,0,500,25)
$tab0=GUICtrlCreateTabitem ("Runescape-agrors")
$tab2=GUICtrlCreateTabitem ("Agrors")  
$tab3=GUICtrlCreateTabitem ("Runehq")   
GUISetState ()
; Run the GUI until the dialog is closed
While 1 
$msg = GUIGetMsg()      
If $msg = $GUI_EVENT_CLOSE Then
 ExitLoop
 EndIf
Wend

While 1
    Sleep(10)
WEnd

I havent Changed anything.... (Except the location of #include <GUIConstants.au3>.....) :)

Edited Part:

Just missed out. :D

Edited by bert
Link to comment
Share on other sites

ok that works fine but were the close button and the minimize button i would like a fancy ones like the ones here:

from the "Demostration Page" I gave you the link to above

#include <XSkin.au3> 

; the two following folders are seperate for building skins
; however in YOUR program put them in the same folder
; folder of skin
$Skin_Folder = @ScriptDir & "\Skins\Black-Yellow"
; icon folder
$Icon_Folder = @ScriptDir & "\Skins\Default"

$XSkinGui = XSkinGUICreate( "My GUI", 400, 450, $Skin_Folder)
$XIcon = XSkinIcon($XSkinGui, 3)

GUISetState()


While 1
    $msg = GUIGetMsg()
    
    If $msg = $XIcon[1] Then Exit 
    If $msg = $XIcon[2] Then GUISetState(@SW_MINIMIZE)
    If $msg = $XIcon[3] Then MsgBox(0,0,"help",1)
    
WEnd

8)

NEWHeader1.png

Link to comment
Share on other sites

  • Moderators

People trip me out sometimes... Hey, I want to make this bad-ass thing, will you do the work so I can put my name on it? :)

Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.

Link to comment
Share on other sites

Link to comment
Share on other sites

PM

first i would like to to thanks for all the help u gave me the other day buy...

i have a few wore questions...

i have changed the code so it would have the exit and minimaise button that i wanted...

and it dones not load any of my other code now...

here is my code

CODE
#include <XSkin.au3>

; the two following folders are seperate for building skins

; however in YOUR program put them in the same folder

; folder of skin

$Skin_Folder = @ScriptDir & "\Skins\Blue-Gray"

; icon folder

$Icon_Folder = @ScriptDir & "\Needed-Files\icons"

$XSkinGui = XSkinGUICreate( "Runescape-Agrors", 400, 450, $Skin_Folder)

$XIcon = XSkinIcon($XSkinGui, 2)

GUISetState()

While 1

$msg = GUIGetMsg()

If $msg = $XIcon[1] Then Exit

If $msg = $XIcon[2] Then GUISetState(@SW_MINIMIZE)

WEnd

#include <GUIConstants.au3>

MsgBox (4564, "error", "This is only a 15 day free trial, to get the full version go to http://pic5.piczo.com/agrors/?g=30053100")

;GUICreate("Runescape-Agrors") ; will create a dialog box that when displayed is centered

;GUISetBkColor(0x00E0FFFF)

GUISetFont(9, 300)

$tab=GUICtrlCreateTab (50,50,400,350)

$tab0=GUICtrlCreateTabitem ("Runescape-agrors")

$tab2=GUICtrlCreateTabitem ("Agrors")

$tab3=GUICtrlCreateTabitem ("Runehq")

GUISetState ()

; Run the GUI until the dialog is closed

While 1

$msg = GUIGetMsg()

If $msg = $GUI_EVENT_CLOSE Then ExitLoop

Wend

While 1

Sleep(10)

WEnd

can you plz send it me so it the buttons are correct and that the other gui part is inside that gui

if you run it you will see what i meen

I already did this for you, look at my previous post, please dont PM me, How old are you anyways???

8)

NEWHeader1.png

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...