Hey Leute.
Ich habe mir einmal eine kleine Mouseover UDF geschrieben, und möchte diese mit euch teilen
UDF:
Spoiler anzeigen
#include-Once
[/autoit] [autoit][/autoit] [autoit]; #INDEX# ===========================================================================================================
; Name ...........: Mouse Over
; Sprache ........: Deutsch
; Beschreibung ...: Funktion zum ändern des Bildes eines Controls(Mouse over).
; Author .........: cinema
; ====================================================================================================================
Func _mover($control, $bild1, $bild2)
[/autoit] [autoit][/autoit] [autoit]$mpos = GUIGetCursorInfo()
If (IsArray($mpos)) Then
If ($mpos[4] = $control) Then
GUICtrlSetImage($control, $bild2)
Else
GUICtrlSetImage($control, $bild1)
EndIf
EndIf
EndFunc
[/autoit]Erklärung:
$control = ControlId (zum Beispiel bei einen Button in Koda wäre dass $Button1)
$bild1 = Das Bild, welches angezeigt werden soll, wenn die Maus NICHT über dem Control ist
$bild2 = Das Bild, welches angezeigt werden soll, wenn die Maus über dem Control ist
Hier ein Beispielscript:
Spoiler anzeigen
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include "_mover.au3"
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 625, 445, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 192, 128, 80, 57, BitOR($BS_BITMAP,$WS_GROUP))
GUICtrlSetImage(-1, "ok_nact.bmp", -1)
GUICtrlSetFont(-1, 7, 400, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
Sleep(100)
_mover($Button1, "ok_nact.bmp","ok_act.bmp")
WEnd
Also, verbesserungsvorschläge sind gern gesehen. Werde vllt noch andere GUI UDF´s rausbringen.
LG cinema