Default Removing scrollbars from TDBCtrlGrid

最新推荐文章于 2019-12-09 18:37:55 发布

liukeforever

最新推荐文章于 2019-12-09 18:37:55 发布

阅读量966

点赞数

分类专栏： Delphi 文章标签： date byte

版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。

本文链接：https://blog.csdn.net/liukeforever/article/details/5679087

版权

Delphi 专栏收录该内容

22 篇文章 0 订阅

订阅专栏

http://www.delphipages.com/forum/showthread.php?t=133067

This one works for TDBGrid, but I think it also works for TDBCtrlGrid:

http://www.swissdelphicenter.ch/en/showcode.php?id=1880

Regards,
Abdulaziz Jasser

Reply With Quote

# 3

Old

05-06-2005, 02:44 AM

omercan

omercan is offline

Member

Join Date: Aug 2001

Posts: 89

Default

RE: Removing scrollbars from TDBCtrlGrid

Hi

This is how to remove both scrollbars from a
TDBCtrlGrid:

procedure TForm1.BitBtn1Click(Sender: TObject);
const
Enable: Array[Boolean] of Byte = (ESB_ENABLE_BOTH, ESB_DISABLE_BOTH);
begin
EnableScrollBar(DBCtrlGrid1.Handle,SB_VERT,Enable[Abs(VertScrollBar.Range - Height) < 3]);
ShowScrollbar(DBCtrlGrid1.Handle, SB_BOTH, false);
end;

Good luck!

Omer

关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
Default Removing scrollbars from TDBCtrlGrid

<br />http://www.delphipages.com/forum/showthread.php?t=133067<br /> This one works for TDBGrid, but I think it also works for TDBCtrlGrid:<br /><br />http://www.swissdelphicenter.ch/en/showcode.php?id=1880<br /><br />Regards,<br />Abdulazi
复制链接

扫一扫

专栏目录

评论

被折叠的条评论为什么被折叠?

到【灌水乐园】发言

查看更多评论

添加红包

成就一亿技术人!

hope_wisdom

发出的红包

实付元

使用余额支付

点击重新获取

扫码支付

钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。