Cacher la barre de menu [Résolu]

Indelphini 20 Messages postés mardi 10 février 2004Date d'inscription 5 mai 2006 Dernière intervention - 12 sept. 2005 à 23:26 - Dernière réponse : cs_Delphiprog 4580 Messages postés samedi 19 janvier 2002Date d'inscription 9 janvier 2013 Dernière intervention
- 14 sept. 2005 à 22:49
Bonjour

est-il possible de cacher la barre de menus en cours d'exécution ? La propriété Visible n'existe pas pour TMainMenu.

Merci
Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
jlen100 1651 Messages postés samedi 10 juillet 2004Date d'inscription 25 juillet 2014 Dernière intervention - 13 sept. 2005 à 06:16
3
Merci
salut
pour masquer ou montrer un Tmainmenu il te suffit d rendre invisible les items qui le composnt par exeùmple si item1, item2, item3 sont les items de mainmenu1

procedure TForm1.masqueClick(Sender: TObject);
begin
with mainmenu1 do
begin
item1.visible:=false;
item2.visible:=false;
item3.visible:=false;
end;
end;

procedure TForm1.montreClick(Sender: TObject);
begin
with mainmenu1 do
begin
item1.visible:=true;
item2.visible:=true;
item3.visible:=true;
end;
bonne prog

Merci jlen100 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 120 internautes ce mois-ci

Commenter la réponse de jlen100
Meilleure réponse
cs_Delphiprog 4580 Messages postés samedi 19 janvier 2002Date d'inscription 9 janvier 2013 Dernière intervention - 14 sept. 2005 à 22:49
3
Merci
En utilisant une case à cocher pour afficher ou masquer la barre de menus et, de façon plus générique :

procedure TForm1.CheckBox1Click(Sender: TObject);
var
  i: integer;
begin
with MainMenu1 do
for i :=  0 to  Items.Count - 1do
      Items[i].Visible : = CheckBox1.Checked;
end;



<HR color=#008000>
Pensez à cliquer sur Réponse acceptée lorsque la réponse vous convient.

Merci cs_Delphiprog 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 120 internautes ce mois-ci

Commenter la réponse de cs_Delphiprog

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.