Hallo,
ich habe eine GUI erstellt, wo sich 5 graue Sterne befinden. Fährt man z.b. mit der Maus über Stern 4 werden alle Sterne von 1 bis 4 gelb. Jetzt weiß ich aber nicht, wie ich es machen soll, wenn man nun wieder auf Stern 2 zurückgeht, dass alle Sterne bis Stern 2 gelb sind un der Rest grau. Kann mir jemand dabei Helfen?
Spoiler anzeigen
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Run_AU3Check=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.2.0
Author: myName
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]; Script Start - Add your code below here
[/autoit] [autoit][/autoit] [autoit]#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
_ErstelleNeuBearbeitenGUI("Sender hinzufügen", "Name", "www.www.www")
[/autoit] [autoit][/autoit] [autoit]Func _ErstelleNeuBearbeitenGUI($xiTitel, $xiSendername = "", $xiSenderadresse = "", $xiGenre = "", $xiBewertung = "")
Opt("GUIOnEventMode", 0)
Global $xProgrammOrdner = @ScriptDir
Local $xGenreListe = IniRead($xProgrammOrdner & "\Settings.ini", "Radio Station Manager", "GenreList", "")
Global $AltePos[1]
Global $SenderGUI_Handle = GUICreate($xiTitel, 406, 186)
GUISetBkColor(0xFFFFFF)
WinSetOnTop($SenderGUI_Handle, "", 1)
[/autoit] [autoit][/autoit] [autoit]GUICtrlCreateLabel("Sie haben hier die Möglichkeit, Desktop Radio mit weiteren Sendern zu ergänzen.", 8, 8, 389, 17)
GUICtrlSetColor(-1, 0x005ACE)
GUICtrlCreateLabel("Sendername:", 8, 40, 67, 17)
$xSendername = GUICtrlCreateInput($xiSendername, 96, 32, 265, 21)
GUICtrlCreateIcon($xProgrammOrdner & "\Images\Icons\Application\Radio Station Manager\Info.ico", -1, 376, 32, 16, 16)
GUICtrlSetTip(-1, "FGVFDGDFG"&@LF&"DXFDSVFGDSGD")
GUICtrlCreateLabel("Senderadresse:", 8, 64, 78, 17)
$xSenderadresse = GUICtrlCreateInput($xiSenderadresse, 96, 64, 265, 21)
GUICtrlCreateIcon($xProgrammOrdner & "\Images\Icons\Application\Radio Station Manager\Info.ico", -1, 376, 64, 16, 16)
GUICtrlCreateLabel("Genre:", 8, 96, 36, 17)
$xGenre = GUICtrlCreateCombo("", 96, 96, 265, 25)
GUICtrlSetData(-1, $xGenreListe, "Mix")
GUICtrlCreateIcon($xProgrammOrdner & "\Images\Icons\Application\Radio Station Manager\Info.ico", -1, 376, 96, 16, 16)
GUICtrlCreateLabel("Sender bewerten:", 8, 128, 88, 17)
[/autoit] [autoit][/autoit] [autoit]Global $xPicArray[6] = [5, _
GUICtrlCreatePic($xProgrammOrdner & "\Images\Radio Station Manager\StarOff.gif", 104, 128, 16, 16), _
GUICtrlCreatePic($xProgrammOrdner & "\Images\Radio Station Manager\StarOff.gif", 120, 128, 16, 16), _
GUICtrlCreatePic($xProgrammOrdner & "\Images\Radio Station Manager\StarOff.gif", 136, 128, 16, 16), _
GUICtrlCreatePic($xProgrammOrdner & "\Images\Radio Station Manager\StarOff.gif", 152, 128, 16, 16), _
GUICtrlCreatePic($xProgrammOrdner & "\Images\Radio Station Manager\StarOff.gif", 168, 128, 16, 16)]
$xAbbrechen = GUICtrlCreateButton("Abbrechen", 320, 152, 75, 25, $WS_GROUP)
$xOk = GUICtrlCreateButton("Ok", 240, 152, 75, 25, $WS_GROUP)
$xSenderTesten = GUICtrlCreateLabel("Sender testen", 8, 160, -1, 17)
GUICtrlSetFont(-1, 8, 400, 4, "MS Sans Serif")
GUICtrlSetColor(-1, 0x000080)
GUICtrlSetCursor (-1, 0)
GUISetState(@SW_SHOW)
AdlibRegister("_SenderGUIHoverFunktion", 20)
[/autoit] [autoit][/autoit] [autoit]While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Opt("GUIOnEventMode", 1)
Return 0
Case $xAbbrechen
Opt("GUIOnEventMode", 1)
Return 0
Case $xOk
Opt("GUIOnEventMode", 1)
Return 0
EndSwitch
WEnd
EndFunc
Func _SenderGUIHoverFunktion()
;Ermittelt Infos von der Maus.
Local $xCursor = GUIGetCursorInfo($SenderGUI_Handle)
;Beendet die Funktion, falls kein Wert zurückgegeben wurde.
If Not IsArray($xCursor) Then Return 0
;Schleife...
For $xa = 1 To 5
Switch $xCursor[4]
Case $xPicArray[$xa]
For $xb = 1 To $xa
GUICtrlSetImage($xPicArray[$xb], $xProgrammOrdner & "\Images\Radio Station Manager\StarOn.gif")
Next
$AltePos[0] = $xb
Case Else
Switch $AltePos[0]
Case 2
For $xb = 5 To 1 Step -1
GUICtrlSetImage($xPicArray[$xb], $xProgrammOrdner & "\Images\Radio Station Manager\StarOff.gif")
Next
EndSwitch
EndSwitch
Next
;~ GUICtrlSetImage($xPicArray[$i], $xProgrammOrdner & "\Images\Radio Station Manager\StarOn.gif")
;~ GUICtrlSetImage($xPicArray[$i], $xProgrammOrdner & "\Images\Radio Station Manager\StarOff.gif")
EndFunc
. Naja wenn man dann nochmal drüberfährt und man klickt einen Stern mit der linken Maustaste an wird dies in der Variable $Bewertung gespeichert. Wenn man wieder drüberfährt und über irgendeinen Stern ist und man die rechte Maustaste drückt wird $Bewertung auf 0. Wenn man jetzt eine Bewertung schon abgegeben hat und man möchte sie ändern, einfach drüber gehen und dementsprechen anklicken. Wenn man eine Bewertung abgibt und von den Sternen weggeht, wird trotzdem die Bewertung angezeigt, es sei denn man löscht sie.
. Aber na und las mich doch äättsch