Delphi 中操作MS SQL Server 返回刚插入的自增ID列值

海纳老吴

于 2023-06-25 10:49:03 发布

阅读量860

点赞数 1

分类专栏： Delphi 线程文章标签：数据库获取自增字段ID 返回自增字段ID 自增字段 MS SQL Server

本文链接：https://blog.csdn.net/sensor_WU/article/details/131372552

版权

Delphi 线程专栏收录该内容

27 篇文章

订阅专栏

在开发数据库应用时，通常需要记录用户操作日志，如打开和关闭程序的时间。文章介绍了在Delphi中，如何通过FDConnection组件执行SQL命令，一次性插入日志并获取新生成的日志ID（自增ID）。关键在于使用`ExecSQLScalar`执行包含INSERT和SELECTscope_identity()的语句，确保在多账户操作下仍能正确获取ID。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

在开发数据库的应用的时候，经常需要写入日志，比如某个日志需要记录用户打开程序的时间和用户关闭程序的时间，显然这是两个动作，因为用户打开程序可能需要使用一段时间才会关闭。那么当用户打开程序时，我们首先就需要插入一条日志记录，记录下当前用户打开的时间，同时需要返回当前日志的ID值（自增），以方便用户关闭程序时使用该ID更新日志记录的关闭时间字段。

在Delphi中可以使用如下简单方法直接获取到当前对话的ID值：

       var
         ID : integer;   
       
       FDConnection := TFDConnection.Create(nil);
       try
         FDConnection.ConnectionDefName := Get_DBConnectionStr;  //数据库连接参数串
         ID := FDConnection.ExecSQLScalar('INSERT INTO 表名 (name,age) VALUES(:A1,:A2); SELECT scope_identity()',['sensor',42]);
         
       finally
         FDConnection.Free;
       end;

说明：

1. SELECT scope_identity() 语句是重点；

2. FDConnection 会把整个 ExecSQLScalar 中的语句整体作为一个事务（会话），所以即便是多账户操作插入，返回的ID也是正确的。

3. ExecSQLScalar中是可以输入写多条SQL语句的。