Hilfe

MenuChecked

B+

Aufruf

wert = MenuChecked (menü)

Parameter

Menü Identität eines Menüs


Rückgabewert

0 = Haken ausgeschaltet
1 = Haken eingeschaltet


Beschreibung

Die Funktion MenuChecked ermittelt, ob ein Haken vor einem Menü gesetzt wurde. Dieser Haken kann mit CheckMenu gesetzt und mit UncheckMenu entfernt werden. Nachdem ein Menü geändert wurde, muss UpdateWindowMenu auf jeden Fall aufgerufen werden - da das Menü sonst nicht geändert wird.


Beispiel

Standardbeispiel:

window = CreateWindow("Window", 50, 50, 200, 200, 0, 5)
menu1 = CreateMenu("Alien", 1, WindowMenu(window))
menu2 = CreateMenu("Mensch", 2, WindowMenu(window))
menu3 = CreateMenu("Mensch ausschalten", 3, menu1)
menu4 = CreateMenu("Alien ausschalten", 4, menu2)
UpdateWindowMenu window

Repeat
   If WaitEvent(1) = $1001 Then
      Select EventData()
         Case 3
            value = MenuChecked(menu3)
            If value = 0 Then CheckMenu(menu3) : DisableMenu menu4
            If value = 1 Then UncheckMenu(menu3) : EnableMenu menu4
            UpdateWindowMenu window
         Case 4
            value = MenuChecked(menu4)
            If value = 0 Then CheckMenu(menu4) : DisableMenu menu3
            If value = 1 Then UncheckMenu(menu4) : EnableMenu menu3
            UpdateWindowMenu window
      End Select
   EndIf
   If KeyHit(1) = 1 Then End
Forever


Siehe auch

CheckMenu, CreateMenu, DisableMenu, EnableMenu, MenuEnabled, MenuText, SetMenuText, UncheckMenu, UpdateWindowMenu, WindowMenu

Übersicht GUI Menü