Nodes in VirtualTreeview filtern und VerticalScrollbar aktualisieren

[Codehunter]

Hallo zusammen!

Ich benutze den VTV als Grid. Jetzt habe ich z.B. viele hundert Nodes im Tree und gehe die iterativ durch, um anhand von Matchingkriterien einen Filter zu setzen (Node.States := Node.States + [vsFiltered]). Unter TreeOptions.PaintOptions habe ich toShowFilteredNodes = false gesetzt.

Soweit funktioniert das auch wunderbar, es werden ordentlich alle Nodes ausgeblendet, wo die Matchingkriterien nicht passen.

Was aber schief geht ist, dass die VerticalScrollbar nicht aktualisiert wird. Also wenn ich z.B. vor dem Filterlauf 1000 Nodes im Tree habe und nach dem Filterlauf davon noch 10 sichtbar sind, dann verhält sich die vertikale Scrollbar immer noch so, als gäbe es 1000 Nodes und man kann ewig in den leeren Bereich scrollen.

Ich habs übrigens auch anstelle von vsFiltered mit vsVisible versucht, das Problem ist das selbe. Ich müsste also nach dem Filterlauf die Höhe des scrollbaren Bereiches neu berechnen lassen. Nur weiß ich nicht wie :?:

Grüße
Cody

[Codehunter]

Hat sich erledigt, ich habs selbst rausgefunden. Ich habe die Filterei falsch gemacht. Statt

Delphi-Quellcode:

Node.States := Node.States + [vsFiltered]

muss man

Delphi-Quellcode:

MyTree.IsFiltered[Node] := True

machen. Dann werden die Scrollbars automatisch angepasst.