调用EXECSQL方法在数据集中插入一个新记录

最新推荐文章于 2025-06-27 16:45:53 发布

原创最新推荐文章于 2025-06-27 16:45:53 发布 · 731 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#insert #sql #数据库

Delphi 专栏收录该内容

95 篇文章

订阅专栏

本文介绍了一种使用Delphi进行数据库操作的方法，具体为通过AppendRecordQuery查询组件向RenYuan表插入一条新记录的过程。该过程包括清空原有的SQL语句、构建新的SQL语句并设置参数值，最后执行SQL语句完成数据插入。

procedure TForm1.FormCreate(Sender: TObject)；
begin
AppendRecordQuery.Close；
AppendRecordQuery.SQL.Clear；
//清楚查询组件的SQL语句
AppendRecordQuery.SQL.Add('INSERT INTO RenYuan (姓名,籍贯,年龄)')；
// AppendRecordQuery为查询组件名，RenYuan为表名
AppendRecordQuery.SQL.Add('VALUES (:XM, :JiGuan, :NianLing)')；
//该SQL语句有三个参数，分别是XM,JiGuan和NianLing
AppendRecordQuery.Params[0].AsString := '李明'；
// AppendRecordQuery.Params[0]指向第一个参数XM
AppendRecordQuery.Params[1].AsString := '上海'；
AppendRecordQuery.Params[2].AsInteger := 28；
AppendRecordQuery.ExecSQL；
//调用查询的ExecSQL方法，完成向数据库表RenYuan中增加记录
End；