Problem with GUI-Menu

[Zen]

This is my Problem.

Run this Script an you see it.

expandcollapse popup

#include <GUIConstants.au3>

opt("GUIOnEventMode", 1)
opt("GUICloseOnESC", 0)
opt("GUIResizeMode", 0)

opt("TrayIconHide", 1)

$mainwindow = GUICreate("GUI-Window", 400, 350)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")

$filemenu = GUICtrlCreateMenu("Datei")
$toolmenu = GUICtrlCreateMenu("Tool")
$helpmenu = GUICtrlCreateMenu("?")

$toolitemA = GUICtrlCreateMenuItem("MenueA", $toolmenu)
GUICtrlSetOnEvent($toolitemA, "MenueA")
$toolitemB = GUICtrlCreateMenuItem("MenueB", $toolmenu)
GUICtrlSetOnEvent($toolitemB, "MenueB")

$optionitem = GUICtrlCreateMenuItem("Option", $helpmenu)
GUICtrlSetOnEvent($optionitem, "Option")
$infoitem = GUICtrlCreateMenuItem("Info", $helpmenu)
GUICtrlSetOnEvent($infoitem, "Info")

$exititem = GUICtrlCreateMenuItem("Exit", $filemenu)
GUICtrlSetOnEvent($exititem, "_Exit")
$trennlineitem = GUICtrlCreateMenuItem("", $filemenu, 2)
$byZen = GUICtrlCreateMenuItem("by Zen", $filemenu)
GUICtrlSetState(-1, $GUI_DISABLE)

GUISetState()

$msg = 0
While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()
WEnd

Func MenueA()
    WinSetTitle("GUI-Window", "", "GUI-window | Menue A")
    GUICtrlCreateLabel("Menue A", 160, 20)
    GUICtrlCreateLabel("A long Text" & @CRLF & "" & @CRLF & "aaaaaaaaaaaaaaabbbbbbbbbbbbbbbbbbbcccccccccccccccccccdddddddddddddddddddddeeeeeeeeeeeeeeeeeeeeff

fffffffffffgggggggggggg", 50, 75, 300, 100)
    GUICtrlCreateLabel("X-Achse", 125, 160)
    GUICtrlCreateLabel("Y-Achse", 200, 160)
EndFunc

Func MenueB()
    WinSetTitle("GUI-Window", "", "GUI-window | Menue B")
    GUICtrlCreateLabel("Menue B", 170, 25)
    GUICtrlCreateLabel("A long Text" & @CRLF & "" & @CRLF & "mndakondonasdonapdinaidnasidnasasjduiapjwrkfodaeü füiü iiasidaipüpia  pidopasidüiawroiir üapsdaud opiaü uüa üasuiwüiaias", 40, 90, 280, 100)
    GUICtrlCreateLabel("X-Achse", 130, 170)
    GUICtrlCreateLabel("Y-Achse", 210, 170)
EndFunc

Func Option()
    $CommanderCheck = GUICtrlCreateCheckbox("Commander?", 20, 30)
    GUICtrlSetOnEvent($CommanderCheck, "CommanderCheck")
    $CommanderRead = IniRead("Option.ini", "Option", "Commander", "Not found")
    If $CommanderRead = "20" Then GUICtrlSetState($CommanderCheck, $GUI_CHECKED)
    GUICtrlCreateGroup("Option", 10, 10, 160, 170)
    GUICtrlCreateGroup("Free", 190, 10, 200, 170)
    GUICtrlCreateGroup("Path of a Program", 10, 200, 380, 140)
    GUICtrlCreateLabel("Path", 20, 220, 100, 20)
    $Path = IniRead("Optionen.ini", "Option", "Path", "Not found")
    $SSPath = GUICtrlCreateInput($Path, 20, 240, 360, 20)
    $SSPathRead = GUICtrlRead($SSPath)
    IniWrite("Option.ini", "Option", "Path", $SSPathRead)
EndFunc  ;==>Optionen

Func Info()
    MsgBox(64, "Info", "blub!")
EndFunc  ;==>Info

Func _Exit()
    If @GUI_WinHandle = $mainwindow Then
        MsgBox(0, "Zen sagt Ciao Ciao", "Vielen Dank, dass Sie sich für Zen's Script entschieden haben! Programm wird beendet...", 5)
        Exit
    EndIf
EndFunc  ;==>Beenden

Can i fix it?

[Jos]

This is my Problem.

Run this Script an you see it.

Can i fix it?

Maybe you need to explain what you want?

Don't understand why you would want to create COntrols eveytime you click on a menu item...

[Zen]

A new Menu Item make new Text. But, when i click on the frist Menu item, the text is coming well. But when i click on the second menu item, all text is there, from the first and the second.

(My english is bad, Sorry)

Run the Script and click on "Menu A", then "Menu B". You see the Problem

[rambo3889]

then maybe use something like this

Func second()

guictrldelete(Your labels)

Guictrlcreatelabel("text")

EndFunc

[Zen]

Hmm, good idea.

But when the gui is much bigger, what then?