B brian chaw Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-30 #1 我想让CustomGrid 在任何时候都显示垂直的滚动条,就象TMEMO 那样, 在不需要滚动的时候Disable 滚动条而不是隐藏掉滚动条. 非常感谢!
Z zhumoo Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-30 #3 可以让CustomGrid不显示滚动条,然放在scrollbox中,然后控制scrollbox.
D Del_Sun Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-30 #4 具体可以查看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;
具体可以查看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;
P Pearl. Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-30 #6 showscrollbar(dbgrid1.handle, SB_BOTH, True);