zoukankan      html  css  js  c++  java
  • 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
  • 相关阅读:
    Revit命令之平面区域
    Revit平面视图控制
    电动手摇两用风机Revit族模型
    中田麻吉
    传递项目标准工具
    Sketchup机电专业BIM插件EngeeringToolBox
    机电专业协同模式
    lumion2.5下载及破解安装详细过程
    人防工程空调设计规范
    BIM软件之BIMsight
  • 原文地址:https://www.cnblogs.com/chenbg2001/p/1543023.html
Copyright © 2011-2022 走看看