Hilfe
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:
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

