在Delphi中建立和使用别名[3]

设置模式的主要目的是允许应用程序详细说明和限定别名在Session级别上的可见性例如把设置模式 设置成[cfmSession]可使Session只可见那些由其建立的别名所有其他的别名都无效

当别名在Session存在期间建立后BDE在内存中建立一个它的拷贝这个局部拷贝只对建立它的Session 有效除非在同一个应用程序中其他Session的模式设置成cmAll或cfmPersistent

使用Session的SaveConfigFile方法可以将内存中的别名写入BDE设置文件中这样其他BDE允许的应用程序就可以使用该别名

Session组件有五个方法允许应用程序跟蹤BDE别名的参数和驱动程序等信息

GetAliasNames列出Session已经处理过的别名

GetAliasParams列出指定的别名的参数

GetAliasDriverName返回包含别名使用的驱动程序名的字符串

GetDriverNames返回所有有效的BDE驱动程序

GetDriverParams返回指定的驱动程序的驱动参数

Session可以在其存在期间建立修改和删除别名方法AddAlias为SQL数据库服务器建立一个新的BDE据工作区方法AddStandardAlias为PARADOXDBASEASCII表建立一个新的BDE标准别名

AddAlias需要三个参数一个包含别名工作区名的字符串一个说明SQL连接驱动类型的字符串一个汇集连接参数的列表字符串其格式为

procedureAddAlias(constName Driver:string;List:TStrings);

AddStandardAlias需要三个参数别名名PARADOX和DBASE表存放的完整路径当试图打开一个没有扩展名表时的默认驱动类型其格式为

procedureAddStandardAlias(const NamePathDefaultDriver:string);

当为Session添加一个别名时它仅对该Session和其他设置模式值为cfmPersistent的Session有效为了使新建的别名对所有的应用程序有效在建立别名后应该调用SaveConfigFile方法

修改别名可以调用过程ModifyAlias它需要二个参数将要修改的别名名和包含修改后连接参数值的列表串格式为

procedureModifyAlias(Name: string;List:TStrings);

方法DeleteAlias可以使别名对Session 无效但它不会删除写入BDE设置文件的别名如果要将其从BDE设置文件中删除需要在调用DeleteAlias后再调用SaveConfigFileDeleteAlias只需一个参数别名名其格式为

procedureDeleteAlias(const Name:string);

[] [] []