Ressource de langue externe dans un fichier texte

Soyez le premier à donner votre avis sur cette source.

Vue 7 503 fois - Téléchargée 544 fois

Description

Ce petit module vous permet d'ajouter un fichier de ressource externe pour avoir plusieurs langues dans votre programme...
Sont + votre programme est déjà fait il va générer automatiquement 90% des textes....

-Dans tous vos form_load ajouter : WriteResLanguage me lancer votre prog ouvrer toutes les feuilles une fois (ATTENTION 1 seule fois) ... le prog va ecrire un fichier French.lng...

- Remplacer le WriteResLanguage Me par LoadResLanguage Me puis relancer votre prog...

Source / Exemple :


'Dans la feuille de démarrage il quand même ajouter le chemin du fichier :)
Private Sub Form_Load()
  'Chemin vers le fichier
    m_CDDBLngFile = App.Path & "\french.lng"
  'Chargement des ressources de la form
    LoadResLanguage Me
End Sub

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Philippe734
Messages postés
309
Date d'inscription
lundi 16 décembre 2002
Statut
Membre
Dernière intervention
15 juin 2015
1 -
cela déchire, comme d'hab, j'aime bien tes codes lynx :)

merci
PatDeLaYaute
Messages postés
133
Date d'inscription
dimanche 28 avril 2002
Statut
Membre
Dernière intervention
15 janvier 2009
3 -
Excellent code,

ca simplifie la vie.

Merci
cs_bigane
Messages postés
46
Date d'inscription
lundi 4 février 2002
Statut
Membre
Dernière intervention
12 février 2004
-
Pour les royaltiiiiis, il y a longtemps que j'ai oublié la définition..
;-)
fredlynx
Messages postés
662
Date d'inscription
mercredi 16 janvier 2002
Statut
Modérateur
Dernière intervention
16 octobre 2010
-
Bon alors comment on fait pour les royaltissssssssss (tu as raison les programmeurs son mauvais en OrtHografe lol )...
Content d'avoir pu rendre service à quelqu'un :)
cs_bigane
Messages postés
46
Date d'inscription
lundi 4 février 2002
Statut
Membre
Dernière intervention
12 février 2004
-
Ok, bien vu, les menus sont gérés.
Je pense aussi que ton code peut être utilisé dans un autre but :
j'ai en charge une application développée par une autre société et ayant près d'une centaine de form (97 pour être précis). Certaines form sont très chargées et chaque contrôle possède un tooltip. Or, c'est bien connu, les informaticiens ne sont pas fort en orthographe...
Quelques retouches de ton code vont me permettre de "dumper" tous les textes dans un fichier de façon automatique. Comme le listing est très explicit, c'est facile ensuite de retrouver le contrôle à corriger.
Je pense modifier les Form_QueryUnload() pour y insérer cette ligne WriteResLanguage me.
Un simple programme ouvrant les 97 fichiers *.frm pour y ajouter cette fonction dervait m'aider dans ma besogne.
Reste à modifier WriteResLanguage pour éviter la redondance d'information. Je pense à
Open App.Path & "" & Frm.name & ".txt"
For output As #10
La concaténation des .txt sera alors un jeu d'enfant.
Merci.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.