TDBGrid控件没有OnMouseDowns事件,如何在TDBGrid中实现拖放?(100分)

Z

zodiac

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-03-22

• #1

要实现将TDBGrid种的一行(Row)拖到另一个控件中.如果将DragMode设为
Automatic,则无法用鼠标单击选择行.如果设为Manual,发现TDBGrid控件
没有OnMouseDown事件.如何实现拖动?

 

H

huizhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-03-23

• #2

继承一个TDBGrid, 加上OnMouseDown事件吧

 

茶

茶叶蛋

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-03-23

• #3

看来只能自己写dbgrid了!

 

Z

zaoya

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-03-26

• #4

在本unit中，自定义TMyCustomDBGrid=class(TCustomDBGrid),
再如下引用: TMyCustomDBGrid(DBGrid1).MouseDown(...)
或 (DBGrid1 as TMyCustomDBGrid).MouseDown(...)
即可

 

Z

zodiac

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-05-17

• #5

多人接受答案了。