分发PARADOX数据库程序怎样打包?(100分)

  • 主题发起人 主题发起人 8087
  • 开始时间 开始时间
8

8087

Unregistered / Unconfirmed
GUEST, unregistred user!
我用Delphi4.0写了个通信录程序,分发出去时要带BDE,我不知怎么打包?
 
紧急求援!!!
 
用Install Shield,你的D4光盘没有这东东吗?具体用法嘛……说起来复杂用起来
简单,保证你一用就会了。
 
如果用BDE接口IS就可以打包了
如果用ODBC接口,就要复制odbc的pdx驱动
 
对呀!你应该使用install shields.
在install shields中选择bde打包
然后作成一个安装程序即可。
 
用installsheild,送个说明给你。
 

检索“ 我 ”回答过的问题。有你要的。
 
victortim:
请把说明发到我的信箱好吗?E-mail是8087boy@sina.com,非常感谢!
 
我用IS打包啦,但到别的电脑上安装后,还是提示找不到数据库文件和别名设置不正确,我想把程序打包成到别的电脑上安装能马上用,不用设置,能行吗?请各位大虾帮忙,谢谢!
 
我用IS打包,安装后出现。。。VCL40。。错误的信息,WAY?有谁知道的
告诉我,非常感谢!
 
我从不用IS打包,那样做出来的安装盘太大了!
如果数据库为Paradox,那就好办了
1、其实呢,我们只需要几个文件就可以了。
把下列文件放到程序的同一目录:(这些文件都在BDE的目录底下)
bantam.dll,farest.btl,idapi32.dll,idbat32.dll,iddbas32.dll(DBF数据库
用)idpdx32.dll,idr20009.dll,idsql32.dll(用到Query的话需要这个文件)
2、在程序的主Form的OnCreat事件中加入以下代码:
procedure TForm1.FormCreate(Sender: TObject);
var
ph : TStringList;
begin
ph := TStringList.Create;
Session.GetAliasNames(ph);
if (ph.IndexOf('nldbf') = -1) then //判断别名nldbf是否存在
begin
Session.AddStandardAlias('nldbf', ExtractFilePath
(Application.ExeName), 'Paradox'); //Paradox-->数据库类型
Session.SaveConfigFile; //也可是别的如Foxpro等
end;
ph.Free;
......
end;
以上代码在程序中自动创建BDE设置,这样发布程序时你再也不用管BDE该如何设置
了,非常方便!

3、用Aspack2000把编译生成的exe文件压缩一下(压缩率为小于原文件的45%),非常
棒的一个压缩可执行文件的工具!Aspack2000在http://go.163.com/~windstorm2000/tools/aspack2000.zip
同时附上解密文件http://go.163.com/~windstorm2000/tools/ca2000.zip
4、这样,我们就可以用其它安装工具(如CreatInstall)做出小巧玲珑的安装盘了,
CreatInstall安装盘制作工具(中文版)
http://go.163.com/~windstorm2000/tools/pcrinst336.zip
5、有空的话不妨到windstorm2000.yeah.net去走一走!
祝您成功!:)

注意:以上方法如果在没装Delphi的机子上随便安装都没问题!如果有装Delphi的
话,当系统卸载后要记着到BDE中把相应的数据库别名删除,不然,下回装时一定要和
原先的装在同一目录上,否则将出错(BDE路径错误)!


 
提示找不到数据库文件和别名设置不正确?
问题出在BDE设置上,用IS打包时:
A.在第二项中:
1.选中BDE.
2.选择全部或部分安装.
3.在BDE ALIAS STEP1对话框按NEW加入你的程序的ALAIS
4.在BDE ALIAS STEP3设置数据文件要安装的PATH(如 <INSTALLDIR>/DATA), TYPE(PARADOX)
B.在第三项中:
1.按NEWGROUP...
2.在弹出的对话框中设置GROUP NAME(如DATA),DESTINATION采用默认的<INSTALLDIR>
3.按OK
4.选中已设置的DATA文件夹加入你的程序数据文件.
试试吧!我是一边用IS做一边写的.
如不行,请来信.
 
接受答案了.
 
我亦想做一个同学录,请教如何用DELPHI做,然后打包给同学!
 
IS啥意思?
 
后退
顶部