begin
sqlString := 删除的SQL语句;
thing := Tthing.Create(self. DBOperate,true); //TDBOperate_DL类型的DBOperate是作为参数传进去的,true代表需要事务。
Try
Thing.Drop(person);
Self.DBOperate.Execute(sqlString);
self.DBOperate.SetComplete; //投票提交
except
self. DBOperate.SetAbort; //投票回滚
raise;
end;
finally
thing.free; //记着一定要释放
记着保持程序中使用唯一的操作数据库类TDBOperate_DL的实例,记着释放业务类实例,如果是需要事务的,尽量早释放,OK,搞定。
第一个版本,水平有限,还需要在实际应用中完善,全当抛砖引玉,请有经验的大侠们拍砖吧:)
上一页 [1] [2] [3]
Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved. 闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)
鄂公网安备 42011102001154号
站长:MinTao ICP备案号:鄂ICP备11006601号-18