delphi+sql数据库增加,删除,修改,查询操作


本文整理自网络,侵删。

 
需要注意的是,open一般用于查询(select),exesql用于修改,插入,删除(update,insert,delete)

增加


with dm.DataModule1.ADOQuery1 do
  begin
    close;
    sql.Clear;
    sql.Add('insert into 表 (字段1,字段2,字段3) values(:a,:b,:c)');//前面的字段就是需要增加的
    parameters.ParamByName('a').Value:=trim(edit1.Text);
    parameters.ParamByName('b').Value:=trim(edit2.Text);
    parameters.ParamByName('c').Value:=trim(edit3.Text);
    execsql;
  end;



删除


复制代码
with dm.DataModule1.ADOQuery1 do
    begin
      close;
      sql.Clear;
      sql.Add('delete from 表 where 字段=:a');
      parameters.ParamByName('a').Value:=trim(edit1.Text);
      execsql;
    end;



修改

with dm.DataModule1.ADOQuery1 do
     begin
       close;
       sql.Clear;
       sql.Add('update 表 set 字段1=:a where 字段2=:b');//where后面跟的是条件,set为后面跟需要修改的数据所在的字段
       parameters.ParamValues['b']:=trim(Edit4.Text);
       parameters.ParamValues['a']:=trim(Edit14.Text);
       execsql;
     end;



查询


with dm.DataModule1.adoquery1 do
  begin
   Close;
   SQL.Clear;
   sql.Add('select * from 表 where 字段名 = :a ');
   parameters.ParamByName('a').Value:=trim(edit1.Text);
   Open;
end;

https://www.cnblogs.com/windson/p/12650392.html

相关阅读 >>

Delphi利用文件流把文件拆分与合并

Delphi多线程程序示例(最简单的多线程)

了解Delphi过程类型/过程类型学习

Delphi idhttp下载带清理网络缓存

Delphi 的运算符列表

Delphi hash md5

Delphi 获取unigui 控件id 及获取html值

Delphi 如果判断一个网络文件是否存在?

Delphi 获取memo的行数与列数

Delphi 之 热键组件(thotkey)

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...