title image


Smiley Node an erste Stelle im sichtbaren Teil des TreeView bringen
Ich arbeite im Moment an einer Prozedur, die einen TreeView so scrollen soll, dass eine bestimmte Node, die als Argument übergeben wurde, an erster Stelle sichtbar ist. Hat das schon mal wer gemacht, oder Ideen, wie es gehen könnte?

Vor allem weiss ich noch nicht, wie ich feststelle, wieviel Zeilen man scrollen muss.





Hier der Code:



[tvwTree MSComctlLib.TreeView]





Private Sub SetFirstVisible(ByVal Node As MSComctlLib.Node) Dim hFirstVisibleItem As Long Dim i As Integer Dim lNumber As Long Dim lDirection As Long hFirstVisibleItem = SendMessage(tvwTree.hwnd, TVM_GETNEXTITEM, TVGN_FIRSTVISIBLE, 0&) lNumber ' wieviel zeilen liegen zwischen node und firstvisibleitem? lDirection ' darunter oder darüber [SB_LINEUP | SB_LINEDOWN] For i = 1 To lNumber lBack = SendMessage(tvwTree.hwnd, WM_VSCROLL, lDirection, vbNull) Next iEnd Sub





geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: