Procédure: Recherche dans une ListIconGadget

[nico]

Il faudrait faire des essais avec le code de Flype:

http://purebasic.hmt-forum.com/viewtopic.php?t=1773

[Anonyme2]

Le problème de ce code, telle qu'il est, c'est qu'il faut connaître le nombre de colonnes de la liste.
On peut facilement remédier à ça en modifiant la procédure comme ça:

Code : Tout sélectionner

Procedure FindStringLIG(searchString1.s)
  hHeader = SendMessage_(GadgetID(#ListIcon_P1), #LVM_GETHEADER,0,0)
  NbColumns = SendMessage_(hHeader,#HDM_GETITEMCOUNT,0,0)
  
  For Colonne = 0 To NbColumns -1 
    For Ligne = 0 To CountGadgetItems(#ListIcon_P1) 
      If GetGadgetItemText(#ListIcon_P1,Ligne,Colonne) = searchString1 
        SetGadgetItemState(#ListIcon_P1,Ligne,#PB_ListIcon_Selected) 
        SendMessage_(GadgetID(#ListIcon_P1),#LVM_ENSUREVISIBLE,Ligne,#True) 
        Break 2 
      EndIf 
    Next 
  Next 
EndProcedure

Ma librairie MoreListiconGadget a une commande qui retourne le nombre de colonnes

Code : Tout sélectionner

Resultat.l = GetColumnsNumber(#Gadget)

[Chris]

Ma librairie MoreListiconGadget a une commande qui retourne le nombre de colonnes

Code : Tout sélectionner

Resultat.l = GetColumnsNumber(#Gadget)

Ben oui, mais en cherchant un peu, on doit aussi pouvoir trouver une librairie qui puisse faire une recherche dans la liste.

C'est bien, les librairies, mais ça n'aide pas à comprendre comment ça marche.

[Anonyme2]

Ma librairie MoreListiconGadget a une commande qui retourne le nombre de colonnes

C'est bien, les librairies, mais ça n'aide pas à comprendre comment ça marche.

Si, pour celui qui la code