[R] Combo dynamique

[pierrotm777]

Bonjour à tous ,

Je voudrais réaliser un combo dynamique .

Je veux dire par là que statique pour moi serait du style :

Code : Tout sélectionner

GUICtrlCreateCombo("", 50, 210, 97, 25)
GUICtrlSetData(-1, "ENGLISH|FRENCH|GERMAN|SPANISH|EBONICS", "FRENCH")

.

Ici la liste est fixe .

Est-il possible de créer donc un combo dont la ligne "ENGLISH|FRENCH|GERMAN|SPANISH|EBONICS" serait remplacée par une liste de fichiers .LNG
préalablement listés de sorte que tout nouveau fichier .lng serait alors automatiquement pris en compte par le combo .

Merci par avance .

[pierrotm777]

Bon je crois que je suis arrivé à quelque chose avec la fonction _FileListToArray et _ArrayToString

Code : Tout sélectionner

$avCommon = _FileListToArray(@Scriptdir,"*.LNG")
_FileWriteFromArray("", $avCommon, 1)
$listeLANGUAGE = _ArrayToString($avCommon, "|", 1, 7)

Mais je voudrais une liste sans l'extension des fichiers .
Il me faudrait donc traiter ces fichiers

[Yogui]

Code : Tout sélectionner

     Func _ScanMachine($SourceFolder)
        Local $FileAttributes
        Local $FullFilePath
        $Search = FileFindFirstFile($SourceFolder& "\*.*")
        While 1
            If $Search = -1 Then
                ExitLoop
            EndIf
            $File = FileFindNextFile($Search)
            If @error Then ExitLoop
                $FullFilePath = $SourceFolder & "\" & $File
                $FileAttributes = FileGetAttrib($FullFilePath)
            If StringInStr($FileAttributes,"D") Then
                $FileCount1 += 1
                $Dirlist = $Dirlist & "|" & $File
            EndIf
        WEnd
        FileClose($Search)
    EndFunc

j'utilise cette fonction à tester

[Tlem]

Il y à plus simple.

Code : Tout sélectionner

#include <File.au3>
Local $listeLANGUAGE

$avCommon = _FileListToArray(@Scriptdir,"*.LNG")

For $i = 1 to Ubound($avCommon) - 1
    $listeLANGUAGE = $listeLANGUAGE & "|" & StringTrimRight($avCommon[$i], 4)
Next
$listeLANGUAGE =  StringTrimLeft($listeLANGUAGE, 1)
 

[pierrotm777]

Merci Yogui pour votre aide.

Merci Tlem, c'est nyckel . Moi je dis Monsieur !