在Delphi中建立和使用别名[1]资料及详情描述

　　以下文字资料是由(小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　通常我们在Delphi外 通过使用Borland 数据库引擎(BDE)的设置单元(bdecfg exe)来建立和设置别名(Alias) 但是 实际上用户可以在Delphi或应用程序中用TDatabaseComponent或其他方法建立和使用别名 而不必在IDAPI CFG中预先定义

　　建立有效的别名是非常重要的 别名详细说明了数据库的定位信息和连接数据库服务器的参数 当发布应 用程序时不必担心IDAPI CFG中是否有某项设置

　　利用TDatabaseComponent建立别名

　　建立和设置一 个使用标准数据库的别名的步骤如下 //通过 对象观察器 建立BDE别名

　　建立一个新工程(Project) 　　 将组件(Component)TDatabase TTable TDataSource TDBGrid 和TButton放在FORM上 　　 双击TDatabaseComponent或在TDatabase快速菜 单上选择DatabaseEditor运行Database属性编辑器 　　 将DatabaseName设置成 ZldchAlias 这个名字 将被当作别名 用来设置数据集组件TTable TQuery TStoredProc等的DatabaseName属性 　　 将DriverName设置成STANDARD 　　 单击Defaults按钮 将PATH=自动加在Parameter Overrides框中 　　 将PATH=设置成PATH=C: 单击OK按钮关闭Database Editor 　　 单击OK按钮关闭DatabaseEditor 　　 将TTable的DatabaseName属性设置成 ZldchAlias 　　 将TDataSource的DataSet属性设置成 Table 　　 将DBGrid的DataSource属性设置成 DataSource 　　 在Tbutton的OnClick事件过程中加入下列代码

　　procedureTForm Button Click(Sender:Tobject); beginTable Tablename=customer ; Table Active:=true; end;

　　运行程序　　上面 ～ 步也可以用以下过程实现

　　MyAddStandAlias(AliasN:String;DbLocat:String;DriverN:string );//使用程序的方法建立BDE别名//{AliasN别名名 //DbLocat数据库定位目录 DriverN联结驱动类型}beginwithForm Database do< beginDatabaseName:=AliasN;DriverName:=STANDARD ;Params Clear;Params Add( PATH=＋DbLocat);Params Add( DEFAULT DRIVER=＋DriverN);endend 　　procedureTForm Button Click(Sender:Tobject);beginMyAddStandAlias( ZldchAlias C:PARADOX );Table DatabaseName:=ZldchAlias ;DataSource DataSet:=Table ;DBGrid DataSource:=DataSource ;Table Tablename=customer ;Table Active:=true;end; 　　lishixinzhi/Article/program/Delphi/201311/24816