DBGrid没有ScrollBars属性,如果我要DBGrid不显示水平滚动条及垂直滚动条,有什么好方法
解决方案 »
- 重新学习Delphi请大家多多关照
- 请教高手登陆界面如何选择数据库名进行登陆?
- 请问一个问题,在TREEVIEW中一个结点的TEXT我知道怎么设置,他是否还有个VALUE???怎么设置?
- 使用了决策控件的请进入( 就是有DECESION开头的)
- 关于连接数据库时组件的选择问题
- 如何让打印出来的报表成为表格?就是两项之间是分割的?
- 尘世间最困难的事莫过于“选择!!!”!何去何从,请你来答,高手相送
- 如何在delphi中操作SQL SERVER的UniqueIdentifier字段
- QReport 中的 TQRRichedit控件的字体加粗问题
- 如何在DELPHI中清空数据库中表中的记录
- 高分求教:天心的主介面的流程圖用甚麼東西做的?
- 怎么把选中的多个图像文件装载入IMAGE控件。
TNoScrollBarDBGrid = class(TDBGrid)
private
protected
procedure Paint; override;
public
published
end;procedure Register;implementationprocedure Register;
begin
RegisterComponents('Samples', [TNoScrollBarDBGrid]);
end;{ TNoScrollBarDBGrid }procedure TNoScrollBarDBGrid.Paint;
begin
SetScrollRange(Handle, SB_VERT, 0, 0, false);
inherited;
end;抄来的,呵呵,你看看可不可以
SetScrollRange(DBGrid1.Handle, SB_VERT, 0, 0, false);我试过的没问题。