显示滚动条(200分)

  • 主题发起人 主题发起人 brian chaw
  • 开始时间 开始时间
B

brian chaw

Unregistered / Unconfirmed
GUEST, unregistred user!
我想让CustomGrid 在任何时候都显示垂直的滚动条,就象TMEMO 那样,
在不需要滚动的时候Disable 滚动条而不是隐藏掉滚动条.
非常感谢!
 
可以让CustomGrid不显示滚动条,然放在scrollbox中,然后控制scrollbox.
 
具体可以查看SetScrollInfo帮助,在windows sdk里
procedure TForm1.BitBtn1Click(Sender: TObject);
var
Data : SCROLLINFO;
begin
Data.cbSize := SizeOf(Data);
Data.fMask := SIF_ALL ;
Data.nMin := 0;
Data.nMax := 50;
Data.nPage := 5;
Data.nPos := 5;
Data.nTrackPos := 5;
SetScrollInfo(CustomGrid.Handle, SB_VERT , Data, True)
end;
 
showscrollbar(dbgrid1.handle, SB_BOTH, True);
 
后退
顶部