PB编程技巧实例.docVIP

PB编程技巧实例 顶?热?荐 PB编程技巧实例 ［ 作者：佚名????转贴自：本站原创????点击数：13009????文章录入：lqk101 ］ 随着数据库技术在各行各业的广泛应用，作为企业级数据库前端开发工具的Power Builder日益成为开发人员的得力助手。PowerBuilder以其开放的体系结构，友好的用户界面和简洁高效的开发环境赢得了众多程序员的喜爱，连续多年被评为美国计算机界的年度风云产品，在数据库开发工具领域占据了高达44％的市场份额。PowerBuilder进入我国的时间不长，许多编程人员希望了解并掌握这一先进工具。在这里，笔者将自己平日用PowerBuilder作开发的一些体会整理出来，奉献给大家。 PowerBuilder是由多个功能模块组成的可视化集成开发环境，是面向对象的开发工具，用它可以方便地建立起基于Windows的分布式数据库应用。其功能模块分别完成应用管理、窗口对象设计、菜单对象设计、数据窗对象设计和数据库查询等工作，这些功能模块由于PowerBuilder提供的色彩丰富的工具条而被称作Painter（画板）。下文便依据各模块作大的分类介绍相应的编程技巧。? 一、有关应用的编程技巧仅让应用程序运行一次的技巧: ?有时需要限制一个PowerBuilder应用同时运行的实例（Instance）个数或仅让应用运行一次，我们可以通过调用WindowsSDK函数或使用PowerBuilder的Handle()函数来实现。?? 先谈调用SDK函数的方法。为了调用SDK函数，需要在ApplicationPainter的菜单项Declare\GlobalExternalFunctions中定义：?? FunctionuintGetModuleHandle(stringModuleName)LibraryKernel.exe FunctionuintGetModuleUsage(uintModuleHandle)LibraryKernel.exe? 下面这段程序写在Application的Open事件中。它先通过调用SDK函数GetModuleHandle()获得指定应用程序的句柄，然后调用GetModuleUsage()函数确定应用程序同时运行的实例个数。uint IApplHandle?int App_num?IApplHandle=GetModuleHandle(ocmis.exe)?if IApplHandle0 then?? App_num=GetModuleUsage(IApplHandle)?? if App_num1 then?????? Messagebox(注意,本程序已经运行!,Stopsign!)????? return?? endifendifOpen(w_main)? 若需要限制应用同时运行的实例个数，比如仅允许同时运行N个实例，那么将上述程序中的语句 “if App_num1 then”改为“if App_numN then”即可。? 采用Handle()函数的方法更简洁一些，代码如下：?int hand?hand=Handle(this,TRUE)?If hand0 then?? Messagebox(注意,本程序已经运行!,Stopsign!)?? Halt?else?Open(w_main)?endif ?二、有关窗口的编程技巧? 1、提供实时帮助条 中文之星2.0版的链形菜单管理器提供了实时帮助条，增强了系统的易用性，在PowerBuilder中也可以实现类似的功能。当鼠标移动到窗口中的某些控制(Control)，如编辑器、图片等时，会在鼠标附近自动产生帮助条，实时地提示操作要领。 首先在窗口w_main中任意位置定义一个黄底黑字的静态文本st_help，设定st_help.visible=false，st_help.text=Help；然后在该窗口模块的Declare\WindowFunctions...下定义函数show_help()，其参数只有一个，参数名为text，类型为string，通过传值方式接收参数；无返值。show_help()代码如下：?if st_help.visible then??? returnendif?st_help.text=text??st_help.width=Len(st_help.text)*38??st_help.x=w_main.PointerX()?st_help.y=w_main.PointerY()+50?if st_help.x+st_help.widthw_main.Workspacewidth() then??? st_help.