连接数据库知识点

1. insert,

       begin

                 qry1.Close;
                 qry1.SQL.Clear;
                 qry1.SQL.Add('insert into admin(username,userpsw) values(:a,:b)');
                 qry1.Parameters.ParamByName('a').Value :=str1;
                 qry1.Parameters.ParamByName('b').Value:= str2;
                 qry1.ExecSQL;
          end

 

qry1.open 用于 select 有返回集的

qry1.execsql 用于 update，insert，delete 没有返回集的

 //

 qry1.SQL.Add('insert into admin(username,userpsw) values('+''''+str1+''''+','+''''+str2+''''+')');

 

 

2.select,

    qry1.Close;
    qry1.sql.Clear;
    qry1.SQL.Add('select username,userpsw from admin where username='+''''+str1+''''+
     'and userpsw='+''''+str2+'''' );
    qry1.Open;

 

 

3.delete,

        qry1.close;
        qry1.sql.clear;
        qry1.sql.add('delete * from admin where username='''+str1+'''');
        qry1.execsql;

 

 

4.update

 

        qry1.close;
        qry1.sql.clear;
        qry1.sql.add('update admin set userpsw = '''+str2+''''+'where username='''+str1+'''');
        qry1.execsql;

 

 

 

---

通过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);