Foxtable(狐表)用户栏目专家坐堂 → 如何能一键多用?


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

主题:如何能一键多用?

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


加好友 发短信
等级:童狐 帖子:253 积分:2573 威望:0 精华:0 注册:2016/8/8 9:50:00
如何能一键多用?  发帖心情 Post By:2017/7/10 9:17:00 [只看该作者]

老师,您好!

一个窗体中有多个表,如何能做到焦点在哪个表,按新增键就会在获得焦点的表增加一条新纪录?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:一键多用.table


图片点击可在新窗口打开查看此主题相关图片如下:baidushurufa_2017-7-10_9-7-26.png
图片点击可在新窗口打开查看

谢谢老师!


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/10 9:29:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:一键多用.table


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


加好友 发短信
等级:二尾狐 帖子:574 积分:4252 威望:0 精华:0 注册:2015/5/13 8:32:00
  发帖心情 Post By:2017/7/10 9:53:00 [只看该作者]

行相关

命令 说明
Syscmd.Row.AddNew() 增加一行
Syscmd.Row.AddNews() 增加多行
Syscmd.Row.Clone() 克隆行
Syscmd.Row.Insert() 插入行
Syscmd.Row.Delete() 删除行
Syscmd.Row.Lock() 锁定行
Syscmd.Row.UnLock() 取消锁定行
Syscmd.Row.MoveUp() 上移行
Syscmd.Row.MoveDown() 下移行

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


加好友 发短信
等级:童狐 帖子:253 积分:2573 威望:0 精华:0 注册:2016/8/8 9:50:00
  发帖心情 Post By:2017/7/10 10:59:00 [只看该作者]

老师,您好!


图片点击可在新窗口打开查看此主题相关图片如下:baidushurufa_2017-7-10_10-50-39.png
图片点击可在新窗口打开查看
当新增一条记录后,焦点落在新增按钮上,就不知道哪个是活动表了,不知道新增按钮会在哪个表里增加记录,
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:一键多用1.table

这个问题怎么解决呢?
[此贴子已经被作者于2017/7/10 10:59:59编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/10 11:11:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:一键多用1.table


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


加好友 发短信
等级:童狐 帖子:253 积分:2573 威望:0 精华:0 注册:2016/8/8 9:50:00
  发帖心情 Post By:2017/7/11 16:24:00 [只看该作者]

老师,您好!

还是上面一键多用的问题,同样的代码,我在商业版试用没有问题,但在开发版却不行,不知是什么问题?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:一键多用kf.foxdb


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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/11 16:48:00 [只看该作者]


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


加好友 发短信
等级:童狐 帖子:253 积分:2573 威望:0 精华:0 注册:2016/8/8 9:50:00
  发帖心情 Post By:2017/7/11 20:32:00 [只看该作者]

老师,您好!

我在窗口中增加了一个删除按钮,click代码:

If vars("currcontrol") IsNot Nothing Then
    vars("currcontrol").Table.Delete
    vars("currcontrol").Select
End If

执行后弹出:未找到类型“Table”的公共成员“Delete”。

这是怎么回事?

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


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

If vars("currcontrol") IsNot Nothing Then
    If vars("currcontrol").Table.current IsNot Nothing
        vars("currcontrol").Table.current .Delete
    End If
    vars("currcontrol").Select
End If

 回到顶部