Einzelnen Beitrag anzeigen

Stecky2000

Registriert seit: 7. Mai 2008
Ort: Trebur
66 Beiträge
 
Delphi 2010 Professional
 
#1

dynamische Menüs und Untermenüs unchecken?

  Alt 26. Sep 2009, 12:40
Hi ,

ich erstelle in meine Programm zur Laufzeit 4 Menües mit Untermenüs, sprich
Menu1...............Menu2...............Menu3..... ..........Menu4
Menu1_Item1...Menu2_Item1...Menu3_Item1...Menu4_It em1
Menu1_Item2...Menu2_Item2...Menu3_Item1...Menu4_It em1
Menu1_Item3...Menu2_Item3...Menu3_Item1...Menu4_It em1
Menu1_Item4...Menu2_Item4...Menu3_Item1...Menu4_It em1

Wenn ich ein Untermenü dann anklicke und eine endsprechende Funktionalität ausführe,
kann ich mit

(Sender as TMenuItem).Checked := True; einen Haken beim angeklickten Untermenüpunkt setzen.

Doch wie bekomme ich den wieder raus?
Wenn ich wieder auf ein anderen Menüpunktklicke dann ist bei (Sender as TMenuItem)
ja der Zeiger(Index) auf den neu angeklickten Menüpunkt gesetzt also

funktioniert

(Sender as TMenuItem).Checked := False; nicht.

Weis jemand einen Lösungsweg?
  Mit Zitat antworten Zitat