begin process at 2012 02 17 11:40:05
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Control

 > CONTRÔLE LINKLABEL (SYSLINK) HYPERTEXT

CONTRÔLE LINKLABEL (SYSLINK) HYPERTEXT


 Information sur la source

Note :
10 / 10 - par 2 personnes
10,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Control Classé sous :SysLink, LinkLabel, Hypertext, Lien, Link Niveau :Initié Date de création :25/07/2008 Date de mise à jour :26/08/2009 19:39:39 Vu / téléchargé :3 479 / 226

Auteur : Charles Racaud

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (8)
Ajouter un commentaire et/ou une note


 Description

Cliquez pour voir la capture en taille normale
Pas de contrôle LinkLabel en vb6. En voilà un.
2 version sont présentes ici.
Celle dans le dossier "Avec SysLink de Windows" est la première. Qui a été bien plus simple à réalisé MAIS qui n'est pas compatible avec wk2 et qui nécessite d'ajouter un manifeste au projet.
J'ai donc, abandonné cette version et redéveloppé un contrôle entièrement fait "à ma sauce".
(DrawText et compagnie) qui est compatible sur tout système (enfin j'espère)

Je tiens à remercier PCPT pour tout l'aide qu'il m'a apportée ainsi que les nombreuses heures que nous avons passé à chercher le pourquoi ca ne fonctionne pas sous w2k. Des cotée obscures dans les apis, certains n'ont pas été expliqué pour leurs comportement qui n'a pas l'air de faire grand choses)^^


 Conclusion

Il reste à géré la sélection avec le clavier et sa sera (pratiquement car rien n'est parfait) comme les véritables syslink de windows.

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

25 juillet 2008 14:24:48 :
Mauvais zip
27 juillet 2008 01:15:09 :
2nd version plus compatible refaite entièrement.
28 juillet 2008 20:32:49 :
Ajout de fonctions et propriétés.
28 juillet 2008 22:35:33 :
Correction et ajouts de propriétés (encore)
28 juillet 2008 23:38:10 :
Corrections.
28 juillet 2008 23:39:48 :
Corrections (echec de la maj précédente)
26 août 2009 19:39:40 :
Titre de la source

 Sources du même auteur

Source avec Zip Source avec une capture JEU SPACEOID (EXEMPLE D'UTILISATION DE CLASSES, INTERFACES E...
Source avec Zip Source avec une capture HYPERHAUTID
Source avec Zip Source avec une capture ADDIN: BARRE D'ONGLETS POUR VISUAL BASIC
Source avec Zip EXTRACTION DES ICÔNES DES MENU D'OFFICE
Source .NET (Dotnet) CRÉE UNE IMAGE À PARTIR D'UN GRAPHICS

 Sources de la même categorie

Source avec Zip COMMUNICATION MODBUS MASTER par sergelapointe
Source avec Zip Source avec une capture DÉPLACEMENT AVEC FLÈCHES DANS UN PAVÉ DE TEXTBOX 9X9 DYNAMIQ... par EhJoe
Source avec Zip Source avec une capture Source .NET (Dotnet) CONTROLSTARS EN RÉPONSE À JAKNIGHT007 par bigboss9
Source avec Zip Source avec une capture Source .NET (Dotnet) CALENDRIER ANNUEL NORME ISO par Prog1001
Source avec Zip Source avec une capture Source .NET (Dotnet) CONTROLE STARS par jaknight007

 Sources en rapport avec celle ci

RECUPERER LE FICHIER POINTÉ PAR UN RACCOURCIS par Renfield
Source avec Zip Source .NET (Dotnet) LIENS FACILE par vbnino
Source avec Zip Source avec une capture GÉNÉRATEUR DE LIENS URL EN BBCODE ET EN HTML D'IMAGES ET DE ... par Frank9321
CONNECTION INTERNET VIA VBA par chapata
VERIFICATEUR DE LIENS PAR LA BASE DE REGISTRE ENTRE VB ET SA... par omnikod

Commentaires et avis

Commentaire de PCPT le 25/07/2008 19:48:34 administrateur CS

salut,

ummm, ne semble pas fonctionner chez moi...
les contrôles n'ont pas de caption et ils ne réagissent pas au click
changer le caption du une chaine ascii (sans balise) n'y change rien
(VB6FR SP6, sur Win2Kpro et Win2K3)

les modifs du backcolor sont par contre bien réactives

Commentaire de PCPT le 25/07/2008 19:55:40 administrateur CS

le problème est à la ligne 108
CreateWindowEx retourne 0 :(

Commentaire de PCPT le 25/07/2008 20:37:51 administrateur CS

re Kenji,
désolé pour le flood...

premier point : ligne 292, InitCommonControlsEx me retourne 0
je ne pense pas (à vérifier) qu'un si 0 'Call InitCommonControls' soit utile : si échec, c'est que ComCtl32.dll n'est pas compatible.

çà se confirme, msdn indique version 6 nécessaire, je suis en 5.82 sur les 2 postes.
msdn indique aussi d'activer les thèmes visuels, ce que je n'ai pas.

beaucoup de raisons potentielles d'échec ^^
(peut-être fournir la V6 en ressource mais pas super clean çà...)

bon debugging ^^
PCPT  [AFCK]

Commentaire de NISANDSYSTEMS le 26/07/2008 05:32:26

Bonjour,
marche pas du tout mais pas du tout.
comme dirait PCPT, bon debugging.

@++

Commentaire de Charles Racaud le 26/07/2008 11:19:03

Après une longue soirée de discussion, de recherches et de testes hier soir avec PCPT, NON pas de syslink sur w2k. Beaucoup de testes ont été fait (on a même dérivé en c++), aucun n'as été concluant.
Ca se limite donc à xp, et il faut en plus pour que ca fonctionne, ajouter un manifeste au projet. Comme j'en avais mis un directement sur l'ide, je n'avais pas rencontré ce problème.
C'est une véritable galère ce contrôle, donc, je vais devoir me le refaire à ma sauce.
Faudra patienter pour la maj.
__
Kenji

Commentaire de PCPT le 28/07/2008 13:24:53 administrateur CS 10/10

mais c'est tout bon tout çà :p

un UC sans dépendance et sans subclassing, donc possible de l'intégrer à un projet en non compilé sans 50 fichiers, tout bon ;)

*un point IMPORTANT à modifier quand même : tu ne libères pas la font (DeleteObject).
avec l'autoredraw çà risque une jolie fuite mémoire...

*moins important mais à corriger : le usemnemonic qui n'est pas géré. pas forcément besoin de propriété mais en l'état le "&" est un "_"

améliorations possibles :
=> pour l'exemple, tu peux mettre '@Arial Unicode MS' pour le SysLink(1)
=> pour l'UC :
*d'autres évènement que le LinkClick ?
comme tous les évènements mousedown move up, éventuellement Key...
pourquoi pas des out over sur les links
*une propriété bool pour directement lancer (shellexecute) le lien
*une bordure
*propriété enabled (avec ou sans effet sur la couleur de la typo)
*propriété curseur pour personnaliser au survol du lien

simples suggestions..., le code fait ce pour quoi il a été fait, les commentaires sont au bon endroit (clairs sans surcharge)

un tit' 10 pour moi, surtout pour ta réactivité.
bien joué ;) bonne continuation

Commentaire de Charles Racaud le 28/07/2008 20:37:11

Merci pour ton commentaire.
Déjà un premier jet avant la suite.
. Correction pour le font, je passe directmeent pas usercontrol.font.
. Ajouts des événements classiques (MouseDown, MouseMove, KeyDown ...)
. Ajouts de fonctions utiles.
. Ajouts des propriété BorderStyle et Appearance. Les autres viendrons par la suite.

La suite à suivre bientôt.
__
Kenji

Commentaire de NISANDSYSTEMS le 29/07/2008 10:44:38 10/10

Oh que c'est magnifique quand cela fonctionne à merveille.
Je viens de survoler le code, pas de subclassing comme énonce PCPT, aucune dépendance supplémentaire à rajouter. C'est un gain de productivité très appréciable.

J'aime ce genre de contrôle, simple allégé et qui fonctionne correctement.

Bonne continuation pour la suite.

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

ajouter un lien hypertext dans mon programme VB [ par milleniumouaib ] Bonjour, j'aimerais ajouter un lien hypertext dans mon programme mais je sais pas trop comment faire...Sinon, j'aimerais savoir comment lancer un fich Programmer un lien hypertext dans un mail Notes [ par slin666 ] BOnjour,Je suis en train de faire une base de donner en VB dont un des buts est d'envoyer par mail certaines infos dont un lien hypertext vers un doc Create Table avec un attribut Lien HyperText [ par SIGVALENCE ] Bonjour,Je n'arrive pas à trouver la syntaxe exacte pour creer ma table avec un champ de type hypertextsql = "Create table toto (Affaire string(100),h Probleme de lien hypertext [ par Sytchev3 ] Comment faire un lien hypertexte :je souhaite afficher une adresse email ou un site dans un composant :  textbox,label... ou autre, il faudrais q [VBA/EXCEL] Recuperer le lien hypertext contenu dans une cellule [ par altarez ] Bonjour à tous, Y'a t'il possibilité d'afficher le lien contenu dans un cellule? Concretement : En important une page HTML dans mon fichier Excel, l [VBA/EXCEL] Recuperer le lien hypertext contenu dans une cellule [ par altarez ] Bonjour à tous, Y'a t'il possibilité d'afficher le lien contenu dans un cellule? Concretement : En important une page HTML dans mon fichier Excel, l [VBA/EXCEL] Recuperer le lien hypertext contenu dans une cellule [ par altarez ] Bonjour à tous, Y'a t'il possibilité d'afficher le lien contenu dans un cellule? Concretement : En important une page HTML dans mon fichier Excel, l lien hypertext [ par RRRRems ] bonjour a tousje cherche un moyen pour inserer un lien hyper fixe dans un userform merci Lien Link label [ par ThoT49 ] Bonjour, j'ai cherché sur vbfrance comment pouvoir aller sur un site avec un linklabel, cepandant je n'es pas trouvé.Donc en faite le truc c'est que j Lien Hypertext [ par pccrash74 ] Bonjour,Comment intégrer un lien Hypertext dans une fenêtre Msgbox ou Popup message box ?Merci


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,388 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales