PowerBuilder中实现数据窗口列不可编辑的一种方法(2)
2015-01-27 01:08
导读：图1 通讯录窗体w_txl界面 具体实现代码如下： .窗体w_txl的open事件 dw_1.settransobject(sqlca) dw_1.retrieve() .窗口中“确定修改”按钮的clicked事件 if dw_1.update(dw_1,
图1 通讯录窗体w_txl界面
具体实现代码如下：
.窗体w_txl的open事件
dw_1.settransobject(sqlca)
dw_1.retrieve()
.窗口中“确定修改”按钮的clicked事件
if dw_1.update(dw_1,true,false)=1 then
dw_1.resetupdate()
commit using SQLCA;
else
rollback using SQLCA;
messagebox(“错误！！！”，“数据保存失败，请检查输入数据是否有错！”)
end if
.窗口中“新增”按钮的clicked事件
long rownumber
rownumber=dw_1.insertrow(0)
dw_1.setfocus()
dw_1.scrolltorow(rownumber)
dw_1.setcolumn(1)
.窗口中“退出”按钮的clicked事件
close(w_txl)
.窗体中数据窗口的clicked事件
string columntext //列标题
string columnname //列名
integer length //列标题长度
columntext=dwo.name //获得列标
length=len(columntext)
