Delphi 中ADOQuery的用法

都知道Delphi在数据库操作是非常好用的,delphi把ADO一些方法属性都集成了,以下是我的一些总结:
***************************************
通过sql来实现:
添加 
With ADOQuery1 do 
begin 
Close; 
SQL.Clear; 
SQL.Add(' Insert Into Table1(Field1,Field2)') 
SQL.Add(' Values(10,20)'); 
ExecSQL; 
end; 

修改 
With ADOQuery1 do 
begin 
Close; 
SQL.Clear; 
SQL.Add(' Update Table1 Set Field1=20,Field2=30)') 
ExecSQL; 
end; 

删除 
With ADOQuery1 do 
begin 
Close; 
SQL.Clear; 
SQL.Add(' Delete From Table1') 
SQL.Add(' Where Field1=20 and Field2=30'); 
ExecSQL; 
end; 

查询 
With ADOQuery1 do 
begin 
Close; 
SQL.Clear; 
SQL.Add(' Select Field1,Field2 From Table1') 
SQL.Add(' Where Field1=20 and Field2=30'); 
Open; 
end;
***************************************************
通过Delphi自有的方法属性实现:

添加: 
with ADOQuery1 do 
append; 
...... 
post; 
删除: 
with ADOQuery1 do 
delete(选择删除的记录); //默认删除记录指针指向的记录
修改: 
with ADOQuery1 do 
edit; 
......
post; 


adotable1.Append; //添加 
ADotable1.Fields.FieldByName('gxid1').Value:=gx; 
adotable1.Post; 

adotable1.delete; //删除 

adotable1.edit; //修改 
ADotable1.Fields.FieldByName('gxid1').Value:=gx; 
adotable1.post;

WITHI adoquery do 
begin//添加 
adoquery.open;//motice set adoquery.sql 
adoquery.append;//OR adoquery.insert; 
fieldbyname(fieldname).asstring:=trim(edit1.text); 
......
adoquery.post; 
end;

删除: 
adoquery.delete

修改: 
adoquery.edit; 
fieldbyname(fieldname).asstring:=trim(edit1.text); 
有关细节可以参看帮助OR DEMO 


 

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值