如何在运行时打开ADOConnection的ConnectionString向导？

Question

设计时只要点击Object Inspector中ConnectionString后面的...按钮就可以打开一个向导，请问在运行时怎么打开它？

Answer 1

use adodb
PromptDataSource(Handle,ConnString.Text);
PromptDataLinkFile(Handle, DataLink.Text);

Answer 2

uses adoconed;procedure TForm1.Edit1Click(Sender: TObject);
begin
  ADOConnection1.Close;
  if EditConnectionString(ADOConnection1) then
  begin
    Edit1.Text:=ADOConnection1.ConnectionString;
  end;
end;

Answer 3

EditConnectionString(ADO控件名)
需要uses ADOConEd单元；