在PB中利用WIN9X的OCX控件美化程序界面.docVIP

在PB中利用Win9X的OCX控件美化程序界面（深圳：独孤求败?2003-05-27）????用过Power?Builder编程的人都会有这种感觉：PB在操作数据库数据方面提供了简捷、独特的方法，是同类开发工具所无法比拟的。但是在程序界面设计方面却美中不足。一个好的程序员总是想方设计美化自己的程序，不但要求自己的程序能解决用户的需求和提供简便的操作，而且希望用户在使用界面优秀的程序的过程中充分体现美的感受。这是笔者在多年开发中所追求的目标。在PB中充分利用OCX控件编程，往往会得到事半功倍的功效，最近在互联网上收集了很多利用OCX编程的技巧，但是在其他开发工具中能使用的控件在PB中能用的却非常的少，花费了大量的精力和上网机时收获却并不大，本人在查阅了有关书籍和网友的指点后，把有关PB程序界面美化的几点经验经过整理和各位网友分享： 一、利用Windows?9x中的OCX控件制作状态条的方法： ????在PB中新建一窗口，在窗口画板中插入OLE，在“Insert?Object”窗口中选择“Insert?Control”找到“Microsoft?Statusbar?Conrol,Version5.0(sp2)，这样就可在窗口中插入一个状态条控件，此控件包含在C:\Windows\System\COMCTL32.OCX文件中。在窗口和控件的Script?中只要控制控件的显示位置和设定控件上的显示窗格，以及各窗格中显示的内容。此控件预设了很多内容给用户选择，主要包括长短格式日期、系统时间、大小写锁定键状态、插入锁定键状态、小键盘数字锁定键状态和自定义文本等，例如要在程序中改变第一个窗格的显示内容方法如下：//open?for?w_3?returns?longoh=this.height?//oh,ow定义为全局变量ow=this.widthstatusbar_1.object.Panels.Item(1).Text?=?广东省韶钢财务结算中心 //resize?for?w_3?returns?longoh=newheightow=newwidthstatusbar_1.TriggerEvent(constructor!) 动态改变控件的显示位置：//constructor?for?statusbar_1?returns?longthis.x=0this.width?=?ow?–?2this.y=oh?-?this.height 二、利用Windows?9x中的OCX控件制作月历选择的方法： ????此控件为“Microsoft?Date?and?Time?Picker?Control?Version?6.0”,?包含在C:\Windows\System\MSCOMCT2.OCX文件中。 ????在Script?中主要设定控件当于显示值和被选择的日期，方法如下： 设定当天日期//constructor?for?ole_1?returns?longthis.object.value=today()获得被选日期//change?for?ole_1?returns?longsle_1.text=string?(date(this.object.value)) 三、?制作动态按钮或动态图片的思路： ????用过Office?97的人都知道它的菜单具有动态感应功能，只要鼠标光标指向某个快捷按钮时，此按钮即动态更换显示风格，在Pb6.5的菜单中也具有这种功能，现在很多优秀的程序都通过这种原理在程序的主窗口中放置一幅导航图，用户通过点击导航图即可直接进入各模块，界面友善而简捷，深受用户欢迎。但是Pb6.5中的按钮对象或图片对象却没有直接提供这种功能，要实现此功能用户必须通过自己编程实现或直接利用第三方提供的OCX动态按钮控件实现，但是笔者试过很多控件在PB6.5中都不能正常使用。于是在网上通过网友指点迷津，通过以下方法使图片或按钮具备了动态感应功能，制作出漂亮的程序导航图： 先用绘图工具将你的程序简捷流程图(导航图)画好并保存为一个BMP文件；将导航图中各个需要动态感应的部分剪切出来并保存为名个小的BMP文件； 在主窗口中放置完整的导航图，然后将各个小的BMP文件放置到完整导航图中相应位置上方，默认图片的Border风格为False,这样从表面上基本看不出原来完整导航图与叠加小图片后的分别； 为完整导航图和各个小图片增加用户自定义mousemove事件，在PB中对应事件号Pbm_mousemove，各个小图片的Script?如下：//mousemove?for?p_2?returns?longif?this.border?=?false?thenthis.border?=?truethis.borders