LABEL LINK TRÉS SIMPLE, SANS OCX NI RIEN
cs_moustachu
Messages postés
1079
Date d'inscription
jeudi 14 novembre 2002
Statut
Membre
Dernière intervention
1 janvier 2012
-
21 févr. 2005 à 09:36
hobbydax Messages postés 2 Date d'inscription jeudi 29 mai 2003 Statut Membre Dernière intervention 23 novembre 2007 - 23 nov. 2007 à 14:13
hobbydax Messages postés 2 Date d'inscription jeudi 29 mai 2003 Statut Membre Dernière intervention 23 novembre 2007 - 23 nov. 2007 à 14:13
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/29670-label-link-tres-simple-sans-ocx-ni-rien
https://codes-sources.commentcamarche.net/source/29670-label-link-tres-simple-sans-ocx-ni-rien
23 nov. 2007 à 14:13
Il me renvoit l'erreur "could not find path 23632".
28 févr. 2005 à 18:18
28 févr. 2005 à 18:14
22 févr. 2005 à 12:08
http://www.vbfrance.com/code.aspx?id=28210
22 févr. 2005 à 11:57
22 févr. 2005 à 09:05
API GetWindowRect, GetCapture, ReleaseCapture et SetCapture et cela sans subclassing ni Timer. Il faudra bien entendu gérer les événements dans le contrôle avec Event et RaiseEvent.
21 févr. 2005 à 22:10
Avant j'étais comme toi, beurk les OCX, mais en fait je trouve que c'est le pied du programmeur passke t'a rien à faire et pourtant c'est bien ton code, pas comme une dll que t'utilise et que t'a pas programmé toi meme...
Enfin c'est un avis perso.
Mais après toujours le meme problème dès qu'il faut faire des mouseover et mouseout... Toujours des bugs, le seul moyen de faire un truc qui marche bien c'est en utilisant les coordonées de la souris (sans parler du subclassing trop compliqué juste pour ça), mais coordonées de la souris = plus de calculs...
21 févr. 2005 à 16:55
Aussi, l'événement Form_MouseMove du formulaire ne fonctionnera pas si le label et trop prêt d'un autre contrôle.
21 févr. 2005 à 15:33
Pour 4 labels ça va encore, mais bon...
Je te conseillerais plutôt d'enregistrer l'index du label survolé par la souris, puis de s'occuper de lui seulement après.
Puis sinon, je préfère les OCX, c'est moins de code dans les modules du projet, et plus simple d'utilisation...
21 févr. 2005 à 11:39
il est dans le zip ( LabelLink/Curseur/Main.cur )
Sinon je l'ai recuperé dans System32 , y'a plein de fichier qui le contiennent :)
Pour Moustachu , merci de tes remarques constructives.
pour le lien qui reste souligné, il suffit de placer le meme code dans l'evenement MouseUp du label que dans l'evenement MouseMove de la form :
For i = 0 To Label1.Count - 1
Label1(i).FontUnderline = False
Next
Tu as raison pour le controle en fait.
Je vais mettre à jour la source dejà pour qu'il lance l'url et ta remarque ;)
Merci !
21 févr. 2005 à 11:22
Je voudrais juste savoir, c'est quoi le nom du cursor avec la main ? :$
21 févr. 2005 à 09:36
Si tu laisses appuyé sur le bouton de la souris et que tu relache le bouton une fois sorti de la feuille, ton lien reste sousligné.
Tu pourrais également compléter en lançant réellement le lien.
++
Moustachu