MainMenü

[deplinux]

Hallo,

ich habe ein Mainmenü mit einem Untermenü "Admin".

Über welchen wert kann ich das im code ausblenden?

MainMenu1.???.Visible := false;

[DeddyH]

Delphi-Quellcode:

if Passwort.Text = Memo3.Lines[0] then
  begin  //<--
    Panel3.Visible:=true;
    Button1.Visible:=true;
    Button2.Visible:=true;
    Button3.Visible:=true;
    Image1.Visible:=true;
    Panel4.Visible:=false;
  end  //<--
else
  showmessage('Benutzername oder Passwort falsch!');

[edit] Wieso löschst Du die alte Frage und stellst eine neue, die mit dem alten Thema aber auch gar nichts zu tun hat? Meine Antwort ist zumindest jetzt für die Tonne [/edit]

[stahli]

Du musst Dich direkt auf den Eintrag beziehen:

MIAdmin: TMenuItem;
...
MIAdmin.Enabled := False;
MIAdmin.Visible := False;


Stahli

PS: Richtig, für neue Fragen besser einen neuen Thread eröffnen. Sonst wird das unübersichtlich.

[deplinux]

Zitat von stahli:

Du musst Dich direkt auf den Eintrag beziehen:

MIAdmin: TMenuItem;
...
MIAdmin.Enabled := False;
MIAdmin.Visible := False;


Stahli

PS: Richtig, für neue Fragen besser einen neuen Thread eröffnen. Sonst wird das unübersichtlich.

Hatte leider zufrüh auf absenden geklickt da ich das schon selbst hinbekommen hatte.. Danke aber trotzdem.

Aber was muss ich dem TMenuItem denn zuweisen?
Administration1 ist das Menü..

Wie muss ich das denn nun als var deklarieren?

[DeddyH]

Wenn Du das Menü samt aller Items schon zur Designtime erstellt hast, ist die Variable ja bereits vorhanden.