使用FieldValues属性为增加的记录字段赋值

最新推荐文章于 2022-08-16 11:19:52 发布

niochen

最新推荐文章于 2022-08-16 11:19:52 发布

阅读量1.1k

点赞数

CC 4.0 BY-SA版权

分类专栏： Delphi

本文链接：https://blog.youkuaiyun.com/jfree5200/article/details/3912923

Delphi 专栏收录该内容

95 篇文章

订阅专栏

本文介绍了一个使用Delphi进行数据库操作的例子，演示了如何通过Append方法向数据库中添加新记录，并利用编辑框获取用户输入的数据，如姓名、年龄等信息。

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

    procedure TForm1.AppendBtnClick(Sender: TObject);
    begin
      SQLQuery1.close;
      SQLQuery1.open;
      SQLQuery1.Append;      //增加一个新记录
      SQLQuery1.FieldValues['Name'] :=name_edit.text;
      //利用编辑框为新增的记录赋值
      SQLQuery1.FieldValues['Age'] := StrToInt(age_edit.text);
      SQLQuery1.FieldValues[' native_place'] := JiGuan_edit.text);
      SQLQuery1.Post;  //调用Post方法提交，将增加的记录写库
    end;