大家好！我学DELPHI两周了，明天开始自己做一套管理系统，请您帮助解答弱智问题！！！！

Question

谢谢各位，小弟已经看4本书了，书中的例子没有几个ADO的，可参考的太少了，大家给粘点源码吧，太感谢了！

Answer 1

李维有本ADO/COM+/MTS的书,讲得很详细。

Answer 2

ADOQuery的用法和Query一样就是得先配置ConnectionString属性

Answer 3

拜托，先看看李维的《Delphi 5.x ADO/MTS/COM+高级程序设计篇》。

Answer 4

1、用几个Edit组件和一个Button按纽，实现用户输入数据添加到数据库里，另一个Button为取消更改。
帮帮小弟吧，这个系统功能很少的，只是报表部分难做。如何写提交输入Edit中的字段到数据库部分的代码？感谢啊，取消修改部分如何作呢？用U p d a t e B a t c h吗？
注：不想使用DBNavigator组件

Answer 5

取消修改用cancel方法。
看看DELPHI带的例子吧，自己慢慢体会才有用

Answer 6

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  ExtCtrls, DBCtrls, Grids, DBGrids, Db, ADODB, StdCtrls, Buttons;type
  TForm1 = class(TForm)
    BitBtn1: TBitBtn;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
    CN1: TADOConnection;
    db1: TADOTable;
    ds1: TDataSource;
    dg1: TDBGrid;
  end;var
  Form1: TForm1;implementation{$R *.DFM}procedure TForm1.FormCreate(Sender: TObject);
begin
    //创建连接对象
    cn1 := TADOConnection.create(nil);   //nil必须
    cn1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.3.51;'
      + 'Persist Security Info=False;User ID=Admin;Data  Source=D:\temp\resource\MapDecorate.mdb;'
      + 'Mode=Share Deny None;Extended Properties=";COUNTRY=0;CP=1252;LANGID=0x0409";Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Global Partial Bulk Ops=2';
    cn1.LoginPrompt := false;
    cn1.CursorLocation := clUseServer;
    cn1.Connected := true;    db1 := TADOTable.Create(nil);
    db1.Connection := cn1;
    db1.TableName := 'TblTFZS';
    db1.Active :=true;    ds1 := TDataSource.Create(nil);
    ds1.DataSet := db1;    dg1 := TDBGrid.Create(nil);
    dg1.DataSource := ds1;
    dg1.Parent := Self;                 //可视化控件必须。
    dg1.Visible := true;
    
    //提交输入Edit中的字段到数据库部分的代码
    
    ds1.Recordset.fields('aaa') := Edit1.Textend;end.

Answer 7

这是用原生ADO对象写的，李维先生的书中不提倡用这种方式吧，有没有通过ADO控件实现的？