zoukankan      html  css  js  c++  java
  • Delphi中的ADOquery 用法以及ADOquery的自有方法Append 和Delete和 Edit 和Post

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

  • 相关阅读:
    poj1275收银员——差分约束
    poj3565Ants——KM算法
    bzoj2750Road——最短路计数
    poj1236学校网络——连通块
    poj2226Muddy Fields——二分图匹配
    Pots
    蜘蛛牌
    Find The Multiple (水题)
    Dungeon Master (三维bfs)
    棋盘问题 (简单搜索)
  • 原文地址:https://www.cnblogs.com/jijm123/p/10246733.html
Copyright © 2011-2022 走看看