如何调用数据链接属性对话框

Question

就是点击ADOConnection的ConnectionString属性后，执行“Build”弹出的对话框。我想在代码中直接调用，并获取链接字符串的值。

Answer 1

首先，在 uses 语句中包含进 AdoConEd 单元。然后在应用程序需要触发 ADO 连接串编辑器的地方写入如下简单代码。问题迎刃而解。
  
  ADOConnection1.Close; 
  // calling EditConnectionString displays the dialog, and 
  // sets the ConnectString property to the resulting value. 
  if EditConnectionString(ADOConnection1) then begin 
  //display the resulting ADO Connect String, just for fun. 
  label11.caption := ADOConnection1.ConnectionString; 
  end; 

Answer 2

ADOConnection1.ConnectionString :=PromptDataSource(Handle, ADOConnection1.ConnectionString);

Answer 3

uses 语句中包含进 AdoConEd 单元ADOConnection1.Close; 
if EditConnectionString(ADOConnection1) then
    label11.caption := ADOConnection1.ConnectionString; 

Answer 4

ADOConnection1.ConnectionString :='Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=its;Data Source=192.168.0.168';

Answer 5

首先，在 uses 语句中包含进 AdoConEd 单元。然后在应用程序需要触发 ADO 连接串编辑器的地方写入如下简单代码。问题迎刃而解。
  
  ADOConnection1.Close; 
  // calling EditConnectionString displays the dialog, and 
  // sets the ConnectString property to the resulting value. 
  if EditConnectionString(ADOConnection1) then begin 
  //display the resulting ADO Connect String, just for fun. 
  label11.caption := ADOConnection1.ConnectionString; 
  end; 
————————————————————————————————————
这样写的问题是，在弹出数据链接属性对话框前，会先弹出ADOConnection ConnectionString对话框，我是要直接弹出数据链接属性对话框。
我想直接调用API应该可以，但不知道用哪个API函数？

Answer 6

引用：阿牛ADOConnection1.ConnectionString :='Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=its;Data Source=192.168.0.168';
他的正确。在你要用到数据连接的窗体上写

Answer 7

connectionStr := PromptDataSource(Application.Handle,ADOConnection.ConnectionString);