| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 471 人关注过本帖
标题:请教,_screen的resize代码写哪里。
只看楼主 加入收藏
hdx60
Rank: 2
等 级:论坛游民
威 望:1
帖 子:80
专家分:37
注 册:2013-2-8
结帖率:54.55%
收藏
已结贴  问题点数: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: 9Rank: 9Rank: 9
等 级:贵宾
威 望:14
帖 子:746
专家分:1114
注 册:2021-10-13
收藏
得分:0 
好像设置一下所有控件的anchor属性就可以了!
2023-02-08 19:33
hdx60
Rank: 2
等 级:论坛游民
威 望:1
帖 子:80
专家分:37
注 册:2013-2-8
收藏
得分:0 
谢谢,二楼回答应该可以,我试试。
3楼回答应该是背景图
2023-02-08 20:51
hdx60
Rank: 2
等 级:论坛游民
威 望:1
帖 子:80
专家分:37
注 册: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
快速回复:请教,_screen的resize代码写哪里。
数据加载中...
 
   



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

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