Page 1 sur 1
[R] Combo dynamique
Posté : ven. 08 mai 2009 16:28
par 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 .
Re: [..] Combo dynamique
Posté : ven. 08 mai 2009 19:38
par 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
Re: [..] Combo dynamique
Posté : ven. 08 mai 2009 20:16
par 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
Re: [..] Combo dynamique
Posté : ven. 08 mai 2009 22:06
par 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)
Re: [..] Combo dynamique
Posté : sam. 09 mai 2009 16:59
par pierrotm777
Merci Yogui pour votre aide.
Merci Tlem, c'est nyckel . Moi je dis Monsieur !