PB增删改

最新推荐文章于 2023-12-16 10:26:53 发布

weixin_30383279

最新推荐文章于 2023-12-16 10:26:53 发布

阅读量184

点赞数

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/lvk618/p/3458647.html

本文详细介绍了如何在数据窗口中设置更新列、UNIQUEKEY和表，通过SQL语句建立数据窗口，实现数据的插入、修改和删除操作。重点讨论了在窗口中通过设置TabOrder、事务、获取数据、修改数据、保存和删除记录的方法。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

新建一个数据窗口----选择需要更新的表，或者直接写sql也可以
如下图已经建立好的数据窗口，根据要求将需要更新的列、unigue key 还有需要更新的表设置好，
【将需要更新列的taborder设置大于0 这样维护的时候可以编辑（等于0是不能编辑的），
在窗口打开增加

dw_1.setTransobject(sqlca)//设置事物
dw_1.retrieve()//获取数据
增加代码（数据窗口为dw_1）
int li_row
li_row = dw_1.insertrow(0)
dw_1.SetFocus()
dw_1.ScrollToRow(li_row)
dw_1.selectrow(0,false)
dw_1.selectrow(li_row,true)
dw_1.SetColumn(1)

保存按钮

dw_1.accepttext()//这个是必须的 接受所有更改
if dw_1.ModifiedCount() < 1 then return//也可以加上删除的条数DeletedCount()
if dw_1.update() = -1 then
rollback;
messagebox('提示信息','保存有误！')
else
commit;
messagebox('提示信息','保存成功！')
end if

删除按钮

integer net, ll_row

// 提示信息："要删除此记录吗?"
NET=messagebox(f_getmessage("xt000005"),f_getmessage("ctl00004"),Exclamation!,YESNO!)
IF net=1 THEN
ll_row=dw_1.getselectedrow(0)//获取选中记录 可以用getrow() 取得选中行，如果有taborder=0的可能导致取数错误
dw_1.DeleteRow (ll_row)
IF dw_1.update()= -1 THEN
   ROLLBACK;
IF dw_1.RowsMove(1, 1, delete!, dw_1, ll_row, primary!) = 1 THEN
// Set focus to the row that was "restored"
dw_1.SetFocus()
dw_1.ScrollToRow(ll_row)
END IF
ELSE
COMMIT;
END IF
ELSE
    dw_1.SetFocus()
END IF