GUI veränderbar machen

    Hi,
    Bin ganz neu hier und hoffe das ich mich nicht gleich köpft wenn ich euch was extrem simples frage ...

    [Blockierte Grafik: http://saved.im/otg2njjxyzfq_vs/autoit1.png]

    Ich hab hier ein kleines Programm zum senden von "net send ..." Befehlen entworfen und habe Probleme mit der Grafischen Oberfläche!
    Ich möchte je nach dem welcher Radiobutton gedrückt ist, das ein anderer Inhalt im Einstellungen Fenster ist!
    Wie mache ich das?

    Mein meinen Aktuellen Versuchen flackert die Box nur oder passiert gar nichts!

    Hier mein Quelltext der GUI:

    Spoiler anzeigen
    [autoit]

    $titel = "Nachrichtendienst"
    $schrift = "Cambria"
    $size = 22
    $subschrift = "Calibri"
    $subsize = 10

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

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

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

    Opt("GUICoordMode", 1)
    GUICreate($titel, 461, 401, -1, -1, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_BORDER,$WS_CLIPSIBLINGS))
    GUISetFont($subsize, 400, 0, $subschrift)

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

    ; Haupt- Auswahlfenster
    $ort_ = GUICtrlCreateGroup(" Nachrichten senden an ... ", 32, 72, 185, 177, $BS_CENTER)
    GUICtrlSetFont(-1, $subsize, 400, 0, $subschrift)
    $ort_alle = GUICtrlCreateRadio("Alle", 48, 96, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))
    GUICtrlSetState(-1, $GUI_CHECKED)
    $ort_gruppe = GUICtrlCreateRadio("eine Gruppe von Rechnern", 48, 144, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))
    $ort_rz = GUICtrlCreateRadio("einen ganzen Rechenraum", 48, 120, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))
    $ort_pc = GUICtrlCreateRadio("einen einzigen Rechner", 48, 168, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))

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

    ; Senden Bereich
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUICtrlCreateLabel($titel, 48, 24, 367, 38, $SS_CENTER)
    GUICtrlSetFont(-1, $size, 400, 0, $schrift)
    $nachricht = GUICtrlCreateInput("Deine Nachricht ...", 150, 296, 283, 21)
    GUICtrlSetFont(-1, $subsize, 400, 0, $subschrift)
    GUICtrlCreateLabel("Gebe hier deine Nachricht ein:", 150, 272, 283, 17)
    GUICtrlSetFont(-1, $subsize, 400, 0, $subschrift)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $senden = GUICtrlCreateButton("Nachricht senden!", 104, 344, 241, 25, 0)
    GUICtrlSetFont(-1, $subsize, 400, 0, $subschrift)

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

    GUISetState(@SW_SHOW)

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

    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $senden
    Exit
    Case GUICtrlRead($ort_alle) == 4
    $box_pc = GUICtrlCreateGroup(" Eintellungen: ", 232, 72, 201, 177)
    GUICtrlSetFont(-1, $subsize, 400, 0, $subschrift)
    GUICtrlCreateLabel("Rechner Gruppe eingeben:", 240, 100, 177, 40)
    GUICtrlCreateInput("", 240, 136, 177, 21)
    Case GUICtrlRead($ort_gruppe) == 4
    $box_pc = GUICtrlCreateGroup(" Eintellungen: ", 232, 72, 201, 177)
    GUICtrlSetFont(-1, $subsize, 400, 0, $subschrift)
    GUICtrlCreateLabel("Rechner Nummer eingeben, an die gesendet werden soll:", 240, 100, 177, 40)
    GUICtrlCreateInput("", 240, 136, 177, 21)
    EndSwitch
    WEnd

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

    ...

    [/autoit]

    Ich danke euch schon mal für die Hilfe!

    kannst du zum script villeicht noch die deklarierten Variablen posten? wär nett, denn sonst bekomm ich da nur fehler beim ausführen

    Canyon

    Es geht einfacher als du vllt. denkst ;P

    Spoiler anzeigen
    [autoit]

    $titel = "Nachrichtendienst"
    $schrift = "Cambria"
    $size = 22
    $subschrift = "Calibri"
    $subsize = 10

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

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

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

    Opt("GUICoordMode", 1)
    GUICreate($titel, 461, 401, -1, -1, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_BORDER,$WS_CLIPSIBLINGS))
    GUISetFont($subsize, 400, 0, $subschrift)

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

    ; Haupt- Auswahlfenster
    $ort_ = GUICtrlCreateGroup(" Nachrichten senden an ... ", 32, 72, 185, 177, $BS_CENTER)
    GUICtrlSetFont(-1, $subsize, 400, 0, $subschrift)
    $ort_alle = GUICtrlCreateRadio("Alle", 48, 96, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))
    GUICtrlSetState(-1, $GUI_CHECKED)
    $ort_gruppe = GUICtrlCreateRadio("eine Gruppe von Rechnern", 48, 144, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))
    $ort_rz = GUICtrlCreateRadio("einen ganzen Rechenraum", 48, 120, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))
    $ort_pc = GUICtrlCreateRadio("einen einzigen Rechner", 48, 168, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))

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

    $box_pc = GUICtrlCreateGroup(" Eintellungen: ", 232, 72, 201, 177)
    $label = GUICtrlCreateLabel("Rechner Gruppe eingeben:", 240, 100, 177, 40)
    $input = GUICtrlCreateInput("", 240, 136, 177, 21)
    ; Senden Bereich
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUICtrlCreateLabel($titel, 48, 24, 367, 38, $SS_CENTER)
    GUICtrlSetFont(-1, $size, 400, 0, $schrift)
    $nachricht = GUICtrlCreateInput("Deine Nachricht ...", 150, 296, 283, 21)
    GUICtrlSetFont(-1, $subsize, 400, 0, $subschrift)
    GUICtrlCreateLabel("Gebe hier deine Nachricht ein:", 150, 272, 283, 17)
    GUICtrlSetFont(-1, $subsize, 400, 0, $subschrift)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $senden = GUICtrlCreateButton("Nachricht senden!", 104, 344, 241, 25, 0)
    GUICtrlSetFont(-1, $subsize, 400, 0, $subschrift)

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

    GUISetState(@SW_SHOW)

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

    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $senden
    Exit
    Case $ort_alle
    GuiCtrlSetData($label, "Rechner Gruppe eingeben:")
    Case $ort_gruppe
    GuiCtrlSetData($label, "Rechner Nummer eingeben, an die gesendet werden soll:")
    EndSwitch
    WEnd

    [/autoit]

    Niemals 2 Case-Fälle bestimmen die gleichzeitig wahr sein können!

    Mfg, ChaosKeks

    Biddö! :D
    Edit: Soo konnte den unaufgeräumten Code nich mehr ertragen und hab ebn Putzkolonne gespielt:

    Spoiler anzeigen
    [autoit]

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

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

    ; Main
    Opt("GUICoordMode", 1)
    GUICreate("Nachrichtendienst", 461, 341, -1, -1, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_BORDER,$WS_CLIPSIBLINGS))
    GUICtrlCreateLabel("Nachrichtendienst", 42, 15, 367, 38, $SS_CENTER)
    GUICtrlSetFont(-1, 22, 400, 0, "Cambria")
    GUISetFont(10, 400, 0, "Calibri")

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

    ; Auswahlfenster
    $ort_ = GUICtrlCreateGroup(" Nachrichten senden an ... ", 32, 62, 185, 135, $BS_CENTER)
    $ort_all = GUICtrlCreateRadio("Alle", 48, 88, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))
    $ort_gr = GUICtrlCreateRadio("Eine Gruppe von Rechnern", 48, 136, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))
    $ort_rz = GUICtrlCreateRadio("Einen ganzen Rechenraum", 48, 112, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))
    $ort_pc = GUICtrlCreateRadio("Einen einzigen Rechner", 48, 160, 161, 17, BitOR($BS_AUTORADIOBUTTON,$BS_LEFT))
    GUICtrlSetState($ort_all, $GUI_CHECKED)

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

    ; Einstellungen
    $box_pc = GUICtrlCreateGroup(" Eintellungen: ", 232, 62, 201, 135)
    $label = GUICtrlCreateLabel("Rechner Gruppe eingeben:", 240, 88, 177, 40)
    $input = GUICtrlCreateInput("", 240, 136, 177, 21)
    $input_gr = GUICtrlCreateInput("", 240, 162, 177, 21)
    GuiCtrlSetState($input_gr, $GUI_HIDE)

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

    ; Senden Bereich
    GUICtrlCreateLabel("Gebe hier deine Nachricht ein:", 140, 222, 283, 17)
    $nachricht = GUICtrlCreateInput("Deine Nachricht ...",85, 256, 283, 21)
    $senden = GUICtrlCreateButton("Nachricht senden!", 104, 294, 241, 25, 0)

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

    GUISetState(@SW_SHOW)

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

    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case $senden
    Exit

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

    Case $ort_all
    GuiCtrlSetData($label, "Rechner Gruppe eingeben:")
    GuiCtrlSetState($input_gr, $GUI_HIDE)

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

    Case $ort_gr
    GuiCtrlSetData($label, "Rechner Nummer eingeben, an die gesendet werden soll:")
    GuiCtrlSetState($input_gr, $GUI_SHOW)

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

    Case $ort_rz
    GuiCtrlSetState($input_gr, $GUI_HIDE)

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

    Case $ort_pc
    GuiCtrlSetState($input_gr, $GUI_HIDE)

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

    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]

    Einmal editiert, zuletzt von ChaosKeks (21. März 2009 um 13:07)