Accès au caption d'un VkLabel sans le préciser (de la forme <Me.Label1 = "toto"

Résolu
Signaler
Messages postés
1098
Date d'inscription
mercredi 22 mars 2006
Statut
Membre
Dernière intervention
22 octobre 2019
-
Messages postés
1098
Date d'inscription
mercredi 22 mars 2006
Statut
Membre
Dernière intervention
22 octobre 2019
-
Bonjour
Comme certains le savent déjà j'internationalise un logiciel. Ce dernier dois en final être en mesure d'afficher de l'UTF-8 dans tout les objet (affichant du texte bien sure) de toute les forms (bà en faite c'est pas si simple en faite).
Problème le dévelopement initial de cette appli est loin d'être parfait (ou propre d'ailleurs, encore que je suis un peut dure quand à la présentation et commentaire dans les codes). Quasiment tout les accès au caption des labels se font en direct (de la forme <Me.Label1 = "toto">) or je remplace les objets VB.Labels par des VkLabels (fessant partie d'un groupe d'objet vraiment bien : ici, merci VIOLENT-KEN, si je ne remplace pas ces objets par des objets Form2 est un peut long à expliquer mais s'explique).

Quelqu'un saurais comment faire pour ne pas avoir à modifier tout le code et néanmoins avoir un fonctionnement équivalents (accès au caption sans le préciser)?

J'espère avoir été claire
Merci par avance
Amicalement
Pensez "Réponse acceptée"

5 réponses

Messages postés
17288
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
71
c'est la propriété par défault.
bien qu'il soit générallement déconseillé de passer par là....

vkLabel => Violent_ken...
vois cela direct avec lui ^^

sinon, pour ton soucis, il te suffit de dire que la propriété Caption de ce UserControl sera la propriété par défault de ce dernier.
va dans le module vkLabel.Ctl
et va dans Outils > Attributs de procédure
dans le combobox Nom, séléctionne Caption, donc
cliques sur le bouton Avancées
ID de la procédure, séléctionne (par défault)

ca ajoutera l'attribut par default dans la code du controle (visible sous Notepad, mais masqué dans VB)
Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
14
Salut,

Arfff...il aurait fallu que tu précises à chaque appel sur le caption : Me.VkLabel.Caption = "TOTO"

Car là, tu vas devoir revoir toutes les parties de ton code ou tu changes le caption sans faire appel à la propriété....C'est pas bien de ne pas tout coder...lol...voilà où cela t'emmenes...

Ou alors pose la question directement sur la source de Violent_Ken(Salut)....Ou retouche son code pour qu'il fasse la même chose qu'un VbLabel....Mais il vaut mieux bien écrire d'entrée de "jeu" toute la syntaxe...

A+
Exploreur

 Linux a un noyau, Windows un pépin
Messages postés
4822
Date d'inscription
lundi 11 novembre 2002
Statut
Membre
Dernière intervention
15 novembre 2016
14
J'suis encore à la bourre ....Salut Renfield

A+
Exploreur

 Linux a un noyau, Windows un pépin
Messages postés
1098
Date d'inscription
mercredi 22 mars 2006
Statut
Membre
Dernière intervention
22 octobre 2019
1
Exactement ce que je voulais MERCI encore une fois Renfield

Amicalement
Pensez "Réponse acceptée"
Messages postés
1098
Date d'inscription
mercredi 22 mars 2006
Statut
Membre
Dernière intervention
22 octobre 2019
1
 Linux a un noyau, Windows un pépin
MDR  LOL (C'est telement vrais...)

Tiens je vais le posté ici aussi :
P.S. (affolant) :
    Microbof à reconnu (par
l'intermédiaire de M.David Cross chef de projet de l'UAC (User Account
Control)) que l'UAC (justement) à été fait pour... faire chier son
monde !!!!
Je cite :
M.David Cross : «  La raison
pour laquelle nous avons intégré l'UAC au sein de la plateforme était
pour énerver les utilisateurs. Je suis sérieux ! » (Version traduite).
M. Cross explique
que le but était de décourager les utilisateurs de creuser trop
profondément dans le système d'exploitation en modifiant des paramètres
importants, incitant aussi les développeurs à concevoir des programmes
qui n'aillent pas trop loin dans les sous-systèmes... Pourquoi ne pas
verrouiller toutes les API temps qu'il s'y sont cette bande de .....
Houla je vais trop loin là.
Encore une fois merci Microbof

Amicalement
Pensez "Réponse acceptée"