mysql + unidac 使用事务例子
2015-09-05 13:48
676 查看
//备注:mysql必须是使用innoDB引擎才支持事务功能,否则以下事务相关代码将失效。//SQL SERVER和Oracle还没试,明天回公司试了再发代码。procedure TForm1.btn1Click(Sender: TObject); var i, j: Integer; begin UniConnection1.Connect; try try UniTransaction1.Connections[0].StartTransaction; UniQuery1.Params.Clear; UniQuery1.SQL.Text := 'insert into user (username,password)values(:username, :password)'; UniQuery1.Params.ParamByName('username').Value := 'eboy'; UniQuery1.Params.ParamByName('password').Value := '1111'; UniQuery1.ExecSQL; //如果不使用事务,这条将插入进去 UniQuery1.Params.Clear; UniQuery1.SQL.Text := 'insert into user (username,password)values(:username, :password)'; UniQuery1.Params.ParamByName('username').Value := 'frr'; UniQuery1.Params.ParamByName('password').Value := '123'; UniQuery1.ExecSQL; //如果不使用事务,这条将插入进去 UniQuery1.Params.Clear; UniQuery1.SQL.Text := 'insert into user (username,password)values(:username, :password)'; UniQuery1.Params.ParamByName('username').Value := 'lj'; UniQuery1.Params.ParamByName('password').Value := '880414'; UniQuery1.ExecSQL; //如果不使用事务,这条将插入进去 UniQuery1.Params.Clear; UniQuery1.SQL.Text := 'insert into user (username,password)values(:username, :password)'; UniQuery1.Params.ParamByName('username').Value := 'lj'; UniQuery1.Params.ParamByName('password').IsNull; //字段设为not null,所以这里会出错 UniQuery1.ExecSQL; //开启事务后,上面的三条都将回滚 UniTransaction1.Connections[0].Commit; except on e: Exception do begin UniTransaction1.Connections[0].Rollback; ShowMessage(e.Message); end; end; finally UniConnection1.Disconnect; end; end;
mysql + unidac 使用事务例子
相关文章推荐
- MySQL 如何修改字符集 utf8 改为 utf8mb4
- Mysql之DDL语句_create_alter
- sql server 与 mysql在自定以数据类型的区别
- 快速安装mysql tcl expect
- MySQL常用操作
- 修改MySQL的默认密码的四种小方法
- 对pymysql的简单封装
- MySQL 5.7 并行复制实现原理与调优
- Navicat访问MySQL出现1044/1045错误的解决方法
- MySQL索引原理及慢查询优化
- MySQL数据库之布尔类型、枚举类型和集合类型的应用场景详解
- mysql允许远程访问 root
- 2003 Can't connect to MySQL server on 'localhost' (10061)
- Mysql字符转义
- MySQL5.6安装步骤(windows7/8_64位)
- mysql的算术运算符和比较运算符
- MySQL学习笔记(二)--存储类型
- mac MySQL5.6中文乱码
- MySQL常用命令
- mac 安装 MySQL 5.6