delphi - TVirtualStringTreeからすべてのノードを削除するにはどうすればよいですか？

Question

イベントハンドラでVirtualStringTreeの子孫を含むすべてのノードを削除するには、VirtualStringTreeを含むフォームを閉じますか？

Answer 1

TVirtualStringTreeaまたはその子孫からすべてのノードを削除するには、Clearメソッドを使用します（ただし、Clearメソッドは仮想であり、一部の子孫によってオーバーライドできることに注意してください。ただし、実装者は、ツリーをクリアするというこのメソッドの本来の目的を維持する必要があります。そうでない場合は、私の見解では、これは間違った実装です。

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  VirtualStringTree1.Clear;
end;