[转帖]PB设计窗口按比例缩放

[复制链接]

[转帖]PB设计窗口按比例缩放

[复制链接]

ehxz

主题	0 回帖	58万积分

管理员

积分: 588531
贡献
在线时间: 小时

2007-4-28 15:09:39 | 显示全部楼层 |阅读模式

免费乐捐，感谢支持

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？站点注册

×

1.实例变量：Int ii_width,ii_height

2.OPEN事件加入：

ii_width = This.Width
ii_height = This.Height

3.

在RESIZE事件中加入：
Int li_value
DragObject lw_obj
For li_value = 1 To UpperBound(This.Control[])
        lw_obj = control[li_value]
        lw_obj.x = lw_obj.x * (NewWidth / ii_width)
        lw_obj.width = lw_obj.width * (NewWidth / ii_width)
        lw_obj.y = lw_obj.y * (NewHeight / ii_height)
        lw_obj.height = lw_obj.height * (NewHeight / ii_height)
Next
ii_width = NewWidth
ii_height = NewHeight

可以了！！

原来不是很麻烦~~自己却一直没有搞定

共享共进共赢Sharing And Win-win Results

SYBASEBBS - 免责申明1、欢迎访问“SYBASEBBS.COM”，本文内容及相关资源来源于网络，版权归版权方所有！本站原创内容版权归本站所有，请勿转载！
2、本文内容仅代表作者观点，不代表本站立场，作者自负，本站资源仅供学习研究，请勿非法使用，否则后果自负！请下载后24小时内删除！
3、本文内容，包括但不限于源码、文字、图片等，仅供参考。本站不对其安全性，正确性等作出保证。但本站会尽量审核会员发表的内容。
4、如本帖侵犯到任何版权问题，请立即告知本站，本站将及时删除并致以最深的歉意！客服邮箱：admin@sybasebbs.com

返回列表发新帖

免责声明：
本站所发布的一切破解补丁、注册机和注册信息及软件的解密分析文章仅限用于学习和研究目的；不得将上述内容用于商业或者非法用途，否则，一切后果请用户自负。本站信息来自网络，版权争议与本站无关。您必须在下载后的24个小时之内，从您的电脑中彻底删除上述内容。如果您喜欢该程序，请支持正版软件，购买注册，得到更好的正版服务。如有侵权请邮件与我们联系处理。

Mail To:Admin@SybaseBbs.com

|Archiver|PowerBuilder(PB)BBS社区 ( 鲁ICP备2021027222号-1 )

GMT+8, 2024-11-22 01:31 , Processed in 0.042216 second(s), 9 queries , MemCached On.

Powered by Discuz! X3.5

账号		站点注册	自动登录	找回密码
密码			站点注册