如何在程序中动态设置BDE别名？

Question

如果是parodox数据库,是可以实现的,用Tsession就可以。
用其它数据库就不知道了。不过你可以在程序了调用控制面板中的“ODBC data source”

Answer 1

使用TDatabase构件。在已答问题中已有回答，请查阅。

Answer 2

Tsession完全可以达到你想要的功能要求,不论什么数据库(支持的)都行.

Answer 3

用database就可以了，直接设: database1.databasename:=...或database1.aliasname:=...
记住要重新connect

Answer 4

procedure AddAlias(const Name, Driver: String; List: TStrings);