怎么让dbgrid不显示滚动条?
解决方案 »
- 请教cxCheckCombobox获取数据的问题
- +++继续散分,继续找工作+++
- 查询后如何实现分页功能
- 关于Tchart饼图的问题,急急,在线等!
- 有关反利用GHOST进行盗版的问题
- 请问有没有限制软件使用台数的方法,如只能让其装三台,装完第四台时,程序打开后有提示需要注册!
- 两个分别上网的电脑如何相互通过程序相互收发数据???
- Report Builder (Ver10.08) for Delphi 2007 - DBRichEdit的Stretch错误
- 用存储过程动态创建表,表的名称是通过参数传递的,怎么传?
- 初学Delphi,请教关于soap/web service客户端调用perl服务端的问题。
- ttable要引用哪个单元
- 小弟初学数据库,请问两个简单透顶的问题
或者query的dispalywidth
interfaceuses WinTypes, WinProcs, Classes, DBGrids;
type
TNoVertScrollDBGrid = class(TDBGrid)
protected
procedure Paint; override;
end;procedure
Register;
implementation
procedure TNoVertScrollDBGrid.Paint;
begin
SetScrollRange(Self.Handle, SB_VERT, 0, 0, False);
inherited Paint;
end;
procedure Register;
begin
RegisterComponents('Data Controls', [TNoVertScrollDBGrid]);
end;
该怎样设置呢?