Question

VFP中添加按钮代码问题

thisform.oldrecord=recno()
append blank
thisform.command4.enabled=.f.
................
thisform.txt产品名称.readonly=.f.
thisform.refresh
在表新增属性中设置oldrecord=.F.
为什么这样的代码不会在表中添加一条空白记录而运行的结果跟修改差不多了
先开始好像有用 但是突然出现上面的错误了
还有我先开始添加一条空白记录 但是取消后空白记录会存入表中？
取消的代码
local YN
YN=messagebox("确认取消",4+32,"订单管理系统")
if YN=6
thisform.command1.enabled=.t.
.....
thisform.txt备注.readonly=.t.
thisform.refresh
endif
但是表单界面上显示的是有内容的记录
还有取消代码是不是有问题 添加空白代码马上取消但是还会有空白记录存入表中
谢谢你的回答

Answer 1

不会的。
点击添加按钮后退出程序，看一下表，一定是添加了空记录。
如果你先“确认”，后“取消”，肯定会空记录，因为取消代码没有发现删除的语句。