Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi MainMenü (https://www.delphipraxis.net/143507-mainmenue.html)

deplinux 17. Nov 2009 10:44


MainMenü
 
Hallo,

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

Über welchen wert kann ich das im code ausblenden?

Delphi-Quellcode:
MainMenu1.???.Visible := false;

DeddyH 17. Nov 2009 10:46

Re: Problem mit if abfrage
 
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 :evil: [/edit]

stahli 17. Nov 2009 11:30

Re: MainMenü
 
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 17. Nov 2009 11:31

Re: MainMenü
 
Zitat:

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 17. Nov 2009 12:07

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


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:34 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz