CRÉER UNE APPLICATION MULTILANGUE (.INI) V 1.1.5
fbrt
Messages postés
39
Date d'inscription
lundi 25 février 2002
Statut
Membre
Dernière intervention
16 avril 2005
-
15 avril 2002 à 13:45
cs_mickei Messages postés 15 Date d'inscription vendredi 10 janvier 2003 Statut Membre Dernière intervention 3 octobre 2007 - 5 avril 2007 à 15:55
cs_mickei Messages postés 15 Date d'inscription vendredi 10 janvier 2003 Statut Membre Dernière intervention 3 octobre 2007 - 5 avril 2007 à 15:55
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/2948-creer-une-application-multilangue-ini-v-1-1-5
https://codes-sources.commentcamarche.net/source/2948-creer-une-application-multilangue-ini-v-1-1-5
5 avril 2007 à 15:55
5 avril 2007 à 15:45
Je me sers de LoadMsgLanguage avec : XXX.caption = LoadMsgLanguage("dsd")
sauf que lors de la création du fichier il se passe une couille, dsd est égale à vide ds le fichier même si j'ai fait la sauvegarde avec une valeur par défaut.
En gros ton code ne différencie pas une attribution du caption par défaut et quand on fait la modification de façon dynamique dans le programme.
Pour contourner le problème j'ai utilisé une variable.
6 juin 2006 à 12:46
Merci, quand même de votre réponse.
Amicalement.
Greffier.
6 juin 2006 à 12:05
déjà merci pour vos nombreux commentaires ;)
C17 >
Je ne sais ce qu'il est des limites des Fichiers INI je ne les ai pas encore atteinte ;), mais une solution serais alors de splitter en plusieurs fichiers ini, par exemple par Formulaire ... ;)
greffierjc >
Je n'ai jamais reporté ça en VBA, et je doute que ce soit utilisable sans de nombreuse modification ...
BàV,
Icem@n
6 juin 2006 à 11:55
Tout le monde vous félicite, mois aussi, c'est un papy qui vous le dit. Mais j'aimerais que vous me disiez si votre programmation peut s'appliquer à un programme access en séquence VBA, et si vous l'aviez déjà fait.
Dans le cas contraire comment adapter votre programmation aux formulaires d'access.
Merci, pour votre réponse.
Greffier.
1 mai 2005 à 14:33
ça risque pas de poser problèmes avec des grosses applications?
1 sept. 2004 à 08:08
A l'époque cette partie du programme a été récupérée sur le net et vu qu'elle marchait je ne me suis pas posé de question..
Mais si le temps me le permet, je vérifierais et ferrais les modifications adéquates.
BaT,
Icem@n
31 août 2004 à 22:16
je viens de me mettre a regarder les api utilisées car je n'avais pas eu trop le temps avant.
bien sur il ya d'autres sources, mais bon j'ai téléchargé la tienne, va savoir pourquoi.
j'ai une seule chose qui m'a dérangée dans le code, c'est tout a fait bénin mais bon.
J'explique:
- dans la function INIProfileRead tu mets:
n = GetPrivateProfileString(lpKeyName, strNomCle, strDonneeDefault, lpReturnedString, nSize, lpFileName)
- n renvois le nombre de caracteres du buffer
- ensuite dans la meme procédure il y a la condition de "calcul" de la chaine réelle, puisque ca longueur est a 128 avec :
If n <> 0 Then
lpReturnedString = Left$(lpReturnedString, InStr(lpReturnedString, Chr$(0)) - 1)
Else
----- Hors si n <> 0 , c'est qu'il renvoit la longueur réelle de la chaine. c'est pour cela que j'ai l'impression que le retour "lpReturnedString " possede une formule bien compliquée.
j'aurais plutot mis : lpReturnedString =Mid$(lpReturnedString, 1, n)
En espérant que je ne me trompe pas, car je n'ai pas fais le tour complet des ces API
20 févr. 2004 à 05:54
18 juin 2002 à 08:40
Bonne Prog ;-)
17 juin 2002 à 17:39
peux-tu m'envoyer un projet Vb comme exemple
Merci
16 avril 2002 à 10:02
15 avril 2002 à 13:45