当没有节点可见时,如何显示我自己的文本

时间:2015-08-13 08:11:32

标签: delphi virtualtreeview

我使用的是virtualtreeview,当没有节点可见时,我想在组件中显示不同的消息,无论列是什么。

你有想法这样做吗? 谢谢。

1 个答案:

答案 0 :(得分:4)

OnPaintBackground事件编写处理程序。例如:

procedure TForm1.VirtualStringTreePaintBackground(Sender: TBaseVirtualTree;
  TargetCanvas: TCanvas; R: TRect; var Handled: Boolean);
begin
  if Sender.VisibleCount = 0 then
  begin
    Handled := True;
    TargetCanvas.TextOut(10, 10, 'List has no visible nodes.');
  end;
end;

如果您有兴趣在控件为空时显示文本(不仅仅是在隐藏其节点时),您可以使用EmptyListMessage属性。