DBGrid滚动条（上下）的问题！(50分)

D

dragon_man2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-01

• #1

1、原DBGrid滚动条，拖动滚动条翻页，聚焦数据也跟着动，如果数据多的话就会很‘卡’，怎么样使拖动滚动条时聚焦数据不动？（如：聚焦在第一页第一行，我翻页到第3页，聚焦还是在第一页第一行！）代码怎么实现？
2、鼠标滑轮不能翻页！怎么使滑轮滚到最后时整个页面能自动向下滚动！

 

D

dragon_man2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-01

• #2

在线等

 

J

japhe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-01

• #3

1.DBGRID聚焦数据一定在屏幕显示范围内

 

D

dragon_man2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-01

• #4

to japhe:
没有办法在控件代码里面改掉它吗？
如果真的没办法改那如果有10000条数据在DBGrid中，拖动起来不是超级慢！

 

I

icelovey

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-01

• #5

如果你让10000条数据显示在DBGrid中那是绝对不行的。。
你会发现内存耗用非常的大。。
建议采用分页存储过程，这方面的你搜索下就可以找到！
至于鼠标滚轮操作。。我给段代码你吧:
procedure TViewBaseFrm.GridWndProc(var Message: TMessage);
begin
CASE MESSAGE.Msg OF
WM_MOUSEWHEEL:BEGIN
DBGRID.DataSource.DataSet.MoveBy(-SMALLINT(MESSAGE.WPARAMHI) DIV WHEEL_DELTA)
END;
ELSE FGRIDWNDPROC(MESSAGE);
END;
end;

 

D

dragon_man2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-01

• #6

to icelovey
谢谢你的解答！
其实10000条数据也只是打个比方，在控件代码中真的不能实现数据聚焦的问题吗？
你给的这段代码放在程序中的哪个位置啊！？

 

D

dragon_man2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-01

• #7

在线等！

 

D

dragon_man2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-01

• #8

在线等

 

D

dragon_man2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-01

• #9

在线等

 

D

dragon_man2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-01

• #10

在线等！~
to icelovey
你这种方法还是把数据集的聚焦给改变了!

 

D

dragon_man2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-01

• #11

在线等！~

 

B

bbscom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-02

• #12

DBGridEh控件就可以的。