SetComCtlStyle((Sender as TTreeView),TVS_NOSCROLL,true);
ShowScrollBar((Sender as TTreeView).Handle,SB_HORZ,false);//隐藏水平滚动条
ShowScrollBar((Sender as TTreeView).Handle,SB_VERT,false);//隐藏垂直滚动条
ShowScrollBar((Sender as TTreeView).Handle,SB_BOTH,false);//隐藏所有滚动条