[VB] ListItems + SelectedItem.EnsureVisible

[Verwijderd]

Ik heb een vraag over listview control.
Wat ik zo graag zou willen is dat een bepaalde listview item geselecteerd wordt, door de key mee te geven.

ik dacht dat het met de volgende code moest gaan werken:

code:

Set mainform.ListView1.SelectedItem = mainform.ListView1.ListItems(30)
Call mainform.ListView1.SelectedItem.EnsureVisible

Helaas werkt het niet.
Teneerste is 30 niet de id en ook niet de index. Wat het dan wel is weet ik niet.
Tentweede is het dan niet zo dat er een row geselecteerd word maar alleen boven aan komt te staan.

int 30 moet natuurlijk gewoon variable worden maar heb dit even gebruikt om te testen.

Heeft iemand hier ervaring mee?

[whoami]

Die 30, dat staat volgens mij gewoon voor het 30ste item in de listview.
Als je de Selected property zet op een bepaald listitem, dan wordt dat item geselecteerd. Je kan het ook nog in combinatie gebruiken met de ItemFocused property ofzo.

Die EnsureVisible zorgt ervoor dat het selected item ook zichtbaar staat in de listview. (Dwz, als het item selected het laatste item is in de listview, wordt er naar beneden gescrolled zodat de selected item zichtbaar is).

[Verwijderd]

Dankje whoami

Maar hoe krijg ik het nou voor elkaar dat ik hem kan selecten via de unique ID uit de database. Ik heb namelijk de de unique id uit de database als key geadd. voor elke row in de listview is dus de unique id uit de database bekend.

[whoami]

Tja, ik ken geen VB, maar dit is hoe je het bv in Delphi kunt doen:

In een ListView heb je per ListItem een property 'Data'. Daar steek ik m'n primary key in. Je kunt via de memberfunction 'FindData' het gewenste ListItem gaan opzoeken.
Hoe je het in VB kunt doen, ... ik vermoed op een gelijkaardige manier.

[Gerco]

In VB heeft elk ListItem een Key property. Als je daar je PK instopt kun je gewoon zo doen:

code:

PK = "item30" <-- Dit is dus de PK van de item die je wilt hebben
Set ListView1.SelectedItem = ListView1.ListItems(PK)
ListView1.SelectedItem.EnsureVisible

De Key van een listitem MOET trouwens met een niet-numeriek karakter beginnen. Ik prefix 'em meestal met "i" of "k" ofzo.

[whoami]

Op vrijdag 14 juni 2002 14:30 schreef Gerco het volgende:
De Key van een listitem MOET trouwens met een niet-numeriek karakter beginnen. Ik prefix 'em meestal met "i" of "k" ofzo.

Da's vreemd... Heb je in VB dan niet een Tag property ofzo per ListItem die gewoon een Variant ofzo is? In Delphi moet de Data property een pointer bevatten, dus kan je daar eigenlijk ook een pointer naar een willekeurig datatype in kwijt.

[Verwijderd]

zoals ik het nu heb gedaan is als volgt. Met het aanmaken van van rows in m'n listviews heb ik de volgende regel in een loop gezet:

code:

Set list_item = mainform.ListView1.ListItems.Add(, "key " & vartemp, vartemp2)

dus nu moet ik key 30 gebruiken?

of begrijp ik je verkeerd?

[Verwijderd]

sorry had eerst moeten kijken of het werkte ja of de nee.
Het werkt dus. Aaleen meot hij niet alle zichtbaar zijn maar ook geselecteerd. maar Whoami had het hier al over gehad.

[Verwijderd]

in visual Basic bestaat ItemFocused niet. Ik heb overigens gebruik gemaakt van:

code:

Function fLVFullRowSelect(LV As Control) As Boolean
'Sets FullRowSelect for a ListView
'
Dim lngStyle As Long

   'Find out the current style first
   lngStyle = apiSendMessageLong(LV.hWnd, _
                           LVM_GETEXTENDEDLISTVIEWSTYLE, _
                           0&, 0&)
                           
   If lngStyle And LVS_EX_FULLROWSELECT Then
    'Listview already has FullRowSelect enabled
    fLVFullRowSelect = True
   Else
    'Set the property to True
    fLVFullRowSelect = (apiSendMessageLong(LV.hWnd, _
                           LVM_SETEXTENDEDLISTVIEWSTYLE, _
                           LVS_EX_FULLROWSELECT, True) = 0)
   End If
End Function

Dit zorgt er voor dat als ik iets selecteer de hele row geselecteerd wordt. (misschien geen nuttige info maar ok)

ok to the point hoe krijg ik hem nou niet alleen zichtbaar maar ook geselecteerd?

Alvast bedankt.

[Gerco]

Op vrijdag 14 juni 2002 14:39 schreef whoami het volgende:
Da's vreemd... Heb je in VB dan niet een Tag property ofzo per ListItem die gewoon een Variant ofzo is?

Er is een Tag property ja, maar daarmee kun je een item niet aanspreken via de ListItems() collection. Dan moet je handmatig de collection aflopen. Als je de key gebruikt, doet het Collection object dat voor je. Gewoon een kwestie van luiheid.

[Gerco]

Op vrijdag 14 juni 2002 15:11 schreef Helerion het volgende:
Dit zorgt er voor dat als ik iets selecteer de hele row geselecteerd wordt. (misschien geen nuttige info maar ok)

Het aanvinken van FullRowSelect in de properties dialog box van de listview doet dat ook:

En als ik hier de SelectedItem property zet, wordt 'ie OOK selected hoor... zeker weten dat je hideselection niet aan hebt staan (zie ook bovenstaand plaatje)?

Hier een stukje code wat bij mij perfect werkt:

code:

Set lvwOpnames.SelectedItem = lvwOpnames.HitTest(x, y)

[whoami]

De hideselection heeft op zicht toch niets te maken met het al of niet tonen welk een item er geselecteerd is ALS de ListView de focus heeft (of zelfs de form waarop de ListView staat de actieve form is)?

[Gerco]

Op vrijdag 14 juni 2002 15:34 schreef whoami het volgende:
De hideselection heeft op zicht toch niets te maken met het al of niet tonen welk een item er geselecteerd is ALS de ListView de focus heeft (of zelfs de form waarop de ListView staat de actieve form is)?

Dat weet ik, maar als hideselection aanstaat (default?) en de listview heeft GEEN focus, dan zie je niet dat er een item geselecteerd is... en aangezien ik niet weet of die listview focus heeft in zijn code, zou het relevant kunnen zijn.

[whoami]

Ik heb het net even getest en het is idd zo dat het niet voldoende is dat de form waarop de listview staat de actieve moet zijn.
De ListView moet wel degelijk de focus hebben wil je zien welk item er selected is en als de HideSelection property op True staat.

Dus:
-Je zorgt ervoor dat je ListView de focus heeft
-of je zorgt dat de HideSelection op False staat.

[Verwijderd]

hahahaha hide selection stond idd aan. Wel echt vervelend dat alles weer van een vinkje kan afhangen. Maar bedankt voor de goede tip!!!

Loop nu wel weer tegen een ander probleem probeer hier eerst zelf uit te komen.

He Mannen nogmaals bedankt