Hilfe
SetMenuText
Aufruf
Parameter
Rückgabewert
Beschreibung
Beispiel
Siehe auch
SetMenuText menü, text$
Parameter
menü | Identität eines Menüs |
text | Neuer Text |
Rückgabewert
-
Beschreibung
Die Anweisung SetMenuText ändert die Bezeichnung eines Menüs. Der Text kann nur geändert, jedoch nicht wieder ausgelesen werden!
UpdateWindowMenu
muss auf jeden Fall aufgerufen werden - da das Menü sonst nicht geändert wird.


Beispiel
Standardbeispiel:
window = CreateWindow("Fenster", 0, 20, 400, 300, 0, 7)
start = MilliSecs()
menu = CreateMenu("Zeit seit dem Start: 0", 1, WindowMenu(window))
CreateButton("Update", 0, 0, 100, 30, window)
UpdateWindowMenu window
Repeat
SetMenuText Menu, "Zeit seit dem Start: " + Str$(MilliSecs() - start)
If GetKey() = 27 Then End
Select WaitEvent()
Case $803
End
Case $401
UpdateWindowMenu window
End Select
Forever
start = MilliSecs()
menu = CreateMenu("Zeit seit dem Start: 0", 1, WindowMenu(window))
CreateButton("Update", 0, 0, 100, 30, window)
UpdateWindowMenu window
Repeat
SetMenuText Menu, "Zeit seit dem Start: " + Str$(MilliSecs() - start)
If GetKey() = 27 Then End
Select WaitEvent()
Case $803
End
Case $401
UpdateWindowMenu window
End Select
Forever
Siehe auch
CheckMenu, CreateMenu, DisableMenu, EnableMenu, MenuChecked, MenuEnabled, MenuText, UncheckMenu, UpdateWindowMenu, WindowMenu

