Treeview immer expanded

[MisterNiceGuy]

Hi, gibt's bei der Standard-Treeview-Komponente eine Möglichkeit alle Nodes immer zu expanden?
Oder ein collapsen garnicht erst zuzulassen?

Vielen Dank für eure Antwort

Edit
Antwort schon bekommen, ich lösche nicht, weil es eventuell auch andere interessieren könnte.
Einfach ins OnCollapsing folgendes schreiben:

Delphi-Quellcode:

procedure TForm1.TreeView1Collapsing(Sender: TObject; Node: TTreeNode;
  var AllowCollapse: Boolean);
begin
  allowCollapse := false;
end;