请教一个ado连接的问题

Question

with adoquery1 do
begin
active:=false;
sql.clear;
sql.add('select * from table1');
active:=True;
end;另外设置其adoconstring属性。

Answer 1

我已经建了TADOConnection控件，并且与数据库建立了联系。
然后我又加了一个button控件
想要实现点击按钮，实现查询，所有代码如下，应该怎么添加语句啊，还有怎么样声明变量
：P 不好意思，手头没书，实在太菜了
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, Db, ADODB;type
  TForm1 = class(TForm)
    ADOConnection1: TADOConnection;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);
beginend;
end.