Treeview

[kedaman]

if i remove a node that is being selected, or have been selected recently, the blue box around the next selected item will stay even if i try to select another item, it will jump to the new selected item but then jump back to the item first clicked after the node has been removed.

Private Sub Form_Load()
    TreeView1.LineStyle = tvwRootLines
    TreeView1.Nodes.Add TreeView1.Nodes.Add(, , , "A"), tvwChild, , "B"
    TreeView1.Nodes.Add , , , "C"
End Sub

Private Sub TreeView1_DblClick()
On Error Resume Next
    With TreeView1.SelectedItem
        Set TreeView1.SelectedItem = Nothing
        'For n = 0 To 20000
        '    DoEvents
        'Next n
        TreeView1.Nodes.Remove .Index
    End With
End Sub

This sample demonstrates the bug, expand the node, and doubleclick on B ot remove it


if i uncomment the for next loop, it will work, most of the time, with 10000 cycles, it will fail more often.
Is there any other way around this problem?

[PsychoMark]

Hi, I tried the code, when I double-click on item B, it gets removed and the blue box just disappears. Is that what you meant?

[kedaman]

well now if you have completed that, click on either C or A, then click on the other, and try that, it doesn't move from the one you clicked first.

I tried doing this in the mouseup event and it works, but what's wrong with doubleclicking our mousedown?

[PsychoMark]

Sorry, it works fine here...

[kedaman]

Hmm, thats odd, what version of mscomctl.ocx do you have? mine is 6.00.8177

[PsychoMark]

My version: 6.00.8862

Also, when selecting it, it shows SP4 (where that came from, no idea, it was just there one day...)

[kedaman]

can you send that to me? ([email protected])
Would be appreciated

[PsychoMark]

It should arrive shortly in your Hotmail box... hope this solves your problem!

[kedaman]

Yes! it works, thanks a lot but it flickers instead, well doesn't matter now thanks again.