MENU EN POPUP AVEC IMAGES SANS PASSER PAR LE CRÉATEUR DE MENUS DE VB [MODULE DE CLASSE]

Commentaire de diablamanshadow le 24/07/2006 20:58:23

ses pas mal comme source cependant perso quand je skin vu que ici tu en parle je skin de a à z je cree mes propres bouton , je code tt mon popupmenu mes propre menu etc etc etc donc ta source me sert pas trop mais je trouve sa pas mal du tout meme , meme si je n'utilise pas le meme system ^^
quelques roll over , des variable de stock de menu evidement je ne peux pas ajouter etc des menu "dynamiquement" comme toi mais bon je fais tt mon skin (je dit plutot design) sur mesure et en fonction de mon logiciel ^^

bon bah ta source est chouette je met un bon 8 car je trouve que celui qui utilise pas de border ses a la limite plus simple contrairement a ce que tu dit d'utiliser une autre form en hidden enfin chacun son opinion moi je trouve sa plus simple du moins si c'est pour garder le skin par defaut du menu "normale" ^^

ps: ses pas moi qui avais mis la note anonymement :p

Commentaire de diablamanshadow le 27/07/2006 23:51:46

desoler je n'avais pas vu ^^

Commentaire de PCPT le 28/07/2006 09:17:43 administrateur CS

salut Rey,
l'item vide est voulu pour ne pas avoir à tester l'existance de l'item 0. il en gène en rien puisqu'on teste bien que la valeur saisie soit entre 1 et ubound.
et comme on ne renvoi jamais 0, l'item 1 à donc l'indice 1.

(sauf pour) ModifyItem, petit oubli...
AddSepar, en effet ^^ (pas d'erreur pour autant)

with pour 3, çà rajoute 2 lignes pour rien tu crois pas...
je mets à jour de suite

ps : c'est souriant tes messages commençant par "Attention", on croierait presque qu'il y a vraiment quelquechose de grave :D

Commentaire de PCPT le 28/07/2006 09:32:15 administrateur CS

voilà chose faite ;)

Commentaire de PCPT le 19/11/2006 00:05:32 administrateur CS

bon, finalement j'ai quand même retouché à cette source, j'suis pas trop déçu du résultat, voir capture ;)

drakkard -> pas mal d'options, mais pas de changement en rapport à la typo.
tu peux ajouter une image en entête de ligne par exemple

++

Commentaire de Egyde le 16/05/2007 00:11:30

Très bien tout ça!!

J'ai qd même trouvé un petit bug : les menus avec sous-menus ne sont pas désactivés par ModifyItem. Si tu veux par exemple désactiver l'item 104 de la feuille "Composé" (frm_sample), ça marche pas :

Private Sub Command1_Click()
    AfMenuMain.ModifyItem 104, , , False
    '<----- item 104 toujours actif
End Sub

Le problème semble venir de la création récursive des menus, qui ne doit pas être exécutée si le menu parent est "Disable" :

Public Sub Friend_RecursiveSubMenusMaker(ByRef ParentMenu As AfCls_PopupMenu)
....
'sous-menus?
  If aMenu(i).bEnabled = True Then ' <--- à rajouter
    If Not (ITB.oChild Is Nothing) Then
...
    End If
  End If
...
End Sub

++

Commentaire de Exploreur le 16/05/2007 10:43:56

Salut PCPT,

Que dire...Que dire...Que ta source est cool et aussi que le le composant AfBtn est sympa...

A+
Exploreur

Commentaire de PCPT le 13/08/2007 22:44:52 administrateur CS

très utile ton commentaire... sur une source où le but est justement d'éviter de passer par le créateur de VB.
qui plus est le but ici est uniquement le popup donc pas vraiment de rapport mais l'astuce peut toujours servir, qui sait.

++

Commentaire de PCPT le 14/08/2007 16:51:05 administrateur CS

exact j'avais oublié mon comm ^^
cela dit on est alors obligé de supprimer le caption, or on peut en avoir besoin pour afficher la fenêtre dans la barre des tâches. bref en classe c'est toujours pratique non?
++ ;)

Commentaire de Ouneufe le 30/08/2007 17:25:39

Très bonne source, exactement ce que je recherchais. J'étais coincé car je ne pouvais utiliser convenablement le popupmenu classique avec feuille MDI+ feuilles filles.