How to Create buttons that are like quicklaunch buttons?

[momar33]

How would i create buttons similar to the windows quicklaunch buttons?

By this i mean that the button would appear to just be an icon until it is moused over at which point it would look like a button.

Thanks

[Valuater]

Close, but not an icon

... just playing

#include <GUIConstants.au3>

$GUI = GUICreate("My GUI")

$b = GUICtrlCreateButton("File", 0, 0, 25, 25)
GUICtrlSetState(-1, $GUI_DISABLE)

GUISetState()


While 1

    $m = GUIGetMsg()
    
    If $m = -3 then Exit
    
    $c = GUIGetCursorInfo($GUI)
    If $c[4] = $b Then
        GUICtrlSetState( $b, $GUI_ENABLE)
            While $c[4] = $b
                If GUIGetMsg() = $b Then Do_Function()
                $c = GUIGetCursorInfo($GUI)
            WEnd
        GUICtrlSetState( $b, $GUI_DISABLE)
    EndIf
WEnd

Func Do_Function()
    MsgBox(0x0, "tset", "OK.....    ", 3)
EndFunc

8)

Edited September 28, 2007 by Valuater

[momar33]

That's not a bad start.

Unfortunately when you try to use $BS_ICON with it, the button looks different and the enable disable acts differently.

Also when the button is disabled it shows up as a different color.

I'm guessing this will require the use of custom made buttons, does anyone know of any UDFs for custom buttons?

[martin]

That's not a bad start.

Unfortunately when you try to use $BS_ICON with it, the button looks different and the enable disable acts differently.

Also when the button is disabled it shows up as a different color.

I'm guessing this will require the use of custom made buttons, does anyone know of any UDFs for custom buttons?

Just a small mod to Valuater's code is all you need.

expandcollapse popup

#include <GUIConstants.au3>

$GUI = GUICreate("My GUI")
$ic = GUICtrlCreateIcon("shell32.dll",22,4,4,32,32)
GUICtrlSetState(-1, $GUI_DISABLE)
$b = GUICtrlCreateButton("File", 0, 0, 40, 40,$BS_ICON)
GUICtrlSetImage (-1, "shell32.dll",22)
GUICtrlSetState(-1,$GUI_HIDE)

;GUICtrlSetState(-1, $GUI_DISABLE)

GUISetState()


While 1

    $m = GUIGetMsg()
   
    If $m = -3 then Exit
   
    $c = GUIGetCursorInfo($GUI)
    If $c[4] = $ic Then
        GUICtrlSetState( $b, $GUI_SHOW)
        GUICtrlSetState( $ic, $GUI_HIDE)
    ;Sleep(100)
        $c = GUIGetCursorInfo($GUI)
            While $c[4] = $b
                If GUIGetMsg() = $b Then Do_Function()
                $c = GUIGetCursorInfo($GUI)
            WEnd
        GUICtrlSetState( $b, $GUI_HIDE)
        GUICtrlSetState( $ic, $GUI_SHOW)
    EndIf
WEnd

Func Do_Function()
    MsgBox(0x0, "tset", "OK.....    ", 3)
EndFunc

EDIT:small improvement.

Edited October 1, 2007 by martin

[Madza91]

that is cool.... is possible to GuiCtrlCreatePic on button down?

[Valuater]

that is cool.... is possible to GuiCtrlCreatePic on button down?

I would create the pic first and hide it. The on button click just show the pic

GUICtrlSetState( $Control, $GUI_SHOW)

8)

[Madza91]

But how?

I am noob )

[Blue_Drache]

He showed you how.

[Madza91]

#include <GUIConstants.au3>

$GUI = GUICreate("My GUI")

$ic = GUICtrlCreatePic("1.jpg",0,0,100,23)

GUICtrlSetState(-1, $GUI_DISABLE)

$b = GUICtrlCreatePic("2.jpg",0,0,100,23)

GUICtrlSetState(-1,$GUI_HIDE)

$2 = GUICtrlCreatePic("3.jpg",0,0,100,23)

GUICtrlSetState(-1,$GUI_HIDE)

GUISetState()

While 1

$m = GUIGetMsg()

If $m = -3 then Exit

$c = GUIGetCursorInfo($GUI)

If $c[4] = $ic Then

GUICtrlSetState( $b, $GUI_SHOW)

GUICtrlSetState( $ic, $GUI_HIDE)

;Sleep(100)

$c = GUIGetCursorInfo($GUI)

While $c[4] = $b

If GUIGetMsg() = $b Then Do_Function()

$c = GUIGetCursorInfo($GUI)

WEnd

GUICtrlSetState( $b, $GUI_HIDE)

GUICtrlSetState( $ic, $GUI_SHOW)

EndIf

WEnd

Func Do_Function()

GUICtrlSetState( $2, $GUI_SHOW)

MsgBox(0x0, "tset", "OK..... ", 3)

EndFunc

This is fine but I want to see msg when Let that button not when I press button, like in default button !

(sorry for bad english)

[Valuater]

Like this???

http://www.xpcleanmenu.hostrocket.com/Autoit/WOW-Menu.exe

8)