Gui Button Change - MouseOver

Kev

Hey,

wollte mal fragen wie ich dass machen muss wenn ich mit der Maus über nen Button geh,das sich dann der Button verändert zu nem andern Bild.
MouseOver halt.

[autoit]

#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

GUICreate("Test", 600, 400)
GUICtrlCreatePic("C:\test.jpg",0,0,650,450,0)
GUISetState(@SW_SHOW)
$Button1 = GUICtrlCreateButton("test", 30, 150, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, @ScriptDir & "\Image1.bmp")

[/autoit][autoit][/autoit][autoit]

GUISetState ()

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
case $Button1

EndSwitch
WEnd

[/autoit]

Der Button ist drin, bloß dieser MouseOver change halt :x
kann mir da vill jemand helfen? thx

PrideRage

Hallo.
Also du brauchst eine Variable mit der Cursor Info: $cursor = GUIGetCursorInfo()
Und fragst dann ab, ob sie auf einem Control ist: If $cursor[4]
Siehe GUIGetCursorInfo
MfG. PrideRage

**Schnitzel**

n ganz simples hover beispiel wäre so:

Spoiler anzeigen

[autoit]

GUICreate("Test", 600, 400)
$label = GUICtrlCreateLabel("test", 30, 150, 140, 30)
GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit]

GUISetState ()
Adlibregister("_Hover_Label")

[/autoit] [autoit][/autoit] [autoit]

While sleep(100)
WEnd

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Func _Hover_Label()
$pos = GUIGetCursorInfo()
If $pos[4] = $label Then
GUICtrlSetBkColor($label, 0xFF0000)
Else
GUICtrlSetBkColor($label, Default)
EndIf
EndFunc

[/autoit]

Kev

error : unbekannter funktionsname

Adlibregister("_Hover_Label")

SEuBo

Dann bring deine AutoIt Version mal auf den neusten Stand.

ojo

Hi,

entweder Du machst ein Update von Autoit oder Du probierst Dein Glück mit:

AdlibRegister -> AdLibEnable
AdLibUnRegister -> AdLibDisable

;-))
Stefan

@Edit: De Prinz woor schnellä

**Schnitzel**

in den alten autoit versionen gibts noch kein adlibregister

seit dezember gibts die funktion erst

also bitte updaten

SEuBo

Der Vollständigkeit halber:
http://www.autoitscript.com/forum/index.php?showtopic=55120

GUICtrlSetOnHover-UDF

Kev

habs mir schon zusammengebastelt

aber trotzdem thx

[autoit]

#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

[/autoit][autoit][/autoit][autoit]

Global $Cursor1

[/autoit][autoit][/autoit][autoit]

GUICreate("Test", 600, 400)
GUICtrlCreatePic("C:\test.jpg",0,0,650,450,0)
GUISetState(@SW_SHOW)
$label = GUICtrlCreateButton("test", 30, 150, 140, 30, $BS_BITMAP)
$cursor = GUIGetCursorInfo()

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

GUISetState ()
AdlibRegister("_Hover_Label")

[/autoit][autoit][/autoit][autoit]

While sleep(100)
WEnd

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

Func _Hover_Label()
$pos = GUIGetCursorInfo()
If $pos[4] = $label Then
GUICtrlSetImage(-1, @ScriptDir & "\rg.bmp")
Else
GUICtrlSetImage(-1, @ScriptDir & "\rgt.bmp")
EndIf
EndFunc

[/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GuiGetMsg()
Switch $nMsg
case $Button1
EndSwitch
WEnd

[/autoit]

Kev

was is wenn ich des jaetz mit mehreren buttons machen will? :x
wie stell ichn das an?

yxyx

dan würd ich vorschlagen du machst das so

[autoit]

#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Global $Cursor1
GUICreate("Test", 600, 400)
GUICtrlCreatePic("C:\test.jpg",0,0,650,450,0)
GUISetState(@SW_SHOW)
$label1 = GUICtrlCreateButton("test", 30, 150, 140, 30, $BS_BITMAP)
$label2 = GUICtrlCreateButton("test", 30, 150, 140, 30, $BS_BITMAP)
$label3 = GUICtrlCreateButton("test", 30, 150, 140, 30, $BS_BITMAP)
$cursor = GUIGetCursorInfo()

[/autoit][autoit][/autoit][autoit]

GUISetState ()
AdlibRegister("_Hover_Label")
While sleep(100)
WEnd

[/autoit][autoit][/autoit][autoit]

Func _Hover_Label()
$pos = GUIGetCursorInfo()
If $pos[4] = $label1 Then
GUICtrlSetImage(-1, @ScriptDir & "\rg.bmp")
Else
GUICtrlSetImage(-1, @ScriptDir & "\rgt.bmp")
EndIf
If $pos[4] = $label2 Then
GUICtrlSetImage(-1, @ScriptDir & "\rg.bmp")
Else
GUICtrlSetImage(-1, @ScriptDir & "\rgt.bmp")
EndIf
If $pos[4] = $label3 Then
GUICtrlSetImage(-1, @ScriptDir & "\rg.bmp")
Else
GUICtrlSetImage(-1, @ScriptDir & "\rgt.bmp")
EndIf
EndFunc
While 1
$nMsg = GuiGetMsg()
Switch $nMsg
case $Button1
EndSwitch
WEnd

[/autoit]

**Schnitzel**

da solltest du dir lieber die hover udf ansehen.

wie gesagt meins war blos ein sehr einfaches beispiel. das ganze ist nicht gut lauffähig.

SEuBo hatte ihn zwar schon gepostet aber hier nochmal.

http://www.autoitscript.com/forum/index.php?showtopic=55120

lad dir die aktuellste version runter. da sind viele beispiele dabei

Kev

joa die buttonns gehen iwie nicht, krieg kein bild..überhaupt kein button mit image..

// update

das
GUICtrlSetOnHover

hab ich jetz au versucht, bin zu blöd dafür :x

**Schnitzel**

so hab dir da mal was gebastelt.
das ganze hat nur einen bug. und zwar weiß ich leider die standard styles nichtmehr und bin jetzt in eile. deshalb kriegst dus jetz einfach so^^

**Schnitzel**

hab dir nach deiner pm nochmal was gebastelt. hoffe das beendet deine sorgen nun

autoit.de/wcf/attachment/7755/

**autoBert**

Hallo Schnitzel,

Es gibt die Option OnExitFunc nicht mehr ===>

Code

C:\Programme\AutoIt3\Downloads\schnitzel\forum hover\forum hover\GUICtrlSetOnHover_UDF.au3(15,107) : ERROR: Opt() called with illegal argument 1: "OnExitFunc"
Global $__GUICtrl_SetOnHover_sOriginal_OnExitFunc 	= Opt("OnExitFunc", "__GUICtrl_SetOnHover_OnAutoItExit")

mfg >(>Auto)Bert

Kev

wunderbaaaaaaaaar

den rest krieg ich gebacken

vielen dank schnitzel

___________________________________

autoBert

Bei mir gehts

**Schnitzel**

Zitat von AutoBert

Es gibt die Option OnExitFunc nicht mehr ===>

jap das liegt aber an der udf. da wollte ich egtl nichts ändern.

Kev

Bei mir funzt alles wunderbar

habs mal erweitert

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUICtrlSetOnHover_UDF.au3>

[/autoit][autoit][/autoit][autoit]

Global $std_Hover_Image = @ScriptDir & "\rgt.bmp"
Global $sBack_Hover_Image = @ScriptDir & "\rg.bmp"
Global $std_Hover_Image2 = @ScriptDir & "\art.bmp"
Global $sBack_Hover_Image2 = @ScriptDir & "\ar.bmp"
Global $std_Hover_Image3 = @ScriptDir & "\ret.bmp"
Global $sBack_Hover_Image3 = @ScriptDir & "\re.bmp"
Global $std_Hover_Image4 = @ScriptDir & "\cat.bmp"
Global $sBack_Hover_Image4 = @ScriptDir & "\ca.bmp"
Global $std_Hover_Image5 = @ScriptDir & "\wot.bmp"
Global $sBack_Hover_Image5 = @ScriptDir & "\wo.bmp"

[/autoit][autoit][/autoit][autoit]

GUICreate("Test", 600, 400)
$button = GUICtrlCreateButton("test", 30, 150, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")
$button2 = GUICtrlCreateButton("test2", 30, 190, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image2)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")
$button3 = GUICtrlCreateButton("test3", 30, 230, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image3)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")
$button4= GUICtrlCreateButton("test4", 30, 270, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image4)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")
$button5= GUICtrlCreateButton("test5", 30, 310, 140, 30, $BS_BITMAP)
GUICtrlSetImage(-1, $std_Hover_Image5)
_GUICtrl_SetOnHover(-1, "_Hover_Image_Proc", "_Hover_Image_Proc")

[/autoit][autoit][/autoit][autoit]

GUISetState(@SW_SHOW)

[/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

[/autoit][autoit][/autoit][autoit]

Func _Hover_Image_Proc($iCtrlID, $iParam)
Local $picbutton1 = $sBack_Hover_Image
Local $picbutton2 = $sBack_Hover_Image2
Local $picbutton3 = $sBack_Hover_Image3
Local $picbutton4 = $sBack_Hover_Image4
Local $picbutton5 = $sBack_Hover_Image5
If $iParam = 2 Then
$picbutton1 = $std_Hover_Image
$picbutton2 = $std_Hover_Image2
$picbutton3 = $std_Hover_Image3
$picbutton4 = $std_Hover_Image4
$picbutton5 = $std_Hover_Image5
EndIf
Switch $iCtrlID
Case $button
GUICtrlSetImage($iCtrlID, $picbutton1)
Case $button2
GUICtrlSetImage($iCtrlID, $picbutton2)
Case $button3
GUICtrlSetImage($iCtrlID, $picbutton3)
Case $button4
GUICtrlSetImage($iCtrlID, $picbutton4)
Case $button5
GUICtrlSetImage($iCtrlID, $picbutton5)

EndSwitch
EndFunc

[/autoit]

**Schnitzel**

jap ich wollts ja so dass dus möglichst einfach erweitern kannst

bei windows 7 läufts leider nicht so gut. aber da musste selber schaun was los is^^