Foxtable(狐表)用户栏目专家坐堂 → 设置鼠标移到数据行


  共有2158人关注过本帖树形打印复制链接

主题:设置鼠标移到数据行

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/8 14:36:00 [显示全部帖子]

全局代码

 

<DllImport("user32.dll", EntryPoint := "SetCursorPos")> _
Public Function SetCursorPos(x As Integer, y As Integer) As Boolean

End Function

 

调用代码

 

Dim t As Table = Tables("表A")
Dim rc As C1FlexGrid.CellRange = t.grid.Selection
Dim cellrect As System.Drawing.Rectangle = t.grid.RectangleToScreen(t.grid.GetCellRect(rc.r1,rc.c1))
SetCursorPos(cellrect.x, cellrect.y)

 


 回到顶部