J'aimerais remplir une lisicongadget avec beaucoup d'élément +de 5000 lignes(pièces d'un magasin d'atelier)
Mais voilà cela peut vraiment être long....
Si vous savez comment accélérer ce processus, je vous remercie de m'aider.
Code : Tout sélectionner
Procedure GadgetEvent()
Select EventGadget()
Case 2
For i=1 To 1000
AddGadgetItem(1, -1, "ID"+i+Chr(10)+"I like to do this faster!")
AddGadgetItem(1, -1, "ID"+i+Chr(10)+"If you know how to do that...think you to help me :-)")
AddGadgetItem(1, -1, "ID"+i+Chr(10)+"J'aimerais accélérer l'affichage d'une longue liste!!!")
AddGadgetItem(1, -1, "ID"+i+Chr(10)+"Si vous savez comment faire...Merci de m'aider")
Next
EndSelect
EndProcedure
If OpenWindow(0, 100, 100, 600, 600, "ListIcon Example", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ButtonGadget(2,5,2,100,20,"Go")
ListIconGadget(1, 5, 25, 590, 565, "ID", 100, #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)
AddGadgetColumn(1, 1, "NOM", 250)
BindEvent(#PB_Event_Gadget, @GadgetEvent())
EndIf