我使用TVirtualStringTree组件。使用此代码,图像将显示重复。我如何修复它?
的数据
procedure TFAbzarCode.VST1GetImageIndex(Sender: TBaseVirtualTree;
Node: PVirtualNode; Kind: TVTImageKind; Column: TColumnIndex;
var Ghosted: Boolean; var ImageIndex: TImageIndex);
var
NodeData: ^rTreeData;
MImageIndex:integer;
begin
NodeData := Sender.GetNodeData(Node);
ImageIndex:=NodeData.ImageIndex;
end;
字符串
我只想要一个图标旁边的文字
1条答案
按热度按时间j9per5c41#
这段代码解决了这个问题。
字符串