WIDGETS GAMBAS
LOGICIELS GAMBAS 3
TUTORIELS
VISITES

   visiteurs

   visiteurs en ligne

Où ça, qui ça?
LISTVIEW - Selection alphabétique
SELECTIONNER UN ITEM DANS UNE LISTVIEW

liste.png

Ajourd'hui nous allons voir comment sélectionner un item dans une listbox ou une listview.

CREATION DE L'INTERFACE
creer deux textbox, creer une listbox et une listview.
Maintenant ajoutons ce code pour l'evènement KEYPRESS des deux textbox :

PUBLIC SUB TextBox1_KeyRelease()
DIM i AS Integer
DIM a AS String


'pour trouver un nom dans la liste en tapant la ou les premières lettres
   IF ListBox1.List.Count = 0 THEN RETURN


 FOR i = 0 TO ListBox1.List.Count

  ListBox1.Index = i
    IF InStr(Left(UCase(ListBox1.Text), Len(TextBox1.Text)), UCase(TextBox1.Text)) <> 0 THEN
    A = ListBox1.text
         RETURN
     ELSE
    A = ""   
    END IF
  NEXT

END

PUBLIC SUB TextBox2_KeyRelease()
'pour trouver un nom dans la listeview en tapant la ou les premières lettres

  IF ListView1.MoveFirst() THEN RETURN

  REPEAT

    IF InStr(Left(UCase(ListView1.Item.Text), Len(TextBox2.Text)), UCase(TextBox2.Text)) <> 0 THEN
    ListView1[ListView1.Item.Key].Selected = TRUE

        BREAK
    END IF
  UNTIL ListView1.MoveNext()
END

Essayez l'exmple. Lors d'une saisie d'une lettre, l'item sélectionné se déplace automatiquement.
Une différence cependant. Dans la listbox, si vous saisissez une lettre et que vous l'effacez, l'item se désélectionne, et ceci pas dans la listview.
A Bientôt
Merci taotebluetongue

Date de création : 17/09/2009 @ 17:54
Dernière modification : 17/09/2009 @ 17:55
Catégorie : LISTVIEW
Page lue 3808 fois


Imprimer l'article Imprimer l'article


react.gifRéactions à cet article

Personne n'a encore laissé de commentaire.
Soyez donc le premier !


ACCES RAPIDE
RECHERCHE




LOGICIELS GAMBAS 2
LES INSTRUCTIONS
LES COMPOSANTS
Divers

^ Haut ^