[转]pb 调整控件的大小

最新推荐文章于 2018-02-05 13:56:25 发布

zkdgs

最新推荐文章于 2018-02-05 13:56:25 发布

阅读量2.9k

点赞数

文章标签： integer string powerbuilder 脚本 function application

本文链接：https://blog.csdn.net/zkdgs/article/details/6342785

版权

本文介绍如何使PowerBuilder应用的窗口大小根据屏幕分辨率自动调整，同时保持控件的相对位置和大小不变。通过定义全局变量并设置窗口及控件的坐标和尺寸比例，实现不同分辨率下的适配。

摘要由CSDN通过智能技术生成

[转]pb 调整控件的大小

PowerBuilder 在数据库系统开发中，以其独特的、强大的数据窗口功能，得到了广大程序员的喜爱，但用户在使用中，却时常发现系统中的窗口要么太大，部分内容在屏幕上显示不下，要么窗口过小，在屏幕中显得不够美观，造成这种情况的原因是程序员和用户所使用计算机的屏幕分辨率不一致。本文介绍了如何使PB中的窗口大小能根据屏幕分辨率自动调整，同时保持窗口中的控件的相对位置、大小不变。

1、定义全局变量oldheight、newheight、oldwidth、newwidth，分别保存程序员和用户屏幕分辨率的高度和宽度，在Application的Open脚本中加入下列语句：

Environment en //定义环境变量

GetEnvironment(en) //获取环境变量值

newheight = en.ScreenHeight //取当前屏幕分辨率的高度

newwidth = en.ScreenWidth //取当前屏幕分辨率的宽度

oldheight = 480 //假设程序员屏幕分辨率为640*480

oldwidth = 640

2、在窗口的Open事件中分别调整窗口、控件的X、Y、Height、Width，保证窗口进行自适应调整，假设窗口中有一个按钮控件cb_1，脚本如下所示：

//调整窗口的坐标和大小

This.y = This.y_*newheight / oldheight

This.x = This.x_*newwidth / oldwidth

This.width = This.width_*newwidth / oldwidth
<