Delphi启动数据库连接属性对话框

 

Delphi启动数据库连接属性对话框

 我们在写程序的时候，经常需要动态配置数据库，如果可以直接调用系统的数据库连接窗口是最方便不过了，看见了别人的程序是这样的，查了一下，发现可以用如下方法实现。

这里以ADO举例

关键部分就是一行代码

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

这个函数返回一个String类型的值,我们把它保存在字符串变量connectionStr中，这个变量的值也就是

ConnectionString的最后值，有了这个值大家就可以动态配置数据库了。

见下图

 

 

 

      (7-25加）  补充：如果使用指定的用户名称和密码来登录，不要忘记把 允许保存密码勾上。你可以把这个

连接字符串放到文件里面，或者存放到注册表里面，这样下次就可以直接连接了。

 

 

 

 

 

 

 

 

 

 

 

转载于:https://www.cnblogs.com/BlueMagic/archive/2005/07/09/189507.html