任何能让光标自由移动...

HelenIsxingfang 2004-11-02 05:11:24

各位，能不能给偶一个让DataGrid中的光标自由移动的例子，
就象Excel中的电子表格中的光标一样,移动起来非常方便...

...全文

89 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

xuam 2004-11-02

打赏
举报

keybd_event ( 9, 0, 0 , 0 ) // 按下tab
keybd_event ( 9, 0, 2, 0 ) // 释放tab

xuam 2004-11-02

打赏
举报

上下移动本来就有!

keybd_event(9,0,0,0)
keybd_event(9,0,2,0)

:将tab键的句柄传递给左右键!

打雷啦的专栏 2004-11-02

打赏
举报

这两句是什么意思，能否解释一下，谢谢
keybd_event(9,0,0,0)
keybd_event(9,0,2,0)

balloonman2002 2004-11-02

打赏
举报

个人觉得左右移动反而不太方便，不便于修改数据，上下移动比较实用，谨供参考

xuam 2004-11-02

打赏
举报

建一个自定义事件,选择pdm_dwnkey的 event_id

然后写:

Choose Case key
Case Keyrightarrow! //右箭头
//if this.position()=len(gettext()) + 1 then
IF This.Getcolumn()<>integer(This.object.datawindow.column.count) Then
keybd_event(9,0,0,0)
keybd_event(9,0,2,0)
//end if
end if
Case Keyleftarrow! //左箭头
IF This.Getcolumn()<>1 Then
if this.position()=1 then
keybd_event(16,0,0,0)
keybd_event(9,0,0,0)
keybd_event(16,0,2,0)
keybd_event(9,0,2,0)
end if
end if

End Choose