T T18sc Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-24 #1 Pdox中如不建立别名,如何使用,用目录吗?如何用。 很多商业软件都看不出用别名的痕迹,它们是如何作的呢。
H htw Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-24 #4 Pdox是指paradox吧 在DataModule中增加一个TDataBase控件,然后单击右键设置其属性
杜 杜宝 Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-24 #5 对于Paradox来说,它的别名可以用目录名来代替, 1、增加一个DataBase,将它的AliasName设为空, DatabaseName = 'MyAliasName' DriverName = 'STANDARD' 2、点DataBase->Params的...按钮 输入“Path=e:/Delphi5/Borland Shared/Data”//改为你的目径就是了! 3、加入一个Table,将DataBaseName设为MyAliasName。好,看看它的TableName属性的 下拉框吧!相关的表都在里面了。 完成! 这个路径可以在DataBase的BeforeConnect事件中设置。这部分比较简单: 代码: procedure TForm1.Database1BeforeConnect(Sender: TObject); Const pathstr='Path= %s'; var s:string; begin s:=ExtractFilePath(application.ExeName) +'/Data';//假设数据库目录在程序安装目录的Data目录下 DataBase1.Params.Add(format(pathstr,[s])); //如果数据库有密码可能还得加上相关的东西,自己动手吧! end; 自己再改改就行了!
对于Paradox来说,它的别名可以用目录名来代替, 1、增加一个DataBase,将它的AliasName设为空, DatabaseName = 'MyAliasName' DriverName = 'STANDARD' 2、点DataBase->Params的...按钮 输入“Path=e:/Delphi5/Borland Shared/Data”//改为你的目径就是了! 3、加入一个Table,将DataBaseName设为MyAliasName。好,看看它的TableName属性的 下拉框吧!相关的表都在里面了。 完成! 这个路径可以在DataBase的BeforeConnect事件中设置。这部分比较简单: 代码: procedure TForm1.Database1BeforeConnect(Sender: TObject); Const pathstr='Path= %s'; var s:string; begin s:=ExtractFilePath(application.ExeName) +'/Data';//假设数据库目录在程序安装目录的Data目录下 DataBase1.Params.Add(format(pathstr,[s])); //如果数据库有密码可能还得加上相关的东西,自己动手吧! end; 自己再改改就行了!
Z zf501 Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-27 #6 杜宝说的很正确。 开发时用固定的目录。设置TDatabase 的Connected为True; 另外,别忘了加 Database1.parms.Clear;
T T18sc Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-29 #7 分配积分的名单上为何没有杜宝,真奇怪!杜宝的分只能给别人了。