Autoit| wie mach ich das wenn ich"Start drücke ein kasten der vorher dunkler wa heller aufläuchtet bzw wie lege ich so einen kasten erst an"?

  • Hallo, ich möchte für meinen script eine art "ampel" machen die ca so aussieht

    Start []wenn an, wenn aus: []

    Pause []wenn an hell wennaus dunkel ca so: []

    Ende [] sollte immer hellrot läuchten aber halt ien großer 4eckiger kasten.

    ______________________________________________________________
    würde gerne wissen 1. wie man so kleine "fenster" mit der jeweiligen funtion verbindet, wie man diese farbig macht und wie autoit kappiert das wenn ich auf start drücke das fenster hellgrün zu leuchten hatt... :| finde dazu auch keine tuts ..

  • Meinst du ne checkbox???
    Wenn nicht benutz GUICtrlCreateLabel mit breiten und höhenangabe und der funktion GUICtrlSetBKColor

    Beispiele wie das funktioniert gibts in der Hilfe

    MFG FireFlyer

    *Paradox ist, wenn man sich im Handumdrehen den Fuss bricht* :D

  • ein Ansatz:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>

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

    $hGUI = GUICreate("Test", 500, 500)
    $hLabel = GUICtrlCreateLabel("", 10, 10, 50, 50)
    GUICtrlSetBkColor(-1, 0xFF0000)
    GUICtrlCreateLabel("", 11, 11, 48, 48)

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

    $1=GUICtrlCreateButton("Start",70,40)
    $2=GUICtrlCreateButton("Pause",110,40)
    $3=GUICtrlCreateButton("Ende",170,40)
    GUISetState()

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

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    Case $1
    GUICtrlSetBkColor($hLabel, 0x00FF00)
    Case $2
    GUICtrlSetBkColor($hLabel, 0xFF0000)
    Case $3
    GUICtrlSetBkColor($hLabel, 0x333333)
    EndSwitch
    WEnd

    [/autoit]

    MfG Schnuffel

    "Sarkasmus ist die niedrigste Form des Witzes, aber die höchste Form der Intelligenz."
    Val McDermid

    ein paar Infos ...

    Wer mehr als "nur" Hilfe benötigt, kann sich gern im Forum "Programmieranfragen" an uns wenden. Wir helfen in allen Fällen, die die Forenregeln zulassen.

    Für schnelle Hilfe benötigen wir ein ! lauffähiges ! Script, dass wir als Demonstration des Problems testen können. Wer von uns erwartet ein Teilscript erstmal lauffähig zu bekommen, der hat
    1. keine wirkliche Not
    2. keinen Respekt vor Menschen die ihm in ihrer Freizeit Ihre Hilfe anbieten
    3. oder ist einfach nur faul und meint wir coden das für ihn

    In solchen Fällen erlaube ich mir, die Anfrage einfach zu ignorieren. ;)

  • schöner ansatz aber ich meinte das isch in meinem script der button färbt bzw was ein kleines vllt 1x1 großes (ausgefülltes) kästchen daneben erscheint , habe es mal mit dienem versucht nur leider müsste ich damit die oberfläsche enorm vergrößern...

  • so bitte schön,

    jetzt aber mal Hirn anstrengen und selber ein wenig tüfteln...

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <ButtonConstants.au3>

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

    $hGUI = GUICreate("Test", 500, 500)
    $b1 = GUICtrlCreateButton("Start", 10, 10,50,20)
    $b2 = GUICtrlCreateButton("Pause", 70, 10,50,20)
    $b3 = GUICtrlCreateButton("Ende", 130, 10,50,20)

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

    GUISetState()

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

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    Case $b1
    GUICtrlSetbkColor($b1, 0x00FF00)
    GUICtrlSetbkColor($b2, Default)
    GUICtrlSetbkColor($b3, Default)
    GUICtrlSetStyle($b2,$GUI_SS_DEFAULT_BUTTON)
    GUICtrlSetStyle($b3,$GUI_SS_DEFAULT_BUTTON)
    Case $b2
    GUICtrlSetbkColor($b1, Default)
    GUICtrlSetbkColor($b2, 0xFFFF00)
    GUICtrlSetbkColor($b3, Default)
    GUICtrlSetStyle($b1,$GUI_SS_DEFAULT_BUTTON)
    GUICtrlSetStyle($b3,$GUI_SS_DEFAULT_BUTTON)

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

    Case $b3
    GUICtrlSetbkColor($b1, Default)
    GUICtrlSetbkColor($b2, Default)
    GUICtrlSetbkColor($b3, 0xFF0000)
    GUICtrlSetStyle($b1,$GUI_SS_DEFAULT_BUTTON)
    GUICtrlSetStyle($b2,$GUI_SS_DEFAULT_BUTTON)
    EndSwitch
    WEnd

    [/autoit]

    MfG Schnuffel

    "Sarkasmus ist die niedrigste Form des Witzes, aber die höchste Form der Intelligenz."
    Val McDermid

    ein paar Infos ...

    Wer mehr als "nur" Hilfe benötigt, kann sich gern im Forum "Programmieranfragen" an uns wenden. Wir helfen in allen Fällen, die die Forenregeln zulassen.

    Für schnelle Hilfe benötigen wir ein ! lauffähiges ! Script, dass wir als Demonstration des Problems testen können. Wer von uns erwartet ein Teilscript erstmal lauffähig zu bekommen, der hat
    1. keine wirkliche Not
    2. keinen Respekt vor Menschen die ihm in ihrer Freizeit Ihre Hilfe anbieten
    3. oder ist einfach nur faul und meint wir coden das für ihn

    In solchen Fällen erlaube ich mir, die Anfrage einfach zu ignorieren. ;)

  • Oder so ;)

    Spoiler anzeigen
    [autoit]

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

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

    $hGUI = GUICreate("Test", 500, 500)

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

    GUIStartGroup()

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

    $lblColorStart = GUICtrlCreateLabel("", 8, 10, 44, 30, 0)
    GUICtrlSetState(-1, $GUI_DISABLE)
    $btnStart = GUICtrlCreateRadio("Start", 10, 12, 40, 20, $BS_PUSHLIKE)

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

    $lblColorPause = GUICtrlCreateLabel("", 53, 10, 44, 30, 0)
    GUICtrlSetState(-1, $GUI_DISABLE)
    $btnPause = GUICtrlCreateRadio("Pause", 55, 12, 40, 20, $BS_PUSHLIKE)

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

    $lblColorStop = GUICtrlCreateLabel("", 98, 10, 44, 30, 0)
    GUICtrlSetState(-1, $GUI_DISABLE)
    $btnStop = GUICtrlCreateRadio("Ende", 100, 12, 40, 20, $BS_PUSHLIKE)
    GUICtrlSetState(-1, $GUI_CHECKED)

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

    GUIStartGroup()
    ; Array: [ RadioButton für Status, Label für Farbe, Aktive Farbe, inaktive Farbe]
    Global $abtnColors[3][4] = [ _
    [ $btnStart, $lblColorStart, 0x11FF11, 0x00CC00 ], _
    [ $btnPause, $lblColorPause, 0xFFFF00, 0xFFAA00 ], _
    [ $btnStop, $lblColorStop, 0xFF1111, 0xAA0000 ] _
    ]
    _SetColors()

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

    GUISetState()

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

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    Case $btnStart
    _SetColors()
    Case $btnPause
    _SetColors()
    Case $btnStop
    _SetColors()
    EndSwitch
    WEnd

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

    Func _SetColors()
    For $i = 0 To UBound($abtnColors)-1
    Switch BitAND(GUICtrlRead($abtnColors[$i][0]), $GUI_CHECKED) = $GUI_CHECKED
    Case True
    GUICtrlSetBkColor($abtnColors[$i][1], $abtnColors[$i][2])
    Case False
    GUICtrlSetBkColor($abtnColors[$i][1], $abtnColors[$i][3])
    EndSwitch
    Next
    EndFunc

    [/autoit]
  • okay, das habe ich zwar so eingeggeben nun geht entweder farbige buttons nach klick oder keine farbe aber das script funzt :(