Einzelnen Beitrag anzeigen

torf160

Registriert seit: 20. Sep 2006
Ort: Bad Oldesloe
24 Beiträge
 
Delphi 3 Professional
 
#1

direkter Zugriff auf Menüpunkt

  Alt 8. Feb 2009, 11:47
Hallo,

ich möchte zur Laufzeit die Eigenschaft "visible" eines Menü-Punktes von false auf true setzen.

Ich habe das jetzt so gemacht:

Delphi-Quellcode:
procedure TForm1.AenderDasMenue;
var i : integer;
begin
    for I := 0 to MainMenu1.Items.Count-1 do
    begin
      if MainMenu1.Items[I].name = 'Daten1then
     begin
        MainMenu1.Items[I].visible := true;
     end;
    end;
end;
Das klappt auch. Mich würde aber doch interessieren, ob es eine Möglichkeit gibt, den Menü-Punkt auch direkt, über den Namen anzusprechen.
Also etwa so:

MainMenu1.Items['Daten1'].visible := true;
Schon mal vielen Dank für Eure Antworten.

torf160
Thomas Hamdorf
  Mit Zitat antworten Zitat