请问要在自己的程序里调用像TADOConnection的数据连接属性向导对话框要怎么做呢？

Question

应该可以在自己的程序里用这个对话框吧？
但是要怎么办呢？
请各位不吝赐教！！

Answer 1

看看ADO.pas，里面有个adodb.PromptDataSource函数

Answer 2

procedure TfrmLogin.bbtnLoginClick(Sender: TObject);
begin
  dmSupplyChain.adocConnection.connected:=false;  dmSupplyChain.adocConnection.ConnectionString:='';    begin
     dmSupplyChain.adocConnection.ConnectionString:='Provider=SQLOLEDB.1;Password='+trim(edtPassword.text)+';Persist Security Info=True;User ID='+trim(edtUser.Text)+';Initial Catalog='+trim(edtDatabase.Text)+';Data Source='+trim(edtServer.Text);
    end ;
  dmSupplyChain.adocConnection.loginprompt:=false;
    try
      with dmSupplyChain.adocConnection do
        begin
          connected:=true;
          FrmLogin.close;
         
        end;
    except
      begin
      showmessage('无法登录，请与管理员联系');
      
      end;
    end;
end;我的登录界面上有 用户名，密码，服务器，数据库四个 EDIT用于输入登录信息.

Answer 3

adodb.PromptDataSource看不太明白：（别笑我，我还是个菜鸟级的^_^
不过我的目的是想在程序里调用数据连接属性向导对话框，
嗯，这么说吧——我希望通过一个按钮的onClick事件，出现这个对话框，让我的程序用户可以选择数据源，请再教教我

Answer 4

程序如下：ADOConnection1.ConnectionString:= adodb.PromptDataSource(0,'a');