Page 2 sur 2
Re: [R] Gui Multilanguage par choix d'un fichier langue
Posté : sam. 21 févr. 2009 12:56
par pierrotm777
Bonjour Tlem,
Je ne comprend pas , j'ai bien tous mes .lng et la même erreur !
Re: [R] Gui Multilanguage par choix d'un fichier langue
Posté : sam. 21 févr. 2009 21:50
par Tlem
Ha vouiiii, je pense que la fonction
_ArrayDelete ne met pas à jour le nombre d'éléments du tableau
$aListlang.
Donc pour corriger ceci, remplacez le code :
Code : Tout sélectionner
For $i = ubound($aListlang)-1 To 1 Step - 1
If $aListlang[$i] = "default.lng" Then _ArrayDelete($aListlang, $i)
Next
Par
Code : Tout sélectionner
For $i = ubound($aListlang)-1 To 1 Step - 1
If $aListlang[$i] = "default.lng" Then
_ArrayDelete($aListlang, $i)
$aListlang[0] = $aListlang[0] - 1
EndIf
Next
Une autre solution aurait été de ne pas utiliser la valeur 0 du tableau, mais la fonction
Ubound qui retourne le nombre d'éléments.
Il aurait fallu dans ce cas remplacer ceci :
Code : Tout sélectionner
Dim $EventID[$aListlang[0]+1]
For $i = 1 to $aListlang[0]
$EventID[$i] = GUICtrlCreateMenuItem($aListlang[$i], $Choix_Langage)
Next
par ceci :
Code : Tout sélectionner
$NbElement = Ubound($aListlang)-1
Dim $EventID[$NbElement+1]
For $i = 1 to $NbElement
$EventID[$i] = GUICtrlCreateMenuItem($aListlang[$i], $Choix_Langage)
Next
Re: [R] Gui Multilanguage par choix d'un fichier langue
Posté : dim. 22 févr. 2009 14:59
par pierrotm777
Merci Tlem ,
J'ai testé le premier exemple qui fonctionne super bien .
Merci beaucoup,
Pierre