如何去掉listview组件的水平滚动条?

xsf516624 2008-11-29 01:11:38
就是无论什么情况下都不给这个组件显示水平滚动条
那个朋友知道?
...全文
125 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
Bear_hx 2008-11-29
  • 打赏
  • 举报
回复
楼上的可以,不过ListView的滚动条是在记录变化自动更新范围了,在重画中写也可以达到目的。
Storm2008 2008-11-29
  • 打赏
  • 举报
回复
procedure TFrmToolbar.ListViewAdvancedCustomDraw(Sender: TCustomListView;
const ARect: TRect; Stage: TCustomDrawStage; var DefaultDraw: Boolean);
begin
ShowScrollBar(sender.Handle,SB_HORZ,false);//隐藏水平滚动条
ShowScrollBar(sender.Handle,SB_VERT,false);//隐藏垂直滚动条
ShowScrollBar(sender.Handle,SB_BOTH,false);//隐藏所有滚动条
end;

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧