Foxtable(狐表)用户栏目专家坐堂 → 常用按键事件问题


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

主题:常用按键事件问题

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


加好友 发短信
等级:五尾狐 帖子:1152 积分:7712 威望:0 精华:0 注册:2019/6/13 9:57:00
常用按键事件问题  发帖心情 Post By:2022/12/2 9:21:00 [只看该作者]

常用按键事件问题

1.关于删除的问题

If Tables("订单").Current IsNot Nothing Then
  
    Tables("订单").Current.Delete
    
End If

这个代码是实现删除。


问题一:如何实现,单击删除按键,弹出提示窗口,提问是否删除,如果是,则删除,否,则取消?

问题二:上面代码是一次只删除一条行,如何实现在明细表鼠标选中多行或直接清空当前窗口上的明细表的数据,只对当前窗口,不是能册后台数据?


2,增加多行
Syscmd.Row.AddNews(10),这个是增加多行,


问题三:窗口上有二张或多张表,只想让订单表实行增加多行,如何实现?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105932 积分:538729 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/12/2 9:37:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
lgz518
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1152 积分:7712 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2022/12/2 11:08:00 [只看该作者]

问题一:插入报错,提示此表不支持插入,是副表不能插入?
Tables("模拟关联_订单").InsertNew()

问题二:鼠标选中多条,只删除一条,如何实现选中多条删除?


'鼠标选中删除
With Tables("订单")
    If .TopPosition > -1 Then '如果选定区域包括数据行
        For i As Integer = .TopPosition To .BottomPosition
            .Rows(i).Delete
            
            ' Tables("订单").Current.Delete
            
'            If .Current IsNot Nothing Then
'                .Current.Delete
'            End If
            
            
        Next
    End If
End With

问题三:如何实现当前窗口明细表多条?
下面代码,执行,只删除一条,没有实现删除当前窗口明细多条记录
With Tables("订单")
    If .Current IsNot Nothing Then
        .Current.Delete
    End If
End With


 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105932 积分:538729 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/12/2 11:21:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
lgz518
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1152 积分:7712 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2022/12/2 11:50:00 [只看该作者]

1.是要用代码,不要狐表菜单功能,能实现?
2.测试下面代码还是单条删除,不能执行选中多条删除?
With Tables("订单")
    For i As Integer = .BottomPosition To .TopPosition Step - 1
        .Rows(i).Delete()
    Next
End With

3,或换窗口上表复选框选中,删除如何实现?

 回到顶部
帅哥哟,离线,有人找我吗?
lgz518
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1152 积分:7712 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2022/12/2 11:59:00 [只看该作者]

4.如何取消当前窗口上表的快捷菜单?

快捷菜单中的列操作命令

右击表中任何一个单元格,在弹出的快捷菜单中有一个“列相关”菜单,此菜单会列出大部分和列相关的命令:

图片点击可在新窗口打开查看


 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105932 积分:538729 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/12/2 12:12:00 [只看该作者]

1、必须在菜单里勾选添加插入行功能,或者到后台数据库里给表增加一个_sortkey列 .无法使用代码处理
2、说明只选中了一条数据。如果是操作副本表,参考:http://www.foxtable.com/webhelp/topics/1906.htm

 回到顶部
帅哥哟,离线,有人找我吗?
lgz518
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1152 积分:7712 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2022/12/2 12:52:00 [只看该作者]

e.Cancel = True 放在这个在单个表有效,放在全局表事件无效,想全部禁止,不使用快捷菜单,一张张设太费,如何实现全部禁用?

 回到顶部
帅哥,在线噢!
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105932 积分:538729 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/12/2 13:31:00 [只看该作者]

全局表事件要开启才有效:http://www.foxtable.com/webhelp/topics/0671.htm

如果所有表都不需要快捷菜单,可以导入系统菜单,然后把不需要的菜单删除掉http://www.foxtable.com/webhelp/topics/1079.htm

 回到顶部