--- ---
Derive a new control from TTreeView and override its CreateParams method like this:
uses CommCtrl; procedure TNoScrollbarsTreeview.CreateParams(var Params: TCreateParams); begin inherited; Params.style := Params.style or TVS_NOSCROLL; end;