这听起来像一个愚蠢的问题,但我尝试了所有我能想到的事情,但没有成功。扩展节点后,如何更改VirtualStringTree节点的图标图像。即当Node折叠时,我想显示一个关闭的文件夹图标,当它展开时,我想显示一个打开的文件夹图标。
在GetImageIndex中,我看不到如何判断节点是否扩展。 Kind只会告诉我何时选择它。
最佳答案
TBaseVirtualTree
具有Expanded
属性,用于检查给定节点是否扩展:
procedure TForm1.VTGetImageIndex(Sender: TBaseVirtualTree; Node: PVirtualNode;
Kind: TVTImageKind; Column: TColumnIndex; var Ghosted: Boolean; var ImageIndex: Integer);
begin
if Sender.Expanded[Node] then begin
...
end;
end;
关于delphi - 扩展节点时如何更改TVirtualStringTree节点图标,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/52015619/