图片附件: 游客没有浏览图片的权限,请 
登录 或 
注册 
					
				
			 
		
	
在插入按钮的下面。写了dw_1.ScrollToRow(dw_1.insertRow(0))
                      cb_insert.TriggerEvent(Clicked!)
在保存按妞下面写了: dw_1.accepttext()
               if dw_1.modifiedcount() + dw_1.deletedcount() > 0 then
               if dw_1.update()=1 then     //如果修改成功
               commit ; //提交事务
               messagebox('提示','数据保存成功!')
               else
               rollback ;  //回滚事务
               messagebox('提示','数据保存错误。', stopsign!)
                 end if
              else
              messagebox('提示','数据没有修改过,没有必要保存!',stopsign!)
             end if
在窗口的OPEN事件中写了:
dw_1.SetTransObject(SQLCA)  //设置事务对象 
dw_1.Retrieve()     //检索数据  
if Lower(gs_userid) <> 'tssa' then  //不是超级用户 
 cb_insert.Enabled = False  //不允许新建用户 
 cb_delete.Enabled = False   //不允许删除用户 
 cb_pri.Enabled = False   //不允许为用户分配权限 
 dw_1.SetFilter("userid='" + gs_userid + "'")  //只显示当前用户。 
 dw_1.Filter() 
end if 
在数据窗口的 rowfocuschanged下写了:
this.SelectRow(0,False) 
This.SelectRow(CurrentRow,True) 
在数据窗口的 losefocus事件下写了:
this.accepttext()
当然。删除。权限。关闭按妞的代码就没有写上来了。