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
  • 相关阅读:
    TCP协议实现双工通信
    搭建本地FTP服务器
    CSS 3 选择器root、not、empty、target
    CSS 3 中的伪类选择器
    CSS 3 中的属性选择器
    Entity Framework Code First属性映射约定
    Entity Framework数据库初始化四种策略
    HTML 5 Base 64 编码
    HTML 5 离线程序
    HTML5 本地数据库IndexedDB数据库
  • 原文地址:https://www.cnblogs.com/chenbg2001/p/1543023.html
Copyright © 2011-2022 走看看