如何用Button调出ADOQuery的ConectionString设置页

Question

如题。比如局域网添加了一台电脑，也装了个SQLserver。需要临时换到这台电脑的SQL。
不重新编译程序，直接用Button弹出ConectionString设置页，实现修改，可行吗？
（不知道新添加电脑的信息.只知道联入局域网了，有可访问的数据库和表格）实际上就是想用一个按钮调出ConectionString设置页

Answer 1

ButtonClick
调出ADOQuery的ConectionString设置页(双击时此属性时,就是设置数据库的连接啊)

Answer 2

connstring:= 'Provider=SQLOLEDB.1;Password='+pwd
      +';Persist Security Info=True;User ID='+user+';Data Source='+server
      +';Initial Catalog='+database+';';
    adocnn.ConnectionString:= connstring;自己动态赋值就可以了。

Answer 3

使用AdoConEd 单元，步骤如下：
在 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 4

编译通过了,
不过不明白一点
label11.caption := ADOConnection1.ConnectionString; 
这里什么用？

Answer 5

哦,仔细看了说明.just for fun

Answer 6

引用ADODB单元，使用其中的PromptDataSource函数就可以，该函数返回你设置的连接字符串。