～用delphi代码怎么实现TQuery与SQL Server数据库的连接

～～用delphi代码如何实现TQuery与SQL Server数据库的连接？
uses
        DB,       ADODB;  

procedure   TForm1.SpeedButton3Click(Sender:   TObject);
Var
    adoquery:   tadoquery;
begin
    adoquery:=tadoquery.Create(self);
    with   adoquery   do
    begin
        try
            ConnectionString   :=   'Provider=SQLOLEDB.1;Persist   Security   Info=False;User   ID=sa;Initial   Catalog=server_test;Data   Source=database_test ';
            //数据库服务器为server_test,数据库为database_test,登陆用户名为sa，密码为空
            SQL.Clear;
            SQL.Add( 'select   *   from   table_test   where   a   <>   0 ');
            Active:=true;
            showmessage(FieldByName( 'a ').AsString);
        finally
            Free;
        end;
    end;
end;

——ConnectionString   :=   ……这一行总是不对？？？


------解决方案--------------------
数据库那一行可以在控件里面去点,它会自动生成的~

根据你选择的再复制过来就行了

query可以在里面设置数据库名和表名吧
------解决方案--------------------
Params.Values[ 'USER NAME ']:=userid;
Params.Values[ 'PASSWORD ']:=password;

------解决方案--------------------
你没有测试连接是否成功。
或者你自己手动配置一下，看看原因在哪里？