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