社区
数据库相关
帖子详情
在 delphi 中如何调用 sql 的事务回滚?
LHRSoft
2004-06-16 11:52:43
delphi 中如何调用事务回滚? 请给 Demo
...全文
74
1
打赏
收藏
在 delphi 中如何调用 sql 的事务回滚?
delphi 中如何调用事务回滚? 请给 Demo
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
1 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
aiirii
2004-06-16
打赏
举报
回复
delphi 相應的几種訪問數據庫的控件, 都帶有操作事務方法!
kbmmw例子 V2.0 (unidac+ms
sql
)[2012-08-15]
winxp+
delphi
7+kbmmw4.0.3+unidac+ms
sql
2000+dbgrideh 基本实现xalion
中
所说的功能并加上自己的一些编写经验 1、远程方法
调用
2、取图像(流的使用) 3、查询数据 4、编辑数据:增、删、改(如果操作错误会进行相应的提示) 5、存储过程使用方法(存储过程参数自动创建) 6、动态创建数据集并执行Insert操作 7、命名查询(namedQuery) 8、事务操作(直接写
SQL
语句更新表的事务操作,有个重要的属性要设置,否则会更新不成功) 9、使用的数据库:
sql
server 2000,请到服务器的FDM单元把连接参数改下 10、数据库kbm_test结构参见:kbm_test.
sql
11、安装kbmMw时请把配置文件 kbmMWConfig.inc
中
{$DEFINE KBMMW_UNIDAC_SUPPORT} // UNIDAC support. 前面的//去掉 12、使用
delphi
7 2012年8月新增功能与说明 1、客户端断线重连:kbmMWTCPIPIndyClientTransport1.MaxRetries := 2;//重连一次 2、对象传输 3、JSON传输(利用kbmmw带的json库实现) 4、客户端断开代码: if FDM.kbmMWSimpleClient1.Transport.IsConnected then begin //memo1.Lines.Add('程序已有300秒没有进行操作,断开连接'); FDM.kbmMWSimpleClient1.Disconnect; end; 5、新增远程过程
调用
函数(直接
SQL
语句操作数据库): startTran:启动事务 commitTran:提交事务 rollbackTran:回滚事务 open
Sql
:打开
SQL
语句 exec
Sql
:执行
SQL
语句 注open
Sql
、exec
Sql
两个函数体代码使用对象连接池技术,无对象创建与释放,以提高系统效率, 具体能提高多少,未实测 6、增加HTTP协议例子(参考资料:kbmMW_and_AJAX.pdf),提供http-get的功能,http-post的功能可参照http-get方法实现 7、提供数据集转json与json转数据集 (CDSFromJSon(CDS:TClientDataSet;JsonStr:string):Boolean)单元:uDBJson.pas 参照代码可自行把json转kbmmwQuery kbmmw编译unidac方法: 修改单元kbmMWUNIDAC.pas,本人在数据库
中
很少用到blob字段,所以在代码里屏蔽掉blob字段的处理, 经测试数据库表字段类型为Text时,程序可以正常处理 报OLE DB error occured. CoInitialize has not been called (server)错误解决: unidac41src\Source\UniProviders\
SQL
Server\OLEDBAccessUni.pas constructor TOLEDBConnection.Create; begin inherited; CoInitialize(nil);//加此句 FCommand := nil; ... end; destructor TOLEDBConnection.Destroy; begin Disconnect; FCommand.Free; CoUninitialize;//加此句 inherited; end; 作者:chensm@vip.qq.com kbmmw开发交流群:209321818
delphi
事务处理
1、这是直接在
delphi
中
使用事务 procedure TForm1.Button1Click(Sender: TObject); begin ADOConnection1.BeginTrans; Try aq2.close; aq2.
sql
.clear; aq2.
sql
.add('update bank set currentMoney=curre
Delphi
XE10零基础实战快速入门
通过课堂上一个一个的实战例子,演示
Delphi
XE10的用法,最后通过一个完整的通讯录程序,让学员初步掌握软件开发的全部流程让零基础学员快速入门
Delphi
编程,快速掌握
Delphi
的使用方法,并能够制作出自己的软件来。为同学们下一步的提高打下坚实的基础。
在
Delphi
中
使用事务
1、直接在
delphi
中
使用事务 procedure TForm1.Button1Click(Sender: TObject); begin ADOConnection1.BeginTrans; Try aq2.close; aq2.
sql
.clear; aq2.
sql
.add('update bank set currentMoney=current
Delphi
中
FireDAC 数据库连接(管理事务)
默认情况下,FireDAC应用程序在自动提交模式下工作,当需要时,FireDAC会自动启动一个事务,并在命令执行成功时提交,或在失败时回滚。自动提交是由TFDTxOptions.AutoCommit属性控制的。自动提交模式对应用程序来说很简单,但它:减慢了对数据库的多次更新。不允许你在一个事务
中
执行更多的数据库操作。不能在一个时间内延长。另外,应用程序可以使用显式事务控制。为此,使用TFDConnection方法StartTransaction, Commit, Rollback。
数据库相关
2,497
社区成员
88,445
社区内容
发帖
与我相关
我的任务
数据库相关
Delphi 数据库相关
复制链接
扫一扫
分享
社区描述
Delphi 数据库相关
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章