Убрать ScrollBars от TTreeView |
Previous Top Next |
Code: |
uses CommCtrl; procedure tNoScrollbarsTreeview.createparams(var params: TCreateParams); begin inherited; params.style := params.style or TVS_NOSCROLL; end; |
©Drkb::00637