怎样去掉DBGrid里的滚动条? 我在DBGrid里正好满屏显示20条记录,可是垂直方向还是有滚动条,根本就没有必要,请问我怎么能把它屏蔽掉? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 方法一、在你的单元文件中type TForm1 = class(TForm)上面加入type TCGrid= class ( TCustomGrid)end;然后再form的onshow事件中: TCGrid(self.DBGrid1).scrollbars:=ssNone;就可以了。方法二、ShowScrollBar(DBGrid.Handle, SB_BOTH ,false);ShowScrollBar(ListView1.Handle, SB_VERT, False); //隐藏纵向滚动条ShowScrollBar(ListView1.Handle, SB_HORZ, False); //隐藏横向滚动条 谢谢上面老兄的指点,可是我在用的时候遇到点问题,帮我看看: 我用第一种方法,把水平滚动条给屏蔽了,跟我的要求正好相反;我用第二种方法,把 ShowScrollBar(DBGrid1.Handle,SB_VERT, False);加在show函数里,运行程序什么都没变,还是两边有滚动条?问题出在哪里了? procedure TForm2.Query1BeforeScroll(DataSet: TDataSet);beginShowScrollBar(DBGrid1.Handle, SB_VERT, false);end;procedure TForm2.Query1AfterScroll(DataSet: TDataSet);beginShowScrollBar(DBGrid1.Handle, SB_VERT, false);end;这种方法滚动条会闪烁,效果是很好 加在query的beforescroll里面就可以了,上面说错了,效果不是很好 我照 wlhtake(正在调试) 做了,的确存在滚动条会闪烁的现象。或者我把 TCGrid(self.DBGrid1).ScrollBars := ssBoth ; 加在 show 函数里面,可以实现无垂直滚动条,但是也有闪烁的现象,怎么样能不出现呢?高手帮我看看,弄完我就结帐! 前提是:最右边不显示任何东西。最简单的方法是:把 dbgrid 控件挪进去一块,达到的效果即可。 呵呵,这个方法确实挺有意思,可是我把 dbgrid 挪进去以后,水平滚动条的右箭头也跟着进去了,正好鼠标点不上,这样也不太好吧? gdi+ 问题 如果把TGPGraphics设置为成员变量则无效, 在函数中设置为临时变量可以 经典的判断数据库连接断开问题,翻遍了许多地方没有答案。 奇怪!这个图为什么画不上去呢?大家帮我看看! 为什么帖子已经结了,还可以回复呢? 关于ID3 为什么过去的帖子都看不到了? 线程内传递参数问题,请大家帮忙。 请各为大虾帮帮小弟 出鬼了. WINDOWS2000ADVANCE SERVER 驱动DDS4磁带的方法?? 在SERVER端,编写接口函数时,若返回的类型为STRING,在TYPE LIBRTRY 如何设置 N个EDIT随意结合查询
type
TForm1 = class(TForm)
上面加入
type
TCGrid= class ( TCustomGrid)
end;
然后再form的onshow事件中:
TCGrid(self.DBGrid1).scrollbars:=ssNone;
就可以了。
方法二、
ShowScrollBar(DBGrid.Handle, SB_BOTH ,false);
ShowScrollBar(ListView1.Handle, SB_VERT, False); //隐藏纵向滚动条
ShowScrollBar(ListView1.Handle, SB_HORZ, False); //隐藏横向滚动条
我用第一种方法,把水平滚动条给屏蔽了,跟我的要求正好相反;我用第二种方法,把
ShowScrollBar(DBGrid1.Handle,SB_VERT, False);
加在show函数里,运行程序什么都没变,还是两边有滚动条?问题出在哪里了?
begin
ShowScrollBar(DBGrid1.Handle, SB_VERT, false);
end;procedure TForm2.Query1AfterScroll(DataSet: TDataSet);
begin
ShowScrollBar(DBGrid1.Handle, SB_VERT, false);end;这种方法滚动条会闪烁,效果是很好
上面说错了,效果不是很好
TCGrid(self.DBGrid1).ScrollBars := ssBoth ;
加在 show 函数里面,可以实现无垂直滚动条,但是也有闪烁的现象,怎么样能不出现呢?高手帮我看看,弄完我就结帐!
最简单的方法是:把 dbgrid 控件挪进去一块,达到的效果即可。