Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jean-marc
ePilot wrote:
Bonjour groupe,
est-ce possible de contrôler la barre de menu pour la rendre invisible dans une form avec des api ou qqch d'autre en VB6
Google ne m'a rien donné de concret.
Hello,
il y a un truc qui marche, pas très élégant et un peu frustre, mais fonctionnel: il suffit de rendre invisible tous les items de premier niveau du menu, et il devient alors invisible.
Pour rendre invisible un menu (par exemple) "mnu_A" mnu_A.visible = False
Pour tester c'est tout simple: Une forme, un bouton de commande Avec l'éditeur de menu, créer un menu avec une seule entrée : "mnu_test"
Puis dans le bouton de commande:
Private Sub Command1_Click() mnu_Test.Visible = Not mnu_Test.Visible End Sub
est-ce possible de contrôler la barre de menu pour la rendre invisible
dans une form avec des api ou qqch d'autre en VB6
Google ne m'a rien donné de concret.
Hello,
il y a un truc qui marche, pas très élégant et un peu
frustre, mais fonctionnel: il suffit de rendre invisible
tous les items de premier niveau du menu, et il devient
alors invisible.
Pour rendre invisible un menu (par exemple) "mnu_A"
mnu_A.visible = False
Pour tester c'est tout simple:
Une forme, un bouton de commande
Avec l'éditeur de menu, créer un menu avec une
seule entrée : "mnu_test"
Puis dans le bouton de commande:
Private Sub Command1_Click()
mnu_Test.Visible = Not mnu_Test.Visible
End Sub
est-ce possible de contrôler la barre de menu pour la rendre invisible dans une form avec des api ou qqch d'autre en VB6
Google ne m'a rien donné de concret.
Hello,
il y a un truc qui marche, pas très élégant et un peu frustre, mais fonctionnel: il suffit de rendre invisible tous les items de premier niveau du menu, et il devient alors invisible.
Pour rendre invisible un menu (par exemple) "mnu_A" mnu_A.visible = False
Pour tester c'est tout simple: Une forme, un bouton de commande Avec l'éditeur de menu, créer un menu avec une seule entrée : "mnu_test"
Puis dans le bouton de commande:
Private Sub Command1_Click() mnu_Test.Visible = Not mnu_Test.Visible End Sub
il y a un truc qui marche, pas très élégant et un peu frustre, mais fonctionnel: il suffit de rendre invisible tous les items de premier niveau du menu, et il devient alors invisible.
Pour rendre invisible un menu (par exemple) "mnu_A" mnu_A.visible = False
Pour tester c'est tout simple: Une forme, un bouton de commande Avec l'éditeur de menu, créer un menu avec une seule entrée : "mnu_test"
Puis dans le bouton de commande:
Private Sub Command1_Click() mnu_Test.Visible = Not mnu_Test.Visible End Sub
le menu devient visible/chahé/visible/caché/etc.
Cordialement;
Pourtant dans l'assistant intitulé Créateur de menus il y a l'option "visible". Pas besoin de rendre invisible les sous-menus.
Puis si le menu s'appelle test, un test.visible = false le cache également.
Pour faire apparaitre un menu invisible il y a PopupMenu.
copie/colle ===========
Affiche un menu contextuel sur un objet MDIForm ou Form à l'emplacement occupé par le pointeur de la souris ou aux coordonnées indiquées. Ne gère pas lesarguments nommés.
Syntaxe
object.PopupMenu menuname, flags, x, y, boldcommand
La syntaxe de la méthode PopupMenu comprend les éléments suivants :
Élément Description object Facultatif.Expression d'objet qui prend la valeur d'un objet figurant dans la rubrique Application. Si l'élément object est omis, la feuille qui a lefocus est considérée comme object. menuname Nom du menu contextuel à afficher. Le menu indiqué doit contenir au moins unsous-menu. flags Facultatif. Valeur ou constante précisant l'emplacement et le comportement d'un menu contextuel, comme indiqué dans la section Valeurs. x Facultatif. Indique la coordonnée x de l'endroit où le menu contextuel est affiché. Si cet élément est omis, la coordonnée du pointeur de la souris est utilisée. y Facultatif. Indique la coordonnée y de l'endroit où le menu contextuel est affiché. Si cet élément est omis, la coordonnée du pointeur de la souris est utilisée. Boldcommand Facultatif. Indique le nom d'un contrôle Menu dans le menu contextuel pour permettre l'affichage de sa légende en gras. Si cet élément est omis, aucun contrôle du menu contextuel n'apparaît en gras.
Valeurs
L'élément flags peut prendre les valeurs suivantes :
Constante (emplacement) Valeur Description vbPopupMenuLeftAlign 0 (Valeur par défaut) Le côté gauche du menu contextuel est situé au niveau du point x. vbPopupMenuCenterAlign 4 Le menu contextuel est centré sur le point x. vbPopupMenuRightAlign 8 Le côté droit du menu contextuel est situé au niveau du point x.
Constante (comportement) Valeur Description vbPopupMenuLeftButton 0 (Valeur par défaut) Un élément du menu contextuel ne réagit qu'au clic du bouton gauche de la souris. vbPopupMenuRightButton 2 Un élément du menu contextuel réagit aux clics des boutons gauche ou droit de la souris.
-----------------------------------
Le 19/04/2008, Jean-marc a supposé :
Hello,
il y a un truc qui marche, pas très élégant et un peu
frustre, mais fonctionnel: il suffit de rendre invisible
tous les items de premier niveau du menu, et il devient
alors invisible.
Pour rendre invisible un menu (par exemple) "mnu_A"
mnu_A.visible = False
Pour tester c'est tout simple:
Une forme, un bouton de commande
Avec l'éditeur de menu, créer un menu avec une
seule entrée : "mnu_test"
Puis dans le bouton de commande:
Private Sub Command1_Click()
mnu_Test.Visible = Not mnu_Test.Visible
End Sub
le menu devient visible/chahé/visible/caché/etc.
Cordialement;
Pourtant dans l'assistant intitulé Créateur de menus il y a l'option
"visible". Pas besoin de rendre invisible les sous-menus.
Puis si le menu s'appelle test, un test.visible = false le cache
également.
Pour faire apparaitre un menu invisible il y a PopupMenu.
copie/colle
===========
Affiche un menu contextuel sur un objet MDIForm ou Form à l'emplacement
occupé par le pointeur de la souris ou aux coordonnées indiquées. Ne
gère pas lesarguments nommés.
Syntaxe
object.PopupMenu menuname, flags, x, y, boldcommand
La syntaxe de la méthode PopupMenu comprend les éléments suivants :
Élément Description
object Facultatif.Expression d'objet qui prend la valeur d'un objet
figurant dans la rubrique Application. Si l'élément object est omis, la
feuille qui a lefocus est considérée comme object.
menuname Nom du menu contextuel à afficher. Le menu indiqué doit
contenir au moins unsous-menu.
flags Facultatif. Valeur ou constante précisant l'emplacement et le
comportement d'un menu contextuel, comme indiqué dans la section
Valeurs.
x Facultatif. Indique la coordonnée x de l'endroit où le menu
contextuel est affiché. Si cet élément est omis, la coordonnée du
pointeur de la souris est utilisée.
y Facultatif. Indique la coordonnée y de l'endroit où le menu
contextuel est affiché. Si cet élément est omis, la coordonnée du
pointeur de la souris est utilisée.
Boldcommand Facultatif. Indique le nom d'un contrôle Menu dans le menu
contextuel pour permettre l'affichage de sa légende en gras. Si cet
élément est omis, aucun contrôle du menu contextuel n'apparaît en gras.
Valeurs
L'élément flags peut prendre les valeurs suivantes :
Constante (emplacement) Valeur Description
vbPopupMenuLeftAlign 0 (Valeur par défaut) Le côté gauche du menu
contextuel est situé au niveau du point x.
vbPopupMenuCenterAlign 4 Le menu contextuel est centré sur le point x.
vbPopupMenuRightAlign 8 Le côté droit du menu contextuel est situé au
niveau du point x.
Constante (comportement) Valeur Description
vbPopupMenuLeftButton 0 (Valeur par défaut) Un élément du menu
contextuel ne réagit qu'au clic du bouton gauche de la souris.
vbPopupMenuRightButton 2 Un élément du menu contextuel réagit aux clics
des boutons gauche ou droit de la souris.
il y a un truc qui marche, pas très élégant et un peu frustre, mais fonctionnel: il suffit de rendre invisible tous les items de premier niveau du menu, et il devient alors invisible.
Pour rendre invisible un menu (par exemple) "mnu_A" mnu_A.visible = False
Pour tester c'est tout simple: Une forme, un bouton de commande Avec l'éditeur de menu, créer un menu avec une seule entrée : "mnu_test"
Puis dans le bouton de commande:
Private Sub Command1_Click() mnu_Test.Visible = Not mnu_Test.Visible End Sub
le menu devient visible/chahé/visible/caché/etc.
Cordialement;
Pourtant dans l'assistant intitulé Créateur de menus il y a l'option "visible". Pas besoin de rendre invisible les sous-menus.
Puis si le menu s'appelle test, un test.visible = false le cache également.
Pour faire apparaitre un menu invisible il y a PopupMenu.
copie/colle ===========
Affiche un menu contextuel sur un objet MDIForm ou Form à l'emplacement occupé par le pointeur de la souris ou aux coordonnées indiquées. Ne gère pas lesarguments nommés.
Syntaxe
object.PopupMenu menuname, flags, x, y, boldcommand
La syntaxe de la méthode PopupMenu comprend les éléments suivants :
Élément Description object Facultatif.Expression d'objet qui prend la valeur d'un objet figurant dans la rubrique Application. Si l'élément object est omis, la feuille qui a lefocus est considérée comme object. menuname Nom du menu contextuel à afficher. Le menu indiqué doit contenir au moins unsous-menu. flags Facultatif. Valeur ou constante précisant l'emplacement et le comportement d'un menu contextuel, comme indiqué dans la section Valeurs. x Facultatif. Indique la coordonnée x de l'endroit où le menu contextuel est affiché. Si cet élément est omis, la coordonnée du pointeur de la souris est utilisée. y Facultatif. Indique la coordonnée y de l'endroit où le menu contextuel est affiché. Si cet élément est omis, la coordonnée du pointeur de la souris est utilisée. Boldcommand Facultatif. Indique le nom d'un contrôle Menu dans le menu contextuel pour permettre l'affichage de sa légende en gras. Si cet élément est omis, aucun contrôle du menu contextuel n'apparaît en gras.
Valeurs
L'élément flags peut prendre les valeurs suivantes :
Constante (emplacement) Valeur Description vbPopupMenuLeftAlign 0 (Valeur par défaut) Le côté gauche du menu contextuel est situé au niveau du point x. vbPopupMenuCenterAlign 4 Le menu contextuel est centré sur le point x. vbPopupMenuRightAlign 8 Le côté droit du menu contextuel est situé au niveau du point x.
Constante (comportement) Valeur Description vbPopupMenuLeftButton 0 (Valeur par défaut) Un élément du menu contextuel ne réagit qu'au clic du bouton gauche de la souris. vbPopupMenuRightButton 2 Un élément du menu contextuel réagit aux clics des boutons gauche ou droit de la souris.
-----------------------------------
epilot10
Merci bien Jean-Marc,
>pas très élégant et un peu frustre, mais fonctionnel Mais fallait tout de même y penser !
Salutations
Jacquelin H.
Jean-marc a écrit :
ePilot wrote:
Bonjour groupe,
est-ce possible de contrôler la barre de menu pour la rendre invisible dans une form avec des api ou qqch d'autre en VB6
Google ne m'a rien donné de concret.
Hello,
il y a un truc qui marche, pas très élégant et un peu frustre, mais fonctionnel: il suffit de rendre invisible tous les items de premier niveau du menu, et il devient alors invisible.
Pour rendre invisible un menu (par exemple) "mnu_A" mnu_A.visible = False
Pour tester c'est tout simple: Une forme, un bouton de commande Avec l'éditeur de menu, créer un menu avec une seule entrée : "mnu_test"
Puis dans le bouton de commande:
Private Sub Command1_Click() mnu_Test.Visible = Not mnu_Test.Visible End Sub
le menu devient visible/chahé/visible/caché/etc.
Cordialement;
Merci bien Jean-Marc,
>pas très élégant et un peu frustre, mais fonctionnel
Mais fallait tout de même y penser !
Salutations
Jacquelin H.
Jean-marc a écrit :
ePilot wrote:
Bonjour groupe,
est-ce possible de contrôler la barre de menu pour la rendre invisible
dans une form avec des api ou qqch d'autre en VB6
Google ne m'a rien donné de concret.
Hello,
il y a un truc qui marche, pas très élégant et un peu
frustre, mais fonctionnel: il suffit de rendre invisible
tous les items de premier niveau du menu, et il devient
alors invisible.
Pour rendre invisible un menu (par exemple) "mnu_A"
mnu_A.visible = False
Pour tester c'est tout simple:
Une forme, un bouton de commande
Avec l'éditeur de menu, créer un menu avec une
seule entrée : "mnu_test"
Puis dans le bouton de commande:
Private Sub Command1_Click()
mnu_Test.Visible = Not mnu_Test.Visible
End Sub
>pas très élégant et un peu frustre, mais fonctionnel Mais fallait tout de même y penser !
Salutations
Jacquelin H.
Jean-marc a écrit :
ePilot wrote:
Bonjour groupe,
est-ce possible de contrôler la barre de menu pour la rendre invisible dans une form avec des api ou qqch d'autre en VB6
Google ne m'a rien donné de concret.
Hello,
il y a un truc qui marche, pas très élégant et un peu frustre, mais fonctionnel: il suffit de rendre invisible tous les items de premier niveau du menu, et il devient alors invisible.
Pour rendre invisible un menu (par exemple) "mnu_A" mnu_A.visible = False
Pour tester c'est tout simple: Une forme, un bouton de commande Avec l'éditeur de menu, créer un menu avec une seule entrée : "mnu_test"
Puis dans le bouton de commande:
Private Sub Command1_Click() mnu_Test.Visible = Not mnu_Test.Visible End Sub
le menu devient visible/chahé/visible/caché/etc.
Cordialement;
Jean-marc
epilot10 wrote:
Merci bien Jean-Marc,
pas très élégant et un peu frustre, mais fonctionnel
