怎样隐出dbgrid的滑动条(100分)

  • 主题发起人 主题发起人 nho
  • 开始时间 开始时间
在可完全显示范围内,滑动条不会出现,如果超出,则一定会出现,无法隐藏!,你可以这
样做,返回固定的列数和行数,如返回6 row和 6 column.当用户需要下一组数据时在
返回下面的6 ROW 和 6 Column.只要保证Dbgrid的显示区可完全显示数据就可以.
 
试用ShowScrollBar()函数看看,
其参数请查看在线帮助
 
滑动条的出现与否是自动的。。。超出则出现,否则隐藏。
要控制的话-->控制行列。
 
请问chinarlzn
在线帮助中好像没有这个函数
在哪儿可以查到showwscrollbar()函数
先谢谢
 
这是一个 Windows API 函数,经 Delphi 封装了,在上面按 F1 就可找到其用法。
如果查不到,那是因为你安装 Delphi 时未选安装 Windows SDK 帮助文件。
这里是它的定义:
The ShowScrollBar function shows or hides the specified scroll bar.

BOOL ShowScrollBar(

HWND hWnd, // handle of window with scroll bar
int wBar, // scroll bar flag
BOOL bShow // scroll bar visibility flag
);


Parameters

hWnd

Identifies a scroll bar control or a window with a standard scroll bar, depending on the value of the wBar parameter.

wBar

Specifies the scroll bar(s) to be shown or hidden. This parameter can be one of the following values:

Value Meaning
SB_BOTH Shows or hides a window's standard horizontal and vertical scroll bars.
SB_CTL Shows or hides a scroll bar control. The hWnd parameter must be the handle of the scroll bar control.
SB_HORZ Shows or hides a window's standard horizontal scroll bars.
SB_VERT Shows or hides a window's standard vertical scroll bar.


bShow

Specifies whether the scroll bar is shown or hidden. If this parameter is TRUE, the scroll bar is shown; otherwise, it is hidden.



Return Values

If the function succeeds, the return value is nonzero.
If the function fails, the return value is zero. To get extended error information, call GetLastError.

Remarks

While processing a scroll bar message, an application should not call this function to hide a scroll bar.

See Also

GetScrollPos, GetScrollRange, ScrollDC, ScrollWindow, SetScrollPos, SetScrollRange

其Pascal 定义在 windows.pas 单元中 31100 行。
 
请问各位:
怎么在程序中实现?如在Form,还是在dbgrid的哪种事件中调用?调用
时该函数赋值给哪个变量?最好给个例程
 
ShowScrollBar(dbgrid1.Handle,SB_BOTH,False);
 
谢谢shangjintong
函数我已经知道,但是怎么调用的问题?

 
多人接受答案了。
 
后退
顶部