TAB CONTROL (WINDOWS MEDIA PLAYER 10 )

cs_Willi Messages postés 2375 Date d'inscription jeudi 12 juillet 2001 Statut Modérateur Dernière intervention 15 décembre 2018 - 9 août 2006 à 09:08
cs_VinceVG Messages postés 221 Date d'inscription mercredi 8 septembre 2004 Statut Membre Dernière intervention 30 mars 2016 - 31 oct. 2006 à 19:43
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/39006-tab-control-windows-media-player-10

cs_VinceVG Messages postés 221 Date d'inscription mercredi 8 septembre 2004 Statut Membre Dernière intervention 30 mars 2016
31 oct. 2006 à 19:43
Je viens de trouver un truc super : tabs assist qui permet de gérer les conteneurs automatiquement.
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 1
31 oct. 2006 à 19:39
Non ce n'est pas un conteneur mais cela peut s'implementer facilement. Mais je n'ai pas le temps en ce moment et il me sert très bien ainsi. Donc je ne pense pas l'implementer. En tout cas pas maintenant.

Sinon pour la page de propriété, ce n'est pas mon fort. Et on peut quand même editer les propriétés relativement facilement depuis l'IDE.
cs_VinceVG Messages postés 221 Date d'inscription mercredi 8 septembre 2004 Statut Membre Dernière intervention 30 mars 2016
31 oct. 2006 à 13:19
Je suis d'accord avec renfield, il manque la page de propriété. Et puis ... ce n'est pas un conteneur !
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 1
11 août 2006 à 13:45
Salut,
Je viens de mettre à jour avec quelques fonctionalités en plus suivant vos conseils :

- Possibilité le placer le menu en haut, en bas, à gauche, à droite (BarrePosition)
- Possibilité de désactiver un bouton (ButtonEnabled)
- possibilité de Masquer un bouton (ButtonHide)

++
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 1
10 août 2006 à 08:08
Renfield>>J'obtiens vbAlignNone tout le temps même en cours d'exécution. Mais ce n'est pas grave, finalement je vais ajouter une propriété. Ainsi on pourra mettre le menu à gauche même si le controle n'est pas aligné... Par contre je pense faire ça ce week end ou en début de semaine prochaine.

++
cs_John7 Messages postés 47 Date d'inscription jeudi 12 décembre 2002 Statut Membre Dernière intervention 12 janvier 2008
9 août 2006 à 22:54
Quand tu alignes à droite ou à gauche ton tabmenu ça le déplace seulement et uniquement avec WindowState=Maximized. Sinon, c'est trés sympa. Moi j'aime bien.
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
9 août 2006 à 16:40
Bouv, tout dépend à quel moment tu fais ce test ^^
MadM@tt Messages postés 2167 Date d'inscription mardi 11 novembre 2003 Statut Membre Dernière intervention 16 juillet 2009 1
9 août 2006 à 16:04
Très joli, c'est assez fidèle oO
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 1
9 août 2006 à 16:02
ça marche pô !!
Je fais
Select Case UserControl.Extender.Align
Case vbAlignNone
...
Case vbAlignTop
...
Case vbAlignBottom
...
Case vbAlignLeft
...
Case vbAlignRight
...
End Select

Et il rentre toujours dans vbAlignNone
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
9 août 2006 à 14:59
il peux le savoir, oui oui ^^
en regardant UserControl.Extender.Align
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 1
9 août 2006 à 14:26
Merci,
J'ai pris note des commentaires :

- WM_MOUSEMOVE changé pour WM_MOUSEHOVER
- OptionButton dans un PictureBox (arghh!!)
- Pour la Property Page... euh... ben... je sais pas faire :-(
- Sinon pour l'alignement, je vais essayer de voir, mais j'aurais une question. Le UserControl peut-il savoir comment il a été aligné ou dois-je ajouter une propriété ?

Je release plus tard
++
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
9 août 2006 à 10:01
C'est pas trop mal ^^

Gaffe à ce genre de choses :

Case WM_MOUSEMOVE 'MOUSEMOVE
If Focused = False Then
UserControl.Picture = ImgOver.Picture
End If
RaiseEvent MouseMove

WM_MOUSEHOVER serait sûrement plus indiqué


sympa, l'edition depuis les propriétés...
reste qu'une Property Page en bonne et dure forme ne serait pas un luxe.

dommage que l'on ne puisse pas désactiver des boutons, ou les masquer

si on aligne la barre en bas, il faudrait inverser l'image de l'onglet actif.
l'alignement a gauche ou a droite n'est pas géré.

place les deux options buttons qui sont dans la fenetre de test dans un picturebox, avant de les placer dans une Frame. En effet, avec le manifest appliqué (comme chez moi, sur VB6.exe) les deux controles apparaissent tout noirs (Bug Connus chez microsoft)
cs_Willi Messages postés 2375 Date d'inscription jeudi 12 juillet 2001 Statut Modérateur Dernière intervention 15 décembre 2018 22
9 août 2006 à 09:08
Ahhh bonne source, tabcontrol quasi fidèle à wmp10. Bien joué :p
Bonne continuation ++
Rejoignez-nous