Убрать ScrollBars от TTreeView

Материал из DRKB

Убрать ScrollBars от TTreeView[править | править код]

uses CommCtrl;
procedure TNoScrollbarsTreeview.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.Style := Params.Style or TVS_NOSCROLL;
end;


ID: 00637