使用dbExpress连接方式访问数据库

最新推荐文章于 2023-04-06 09:48:08 发布

原创最新推荐文章于 2023-04-06 09:48:08 发布 · 601 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#数据库 #sql #insert #string

Delphi 专栏收录该内容

95 篇文章

订阅专栏

本文介绍了一种使用Delphi进行数据库操作的方法，通过构建SQL语句并利用参数化查询实现数据的高效插入。具体展示了如何创建参数、设置参数值以及执行带有参数的SQL插入语句。

    procedure TForm1.InsertBtnClick(Sender: TObject);
    //使用带参数的插入语句，每个记录由3个字段组成，分别是客户号，公司名称和国别
    var
      //说明用于保存SQL语句的串类型变量、SQL参数的Tparams类型变量
      SQLstmt: String;           
      CountryParams: TParams;
    begin
      CountryParams:= TParams.Create;
      //建立Tparams对象
      try
        SQLConnection1.Connected := True;
        //连接到本地的Paradox数据库
        CountryParams.CreateParam(ftString, 'CountryParam', ptInput);
        CountryParams.ParamByName('CountryParam').AsString := '中国';
        //使用参数名为变量CountryParam赋值
        SQLstmt := 'INSERT INTO "Kehu.db" '+'(CustNo, Company, country) ' +
          'VALUES (168, "蓝田设备工程公司", : CountryParam)';
        //生成插入记录的SQL语句，并为3个字段赋值
        SQLConnection1.Execute(SQLstmt, CountryParams);
        //执行TSQLConnection语句的Execute方法，完成数据的插入
      finally
        CountryParams.Free;
      end;
    end;