标题:请教,_screen的resize代码写哪里。
只看楼主
hdx60
Rank: 2
等 级:论坛游民
威 望:1
帖 子:72
专家分:30
注 册:2013-2-8
结帖率:50%
已结贴  问题点数:20 回复次数:4 
请教,_screen的resize代码写哪里。
软件就普通用的系统_screen ,我想在界面窗口变化时,执行如:侧边菜单窗口随之变化。扩展一下,界面背景大小等。

我想应该是在主程序中 写 _screen.addobject() 类似的语句,但不知怎样定义。还有可能需要 proc 写方法代码。

但写不来,特请教。

[此贴子已经被作者于2023-2-8 15:29编辑过]

搜索更多相关主题的帖子: 主程序 界面 代码 窗口 变化 
2023-02-08 15:27
西狐888
Rank: 2
等 级:论坛游民
帖 子:4
专家分:49
注 册:2012-10-21
得分:20 
**主程序
oHandler=NEWOBJECT("MyHook")
BINDEVENT(_SCREEN,"Resize",oHandler,"Resize")  &&绑定主窗口的Resize事件到oHandler对象的Resize事件
........
主程序结束

DEFINE CLASS MyHook AS Custom
PROCEDURE Resize   &&随窗口大小调整Label1(Internet链接)的位置和背景图片大小
  **在这里写screen resize 的代码

ENDPROC
ENDDEFINE
2023-02-08 18:53
sam_jiang
Rank: 8Rank: 8
等 级:贵宾
威 望:10
帖 子:542
专家分:781
注 册:2021-10-13
得分:0 
好像设置一下所有控件的anchor属性就可以了!
2023-02-08 19:33
hdx60
Rank: 2
等 级:论坛游民
威 望:1
帖 子:72
专家分:30
注 册:2013-2-8
得分:0 
谢谢,二楼回答应该可以,我试试。
3楼回答应该是背景图
2023-02-08 20:51
hdx60
Rank: 2
等 级:论坛游民
威 望:1
帖 子:72
专家分:30
注 册:2013-2-8
得分:0 
以下是引用西狐888在2023-2-8 18:53:15的发言:

**主程序
oHandler=NEWOBJECT("MyHook")
BINDEVENT(_SCREEN,"Resize",oHandler,"Resize")  &&绑定主窗口的Resize事件到oHandler对象的Resize事件
........
主程序结束

DEFINE CLASS MyHook AS Custom
PROCEDURE Resize   &&随窗口大小调整Label1(Internet链接)的位置和背景图片大小
  **在这里写screen resize 的代码

ENDPROC
ENDDEFINE

谢谢!完美解决。侧边菜单 form 的高度随主窗口高度改变。
DEFINE CLASS MyHook AS Custom
PROCEDURE Resize   &&随窗口大小调整Label1(Internet链接)的位置和背景图片大小
  **在这里写screen resize 的代码
    form_menu.Height = _screen.Height
ENDPROC
ENDDEFINE
************
但是  囫囵吞枣。没有真的理解,但看来其他“事件”如click 等应该也如此吧
2023-02-09 07:46



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-511232-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.057778 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved