|
Registriert seit: 19. Feb 2007
Ort: In der Lüneburger Heide
165 Beiträge
Delphi 10.4 Sydney
|
Re: MainMenü suche
17. Mär 2010, 08:17
Hab ich selbst noch nicht gemacht, aber einen Hinweis könnte ich Dir dazu liefern. Das TMainMenu hat Items und Items.Count. Die kannst Du auswerten und dann die Caption jedes einzelnen gegen Deinen Suchstring vergleichen. Hat der entsprechende Menüeintrag Untermenüpunkte (verschachteltes Menü), dann findet man ebenfalls wieder Items.Count > 0 und Item-Elemente. Kann man deshalb vermutlich auch rekursiv lösen, bei jedem Treffer das TMenuItem einer globalen Liste zuschlagen.
Allerdings solltest Du aus den TMenuItem.Captions das erste Vorkommen von & entfernen, das ist das Zeichen welchen einen Shortcut einleitet, sonst vergleicht es sich so schwer.
PS.: GGf. solltest Du über Deinen Post nochmal drüberlesen, bevor Du auf "Absenden" klickst - sieht ein wenig hingekliert aus.
Carsten
|