第十章 药品销管理系统开发实例.ppt

2011年5月 （2）”继续”按钮cb_1的clicked事件中输入代码：close(parent) （3）”终止”按钮cb_2的clicked事件中输入代码：Halt close §10.10编译与脱离开发环境运行 （一）建立工程对象 建立工程对象examp存放在Examp.PBL库中，相关内容设置参考图10-10-1。主要选项或参数设置有： Executable File Name: d:\mypb9\examp.exe Project Build Options: Rebuild: Full Code Generation Options: 选中Machine Code复选框 执行Deploy命令之后，如果有编译错误的话，需要根据错误号、出错窗口、对象、事件及行号等信息进行修改，有时需要反复多次修改，直到Deploy时没有错误为止，对于本例，在d:\mypb9目录下生成的文件参考表10-10-1。编译之前，确定应用对象examp的Open事件中应输入的代码，可参考本节（四）。 2011年5月 2011年5月 图10-10-1 建立工程对象Examp 2011年5月 假定运行数据库应用系统需要的所有文件都存放在D:\Mypb9_Run目录下，那么，把表10-10-1中的5个文件拷贝到该目录下。 （二）运行时系统文件 请参考§9.4图9-4-3中所列文件，即PowerBuilder Runtime Packager的结果。 把图9-4-3中所列文件全部拷贝到D:\Mypb9_Run目录下。 （三）数据库文件及其驱动程序 数据库文件及其驱动程序，外部函数DLL文件等，参考表10-10-2。 把表10-10-2中所列文件全部拷贝到D:\Mypb9_Run目录下。 最后把D:\Mypb9目录下的子目录都拷贝到D:\Mypb9_Run目录下。到此为止，目录D:\Mypb9_Run中已经包含了数据库应用系统运行的需要的全部文件了，如果制作安装程序，那么直接对D:\Mypb9_Run目录操作即可。 2011年5月 （四）数据源注册 脱离开发环境运行时，必须建立相关的数据源，由应用系统开发人员来建立，当然不存在什么问题。如果由最终用户或者是其它非专业技术人员安装，一般需要相关支持文档，给出详细的安装步骤。如果采用系统函数自动注册ODBC数据源的方式，可参考本章§10.1（六）程序实现一小节中的“注意事项”。 2011年5月 2011年5月 以下介绍采用.Reg文件进行注册的方法，可参考表9-4-2后的“说明”。最终用户登录数据库应用系统时使用的用户标识如“工号”、“口令”并不是登录数据库管理系统的“用户名”和“密码”，而最终用户通过应用程序登录数据库管理系统一般不再要求输入“用户名”和“密码”，这就在需要在应用程序的连接数据库的源代码中使用登录数据库管理系统的“用户名”和“密码”。 （1）连接ASA数据库 在应用对象examp的Open事件中输入如下代码： get_pathname=GetCurrentDirectory( ) //使用GetCurrentDirectory()函数获取当前目录 // Profile Supermart SQLCA.DBMS = ODBC SQLCA.AutoCommit = False SQLCA.DBParm = ConnectString=DSN=supermart;UID=dba;PWD=sql 2011年5月 connect; //连接ASA数据库，默认事务处理对象为SQLCA open(w_oper_kl) //打开用户登录窗口 上述代码中包含了登录ASA数据库的用户名和口令，脱离开发环境运行时，出于安全考虑，建立的Supermart数据源中不能出现用户名和口令，Examp_ASA.Reg文件内容如下： Windows Registry Editor Version 5.00 注册数据源 [HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\Supermart] Driver=D:\\Mypb9_run\\dbodbc9.dll DatabaseFile=D:\\Mypb9_run\\Supermart.db AutoStop=No 注册应用系统有关文件搜索路径 2011年5月 [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Examp.exe] Default= D:\\Mypb9_run\\examp.exe; Path= D:\\Mypb9_run 注意：其中的盘符应与安装时的盘符一致 （2）连接MS SQLServer数据库 在应用对象examp