Jump to content

Recommended Posts

Posted

Val,

Have you shared the source for the Demo GUI in your last post? Also is there any way to use the following two images for the buttons, "Button1.bmp" for the normal, and "Button2.bmp" for mouseover?

Posted ImageButton1.bmp

Posted ImageButton2.bmp

Thanks,

Bob

Haven't shared it yet..trying to finish

your buttons work great

Posted Image

8)

NEWHeader1.png

Posted (edited)

XSkin Plug-in

XSkinAnimate.au3

; Demo
#cs
#include <GUIConstants.au3>
Dim $repeat = 1
$hwnd = GUICreate("XSkin Animate", 300, 300)

$ret = XSkinAnimate($hwnd, 1, $repeat)
Sleep(2000)

While $repeat <= 28 ;*********** will error - for testing
    $repeat += 1
    XSkinAnimate($hwnd, "", $repeat)
    
    Sleep(1000)
    
    $repeat += 1
    XSkinAnimate($hwnd, "", $repeat)
    Sleep(1000)
WEnd
#ce



Func XSkinAnimate($Xwnd, $Xstate = 1, $Xstyle = 0, $Xtrans = 0, $Xspeed = 1000)
    ; $Xstate  - 1 = Show, 2 = Hide, "" = No State Set
    ; $Xstyle - 1=Fade, 3=Explode, 5=L-Slide, 7=R-Slide, 9=T-Slide, 11=B-Slide, 13=TL-Diag-Slide, 15=TR-Diag-Slide, 17=BL-Diag-Slide, 19=BR-Diag-Slide
    Local $Xpick = StringSplit('80000,90000,40010,50010,40001,50002,40002,50001,40004,50008,40008,50004,40005,5000a,40006,50009,40009,50006,4000a,50005', ",")
    If Not WinExists($Xwnd) Then XSkinAnError("XSkinAnimate, $Xwnd - Window not found   ")
    If $Xstyle > $Xpick[0] Then XSkinAnError("XSkinAnimate, $Xstyle max is 19  ")
    If $Xstyle <> 0 Then Local $ret = DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $Xwnd, "int", $Xspeed, "long", "0x000" & $Xpick[$Xstyle])
    If $Xtrans <> 0 Then WinSetTrans($Xwnd, "", $Xtrans)
    If $Xstate = 1 Then GUISetState(@SW_SHOW, $Xwnd)
    If $Xstate = 2 Then GUISetState(@SW_HIDE, $Xwnd)
    If $Xstyle <> 0 Then Return $ret
EndFunc   ;==>XSkinAnimate

Func XSkinAnError($XE_msg)
    MsgBox(262208, "XSkin Error", $XE_msg, 5)
    Exit
EndFunc   ;==>XSkinAnError

8)

Edited by Valuater

NEWHeader1.png

Posted (edited)

XSkinAnimate() (above)

Helped me find the errors with XSkinTrayBox not showing correctly!

WinMove makes the first picture ( underlying) display and

GUISetState() makes the top-most picture display....so

I made the important pics, 1st and last

..... Thus a new release of XSkin.au3

Feb 12, 2007

8)

Edited by Valuater

NEWHeader1.png

Posted

Thanks for all your work, Valuater. This is simply a great way to make programs look more professional. A great contribution to the forum :whistle:

Kurt

Awaiting Diablo III..

Posted

I'm back after a month... Sorry for that, Heres the latest version

Its attached below...

I had to redo it, I think its a bit better but I'm not sure, I'll have to add all theese new functions to it.

Updates In Version 1.1

*Added Shell & Shell Example

*Added A Tiny Tutorial

I'll release 1.2 tomorrow....

Just ONE Word... AweSome!!!!

Thanks for your contribution, Joscpe

Valuater

8)

NEWHeader1.png

  • Moderators
Posted (edited)

Here are the button packs for a few of my skins. The "Load Buttons" button is Press.bmp, the "XSkin Notepad" button is Over.bmp, and the rest are Normal.bmp

Posted ImagePosted Image

Posted ImagePosted Image

Extract this zip file into your "XSkin\Buttons\" folder.

Buttons.zip

Edited by big_daddy
Posted (edited)

Nice.. gottem...

WELL, What do ya think of this one!!!

Introducing EzSkin_1-2-3

Posted Image

exe style....

For the newbie, the non-understanding and the lazy

*** this is built by Xskin and never intended to be as vast or complicated

Just EASY!!!

Down-Load EzSkin_1-2-3

8)

Edited by Valuater

NEWHeader1.png

  • Moderators
Posted

You guys are doing a great job... Keep up the good work...

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.

  • Moderators
Posted

You guys are doing a great job... Keep up the good work...

Thank you Smoke!

@Val - I think it's awsome! That should bring an even bigger fan base to the project, great job!

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
  • Recently Browsing   0 members

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