阅读该篇文章之前，可先阅读下述资料

[Dialog屏幕开发] 屏幕绘制(Table Control控件)https://blog.csdn.net/Hudas/article/details/145314623?spm=1001.2014.3001.5501https://blog.csdn.net/Hudas/article/details/145314623?spm=1001.2014.3001.5501上篇文章我们的屏幕已实现了如下功能

我们已经设置了Table Control控件，接下来我们需要新增一些按钮对Table Control 列的数据进行操作

---

① 【编辑】按钮新增

GUI状态(9001_STATUS)添加图标

保存并激活该GUI状态 

在INCLUDE文件ZDIALOG_GZ437_F01中添加如下代码

frm_set_edit子例程代码如下所示

poitem-cols是一个内表 

保存并激活主程序， 生成的页面如下所示

我们可以看到屏幕界面已经生成了编辑按钮

输入采购凭证，点击"显示订单信息"按钮，自动带出采购订单明细信息，列表中的字段值都是不可输入的

点击编辑按钮，"数量"字段和"库存地点"字段都变为可编辑状态

再次点击 编辑按钮，恢复原来的不可编辑状态

② 【插入】按钮新增

GUI状态(9001_STATUS)添加图标

保存并激活该GUI状态 

在INCLUDE文件ZDIALOG_GZ437_F01中添加如下代码

frm_add_line子例程代码如下所示

上述子例程的主要功能是插入空行，插入行的位置取决于当前光标的位置

如果光标不在表格控件区域内或者光标所在行号大于表格的总行数，那么新行将插入到第一行，否则新行将插入到光标所在行的位置

插入新行后，会更新poitem-lines变量来记录表格的新行数

保存并激活主程序， 生成的页面如下所示

我们可以看到屏幕界面已经生成了插入按钮

输入采购凭证，点击"显示订单信息"按钮，自动带出采购订单明细信息

直接点击插入按钮，会在表格的第一行添加空行

选择行项目为20的数据行，再点击 插入按钮，会在当前选择的数据行位置添加空行

③ 【删除】按钮新增

GUI状态(9001_STATUS)添加图标

保存并激活该GUI状态 

在INCLUDE文件ZDIALOG_GZ437_F01中添加如下代码

frm_del_line子例程代码如下所示

保存并激活主程序， 生成的页面如下所示

我们可以看到屏幕界面已经生成了删除按钮

输入采购凭证，点击"显示订单信息"按钮，自动带出采购订单明细信息

选择需要删除的数据行，这里我们删除行项目值为10的数据行，点击删除按钮

④ 【全选】按钮新建

GUI状态(9001_STATUS)添加图标

保存并激活该GUI状态 

在INCLUDE文件ZDIALOG_GZ437_F01中添加如下代码

frm_mark_all子例程代码如下所示

保存并激活主程序， 生成的页面如下所示

我们可以看到屏幕界面已经生成了全选按钮

输入采购凭证，点击"显示订单信息"按钮，自动带出采购订单明细信息

点击全选按钮，采购订单明细中的数据行都会被选中

⑤【取消全选】按钮新建

GUI状态(9001_STATUS)添加图标

保存并激活该GUI状态 

在INCLUDE文件ZDIALOG_GZ437_F01中添加如下代码

frm_demark_all子例程代码如下所示

保存并激活主程序， 生成的页面如下所示

我们可以看到屏幕界面已经生成了取消全选按钮

输入采购凭证，点击"显示订单信息"按钮，自动带出采购订单明细信息，全选所有数据行信息

点击取消全选按钮，采购订单明细中的所有选中的数据行都会被取消

⑥ 【升序】按钮新增

GUI状态(9001_STATUS)添加图标

保存并激活该GUI状态 

在INCLUDE文件ZDIALOG_GZ437_F01中添加如下代码

frm_sort_up子例程代码如下所示

保存并激活主程序， 生成的页面如下所示

我们可以看到屏幕界面已经生成了升序按钮

输入采购凭证，点击"显示订单信息"按钮，自动带出采购订单明细信息，选中"数量"列中的数据

点击升序按钮，完成排序操作

⑦ 【降序】按钮新增

GUI状态(9001_STATUS)添加图标

保存并激活该GUI状态 

在INCLUDE文件ZDIALOG_GZ437_F01中添加如下代码

frm_sort_down子例程代码如下所示

保存并激活主程序， 生成的页面如下所示

我们可以看到屏幕界面已经生成了降序按钮

输入采购凭证，点击"显示订单信息"按钮，自动带出采购订单明细信息，选中"数量"列中的数据

点击降序按钮，完成排序操作