liujianjun
/
tslediter
3
0
Fork 1
Code Issues Pull Requests Projects Releases Wiki Activity

修正树节点 visible的缺陷

This commit is contained in:
liujianjun 2024-07-15 11:38:25 +08:00
parent 17a55d2a44
commit 6c712e64ab
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
funcext/tvclib/utslvcltree.tsf
View File

@ -1099,7 +1099,7 @@ type TcustomTreeCtlNode = class(tsluibase) //
it.Parent := self(true); it.Parent := self(true);
FCurrentAddNode := nil; FCurrentAddNode := nil;
it.UpDateHierarchy(); it.UpDateHierarchy();
if Expanded and Owner.NodeInList(self)then if Expanded and Owner.NodeInList(self) and it.Visible then //处理节点visibe 的问题
begin begin
preItem := FItems[idx-1]; preItem := FItems[idx-1];
bx := 0; bx := 0;