Avatar billede -anders- Juniormester
19. januar 2005 - 11:57 Der er 7 kommentarer og
1 løsning

List View ActiveX kontrol 6.0 sorter kolonner

Hej eksperter
Som ovenstånde fortæller, arbejder jeg med en ActiveX kontrol (MSCOMCTL.OCX). Jeg har i et tidligere spørgsmål for længe siden lært hvordan jeg fylder data i min listview kontrol ved at benytte et recordset (det var terry der løste det :o). Jeg har siden arbejdet meget med kontrollen, bla. imagelist. Mit sidste ønske vedr. denne kontrol er at kunne sortere stigende og eller faldende ved klik på en vilkårlig kolonne (ColumnHeader)hvis jeg feks. har en kolonne med navne skal denne sorteres stigende ved første klik og derefter faldende ved andet klik e.t.c lidt ala det man kender fra andre windowsmiljøer. Jeg har søgt i VB kategorien, der er flere indlæg der handler om dette, men jeg kan ikke få det til at virke i en accessdb. Jeg er bestemt ikke VB haj, men kender kun til VBA. Alle andre egenskaber for kontrollen ser ud til at virke, men altså ikke dette med ColumnClick til sortering af data. Der kan fremsendes en db med en tabel (ca 500 poster) og en form med listviewkontrollen der er fyldt med data fra tabellen filformatet er access2000 (284 kb uzippet)

Nogen der har et bud, lyst til at kikke på det.

:o)
Avatar billede terry Ekspert
19. januar 2005 - 12:17 #1
eksperten@NOSPAMsanthell.dk
remove NOSPAM
Avatar billede -anders- Juniormester
19. januar 2005 - 13:03 #2
DB sendt til terry
Avatar billede terry Ekspert
19. januar 2005 - 14:11 #3
Private Sub lstadressebog_ColumnClick(ByVal ColumnHeader As Object)

    If lstadressebog.SortKey = ColumnHeader.Index - 1 Then 'we clicked  the same column therefore toggle between ascending and descending
        lstadressebog.SortOrder = 1 Xor lstadressebog.SortOrder
    Else
        lstadressebog.SortKey = ColumnHeader.Index - 1
        lstadressebog.SortOrder = 0 'Ascending
    End If
   
    lstadressebog.Sorted = True

   
End Sub
Avatar billede terry Ekspert
19. januar 2005 - 14:12 #4
.
Avatar billede -anders- Juniormester
19. januar 2005 - 14:23 #5
Nu har jeg testet, og det virker bare perfekt, tusind tak for indsatsen, jeg havde den næsten selv, det var primært den med As Object jeg ikke kunne regne ud :o).Lige en ting i denne linje  lstadressebog.SortOrder = 1 Xor lstadressebog.SortOrder forstår jeg ikke helt hvad Xor gør hvis du gider ville det være dejligt med en ganske kort forklaring, her er dine velfortjente points.
Avatar billede terry Ekspert
19. januar 2005 - 14:27 #6
it changes 0 to 1 and 1 to 0

0 is (was) ascending to 1 descending

saves having to test what it is

and thanks
Avatar billede -anders- Juniormester
19. januar 2005 - 14:35 #7
Mange tak, det gjorde det hele noget mere forståligt Xor er så en slags formel, jeg syntes at kontrollen er god til at fremvise data specielt hvis det kun er read only den giver et meget proff. look og er lynhurtig, og nu med den sidste funktion virker den stort set som alle andre windowsmiljøer, genkendelighed er jo som sagt en dyd, endnu engang mange tak for hjælpen.

:o) Anders.
Avatar billede terry Ekspert
19. januar 2005 - 14:46 #8
If you mark Xor with the cursor and press F1 you will get a better explanation as to what it is. There are others which can be usefull too.

mvh
Terry
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester