Lien de ma vidéo pour voir le temps que je met pour charger plus de 2600 resultats : https://www.youtube.com/watch?v=FtddvHfl6ug
Mon code
Code : Tout sélectionner
Func _tout()
Global $aReg[25][2] = [["A"],["B"],["C"],["D"],["E"],["F"],["G"],["H"],["I"],["J"],["K"],["L"],["M"],["N"],["O"],["P"],["Q"],["R"],["S"],["T"],["U"],["V"],["X"],["Y"],["Z"]]
SplashTextOn($titleapp, "Chargement de la base de donnée", 300, 50, -1, -1, 4, "", 8)
For $iIndex = 0 To UBound($aReg, 1) - 1
;MsgBox(0, $aReg[$iIndex][0], "Terminer" ,2)
$dirsearch = ""&$appdir&"\"&$aReg[$iIndex][0]&".ini"
$array = IniReadSectionNames($dirsearch)
; _ArrayDisplay($array)
For $i = 1 To $array[0]
$category = IniRead($iniFile, $array[$i], "Category", "5")
$desc = IniRead($iniFile, $array[$i], "Desc", "")
$tag = IniRead($iniFile, $array[$i], "Tag", "")
$version = IniRead($iniFile, $array[$i], "Version", "")
$pub = IniRead($iniFile, $array[$i], "Publisher", "")
GUICtrlCreateListViewItem("" & $array[$i] & "|" & $desc &"|" & $Version &"|" & $pub &"", $ListView0)
WinSetTitle($Form1, $titleapp, ""&$titleapp&" - Chargement des "&_GUICtrlListView_GetItemCount($ListView0)&" applications")
Next
Next
WinSetTitle($Form1, $titleapp, ""&$titleapp&" - "&_GUICtrlListView_GetItemCount($ListView0)&" applications disponibles")
SplashOff()
EndFunc
