Générer des variables publiques à la volée

Dom - 22 juil. 2001 à 18:31
 schouly - 23 juil. 2001 à 08:43
Pour l'internationalisation d'un programme, j'ai créer des fichiers contenant le contenu que doit avoir tous les labels, (j'ai un fichier par language). J'aimerais générer des variables publiques dynamiquement à la lecture du ficher pour les attribuer aux labels.

Merci

10 réponses

si j'ai bien compris, ce que tu veux faire est (a ma connaissance) impossible. Tu peux aussi utiliser un fichier ressources, encoder tes valeurs dans la table des chaines et les appeller avec ton prog ( getresstring("ID") ) car les valeurs stockées dans un fichier resources sont modifiable après compilation par des logiciels spéciaux par ex: ResHacker

A+

Schouly
0
si j'ai bien compris, ce que tu veux faire est (a ma connaissance) impossible. Tu peux aussi utiliser un fichier ressources, encoder tes valeurs dans la table des chaines et les appeller avec ton prog ( getresstring("ID") ) car les valeurs stockées dans un fichier resources sont modifiable après compilation par des logiciels spéciaux par ex: ResHacker

A+

Schouly
0
C'est tout à fait possible d'avoir un fichier externe simple fichier texte contenant les valeurs des labels pour chaque langues et ensuite de les attribuer aux labels.

de nombreux programmes utilisent cette méthode pour internationaliser leur programme.

Merci quand même.
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
En fait la question serait plutot celle là :

Comment générer des variables au lancement de l'application?
Merci
0
Tu peux charger les noms de tes labels du fichier dans une variable chaine que tu donne au label ensuite :

Private Sub Form_Load()
Dim a As String ' variable temporaire

Open "c:\windows\bureau\1.txt" For Input As #1
Input #1, a
Close #1
Form1.Caption = a
End Sub
0
Tu veux ajouter une variable du genre

Public Label1Caption as string

au moment de l'éxécution?
Si c'est çà ce n'est pas possible à moins que tu ne stockes toutes tes données dans un tableau illimité... à ce moment là tu pourras remplir ton tableau avec toutes tes phrases et t'arrêter quand tu veux
Pour remplir tes labels ça te donnerais un truc dans le genre si tes labels appartiennent à un groupe de controle

tu mets tout ça dans l'évenement form_load
'chargement:
Dim i as integer, temp as string
i=-1
open "SimpleFichierTexte.txt" for input as #1
do while not eof(1)
i = i + 1
lineinput #1,Temp
tableau(i) = temp
loop

'affectation
for i = 0 to ubound(tableau)
Label1(i) = tableau(i)
next

excuse moi si c'est pas ça que tu veux dire
0
Merci c'est çà, j'en suis arrivé à la meme conclusion que toi passer pour un tableau, merci à toi
0
VB Edit 1.0 est sorti !
Ce logiciel est FREEWARE.
Gestionnaire de fichiers Microsoft Visual Basic.

Demandez votre version à : h.engelbreit@wanadoo.fr

Fonctionnalités:
• Edition d'un projet et navigation sur l'ensemble de ses modules -
• Génération de fichiers au formats Rtf et Html -
• Copie / Suppression d'un projet et de tout ses fichiers de dépendance -
• Références d'un projet pour vos empaquetages -
• Compteur de dépendances d'un projet -
• Recherche d'expressions -
• Détails d'un projet -
• Impression d'un projet et ou d'un module spécifié avec un rapport en page finale -
• Gestion des boites de messages -
• Gestion des couleurs -
• Création / édition d'icones -
• Extraction d'images (ico, Bmp, ...) d'une forme -
• Modification des propriétés de fichiers de tout types -
• Localisation d'erreurs -
• Création d'autoruns -
• Information disques et lecteurs -
• Table de caractères.
0
Si il est livré avec les sources tu peux me l'envoyer ...

[mailto:Schouly@skynet.be Schouly@skynet.be]

Merci

Schouly
0
Rejoignez-nous