delphi 编程技巧

				Delphi中数据文件路径的管理 (2001年4月5日) 
				
				网友更新  分类:数据库   作者: winfit(推荐)  推荐:winfit   阅读次数:254  
				(http://www.codesky.net)  
				
				--------------------------------------------------------------------------------
				delphi中的Table控件（Component）和Query控件都有一个DatabaseName属性。可以用DatabaseName属性来指定该控件所引用的数据表的路径。有两种方法可以为属性DatabaseName设置路径：第一种方法是直接输入数据表所在路径，另一种方法是使用数据库别名（Alias）。在Delphi中，数据库别名是在数据库引擎（BDE）中建立的，一个别名对应一个文件路径。可以这样为别名下定义：别名是对文件路径的映射，是文件路径的简称。因此，在属性DatabaseName中使用数据库别名和使用文件路径实质都是一样的，它们都作为查找数据表的根（Root）路径。但是，在数据库应用程序的设计中，如果涉及到的Table控件和Query控件比较多的话，那么使用别名来引用文件路径就十分高效、方便，并且不容易出差错。原因是显而易见的：一方面，别名可以在列表中直接选取而不必像文件路径那样从键盘上输入；另一方面，别名可以设置得很简短，即使从键盘录入也比较快捷。因此，笔者建议要多使用数据库别名而少使用文件路径。
				
				　　另外，在Table控件的属性TableName和Query控件的SQL语句中，都可以包含数据表的路径信息。因为Query控件和Table控件的情况十分相似，所以下面只对Table控件进行说明。这种路径信息既可以是一个完整的路径，也可以是一个完整路径的后面部分。比如对Table控件的属性TableName赋值时，可以把C:\Delphi\Demos\Data\CustomerDB赋给它，也可以把Data\CustomerDB赋给它。
				
				　　在实际应用中，我们可以把Table控件的属性DatabaseName和属性TableName结合起来使用。把属性DatabaseName中的路径作为根路径，把属性TableName中的不完整路径（如果有的话）作为子路径。把这两个路径结合起来就是访问到数据表的一个完整的路径。比如，假设在路径C:\Delphi\Demos\Data下存在数据表CustomerDB，把Table控件的属性DatabaseName指定为C:\Delphi\Demos\Data，然后把属性TableName指定为CustomerDB，就可以访问数据表CustomerDB了。如果属性DatabaseName指定为C:\Delphi\Demos，要想访问数据表CustomerDB，只要把属性TableName指定为data\CustomerDB就行了。有时候这二者并不同时起作用。例如，如果属性TableName中包括了完整的路径，那么属性DatabaseName中的路径就不起任何作用了。又如，如果属性DatabaseName中没有指定任何路径，而属性TableName中的路径又是不完整的，如Data\CustomerDB，那么应用程序运行时的当前路径就作为根路径。为了便于程序移植，笔者有两点建议：
				　　1、通常，只需要在属性DatabaseName中指定数据表的路径，而在属性TableName中不必包括路径信息。
				　　2、一般情况下，不要在属性TableName中指定完整的路径。
				
				　　下面就来介绍一下如何提高数据库应用程序的移植性。
				　　数据库应用程序的移植是一个重要的问题。因为在数据库应用程序中要访问数据库或数据表，就要涉及到数据文件的路径。一般来说，数据库应用程序开发完成后要移植到其它机器上使用，因此数据库应用程序运行时的数据文件的路径很可能和开发时的不同。所以必须对数据文件的路径进行有效的管理，以便于系统的移植。下面介绍三种管理数据文件路径的方法。
				　　1、把数据文件建立在应用程序所在目录的子目录下。具体过程为：
				　　（1）为了设计起来方便，在设计时可以使用数据库别名，且该数据库别名指向应用程序所在路径。把子路径名加上数据表名字之后赋给Table控件的属性TableName。
				　　（2）在发行应用程序前，把所有的Table控件或Query控件的属性Active都置为False，删除属性DatabaseName中的所有字符（即置空）。
				　　在缺省情况下，应用程序运行时的当前目录是应用程序所在的目录。如果在应用程序中没有调用ChDir等过程改变当前目录的话，那么就不必执行第三步，否则进行第三步的处理。
				　　（3）在使用到Table控件和/或Query控件的窗体的创建（OnCreate）事件中，把应用程序所在路径赋给该窗体中的每一个Table控件和Query控件。具体的形式如下所示：
				　　Table对象（或Query对象）