知识大全在Delphi中建立和使用别名[1]

Posted 2022-07-21 属性

篇首语：谁和我一样用功，谁就会和我一样胜利。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全在Delphi中建立和使用别名[1]相关的知识，希望对你有一定的参考价值。

在Delphi中建立和使用别名[1] 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　通常我们在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;

cha138/Article/program/Delphi/201311/24816

知识大全 在Delphi中建立和使用别名[1]

知识大全在Delphi中建立和使用别名[1]