DELPHI中关于ADOQUERY使用方法

Delphi中关于ADOQuery的使用方法：查询、插入、删除、修改（转）
procedure TForm1.Button1Click(Sender:TObject);
begin
ADOQuery.Close;
ADOQuery.SQL.Clear;
ADOQuery.SQL.Add('select*from YourTABLE where查询条件'); ADOQuery.Open;
//插入记录
procedure TForm1.Button2Click(Sender:TObject);
begin
ADOQuery.Close;
ADOQuery.SQL.Clear;
ADOQuery.SQL.Text:='insert into YourTABLE(字段1，字段2)values(:字段1,:字段2)';
//ADOQuery.SQL.Add('insert into YourTABLE values(:字段1)'); ADOQuery.Parameters.ParamByName('字段1').Value:=trim(Edit1.Text); ADOQuery.Parameters.ParamByName('字段2').Value:=trim(Edit2.Text); ADOQuery.ExecSQL;
end;
//删除记录
procedure TForm1.Button3Click(Sender:TObject);
begin
ADOQuery.Close;
ADOQuery.SQL.Clear;
ADOQuery.SQL.Text:='Delete from YourTABLE where字段3=:字段3';
//这里没有添加where的条件判断，实际使用时，注意添加判断
//ADOQuery.SQL.Add('Delete from NEW_TABLE where字段3=:字段3'); ADOQuery.Parameters.ParamByName('字段3').Value:=trim(Edit3.Text); ADOQuery.ExecSQL;
//删除记录也可用DeleteRecords()函数
procedure DeleteRecords(AffectRecords:TAffectRecords=arAll);
这个函数有一个参数：AffectRecords可以取如下的值：
1、arCurrent：删除当前记录
2、arFiltered：删除符合Filter过滤后的所有记录（如果你使用Filter过滤的话）
3、arAll：删除所有记录
4、arAllChapters：Delete affects all chapters（ADO chapters）
//修改记录
procedure TForm1.Button4Click(Sender:TObject);
begin
ADOQuery.Close;
ADOQuery.SQL.Clear;
ADOQuery.SQL.Text:='Update YourTABLE SET字段4=:字段4';
//这里没有添加where的条件判断，实际使用时，注意添加判断
//ADOQuery.SQL.Add('Update YourTABLE SET字段4=:字段4'); ADOQuery.Parameters.ParamByName('字段4').Value:=trim(Edit4.Text); ADOQuery.ExecSQL;
//即时更新插入、删除、修改后的记录
在上面插入、删除、修改的语句后添加如下代码即可：
ADOQuery.Close;
ADOQuery.SQL.Add('select*from YourTABLE where查询条件'); ADOQuery.Open;
//使用ADOQuery时注意：
1、如果你需要更改数据，query.requestlive必须为true
2、如果有输入参数的时候，容易出错，通常的错法是这样：
比如：“WHERE abc=:abc”
改正如下：“WHERE abc=:abc”就是说=:前后都不能留空格。

3、ADOQuery.Open与ADOQuery.ExecSQL有不同之处。

ADOQuery.Open一般用在查询，select时候；而ADOQuery.ExecSQL用在insert，delete，update等。