以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎么样才能让窗口表和数据表有一样的快捷输入功能  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=47257)

--  作者:xvkewen
--  发布时间:2014/3/6 23:33:00
--  怎么样才能让窗口表和数据表有一样的快捷输入功能
如题,我新建窗口表为什么不能用系统数据表的CTRL+D的功能实现快捷输入呢?
--  作者:y2287958
--  发布时间:2014/3/7 6:15:00
--  
KeyDown:

If e.Control = True AndAlso e.KeyCode = keys.D
    Dim t As Table = Tables("表C")
    For i As Integer = t.TopRow To t.BottomRow
        t.Rows(i)(t.ColSel) = t.Current(t.ColSel)
    Next
End If

--  作者:xvkewen
--  发布时间:2014/3/7 20:34:00
--  
我的窗口表是绑定表,一个是绑定的主表,一个是绑定的关联表,这两个在窗口中没有独立的事件可以设置,但是在主表KeyDown事件中加了上面的那段代码,但还是不行呀?
--  作者:有点甜
--  发布时间:2014/3/7 21:25:00
--  

图片点击可在新窗口打开查看 我测试可以,你没有改代码吧?

 


If e.Control = True AndAlso e.KeyCode = keys.D
    Dim t As Table = e.Table
    For i As Integer = t.TopRow To t.BottomRow
        t.Rows(i)(t.ColSel) = t.Current(t.ColSel)
    Next
End If

--  作者:xvkewen
--  发布时间:2014/3/7 21:44:00
--  
放在哪?全局事件里可以吗?
--  作者:有点甜
--  发布时间:2014/3/7 22:18:00
--  
以下是引用xvkewen在2014-3-7 21:44:00的发言:
放在哪?全局事件里可以吗?

 

可以放在全局表事件里,或者是直接放在表事件里。

 

如果放在库表事件,记得给表开启这个事件 http://www.foxtable.com/help/topics/0671.htm

 


--  作者:xvkewen
--  发布时间:2014/3/9 20:07:00
--  

还是不行呀,能帮忙做了例子吗?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:快捷输入.table.table

--  作者:有点酸
--  发布时间:2014/3/9 22:50:00
--  

代码逻辑有问题。

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目57.table


--  作者:xvkewen
--  发布时间:2014/3/9 23:43:00
--  
有点酸老师,能帮忙解释一下吗?
--  作者:有点酸
--  发布时间:2014/3/9 23:47:00
--  
是从上一行复制数据到选定行,不是从选定行复制,选定行复制到选定行,就是什么也没有复制。