易语言如何同时实现无边框时移动窗口及改变窗口大小

2024-05-03 04:23

1. 易语言如何同时实现无边框时移动窗口及改变窗口大小

你可以添加4个图片框作为窗口的标题栏和边框

窗口的四周边框和标题栏可以用图片框来捏造

如果你不想别人看见图片框的话可以把图片框的背景颜色弄得和窗口底色一样

移动窗口,你可以用:

_启动窗口.发送信息 (161, 2, 0) 

改变窗口大小,你可以用:

_启动窗口.发送信息 (274, 61441, 0)  ' 可以调整窗口左边的边框

_启动窗口.发送信息 (274, 61442, 0)  ' 可以调整窗口右边的边框

_启动窗口.发送信息 (274, 61443, 0)  ' 可以调整窗口上边的边框

_启动窗口.发送信息 (274, 61446, 0)  ' 可以调整窗口下边的边框

_启动窗口.发送信息 (274, 61444, 0)  ' 可以同时调整窗口上边和左边的边框

_启动窗口.发送信息 (274, 61445, 0)  ' 可以同时调整窗口上边和右边的边框

_启动窗口.发送信息 (274, 61447, 0)  ' 可以同时调整窗口下边和左边的边框

_启动窗口.发送信息 (274, 61448, 0)  ' 可以同时调整窗口下边和右边的边框

用法:

我举个例子,添加个图片框,名称改为“标题栏”,例如要移动窗口:

-------------------------------

.子程序 _标题栏_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

_启动窗口.发送信息 (161, 2, 0)

--------------------------------
如果要改变窗口大小,我想你也知道该怎么用上面的代码 

如果在改变窗口大小时,你可以用 

.版本 2

.子程序 __启动窗口_尺寸被改变

然后在该子程序里添加 尺寸改变后4个图片框的位置应该在哪的代码

易语言如何同时实现无边框时移动窗口及改变窗口大小

2. 易语言启动窗口 标题栏关闭键怎样编辑

完整复制下面代码,调试即可看到效果

.版本 2

.子程序 __启动窗口_可否被关闭, 逻辑型

.如果 (信息框 (“您真的要关闭本窗口吗?”, 1, ) = 0)
    返回 (真)
.否则
    返回 (假)
.如果结束

3. 易语言如何实现去除指定窗口的标题栏和边框并嵌入指定窗口

朋友可以详细说明一下吗?最好举个列子。看不明白你想问的是什么去除标题和边框,

在你想去掉边框的窗口创建完毕事件中写代码:

边框=0,
( 0. 无边框,1. 普通可调边框,2. 普通固定边框,3. 窄标题可调边框,4. 窄标题固定边框
,5. 镜框式可调边框,6. 镜框式固定边框)
或者在窗口的属性里直接把边框的属性设置为无边框。

易语言如何实现去除指定窗口的标题栏和边框并嵌入指定窗口

4. 易语言窗口无边框运行后怎么还有标题栏

你截图出来看看,不然不清楚

5. 易语言 _透明标签1_鼠标左键被按下 怎么写移动无边框的窗口 透明标签1是窗口标题

.版本 2
.子程序 _透明标签1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

 
_启动窗口.发送信息 (161, 2, 0)

易语言 _透明标签1_鼠标左键被按下 怎么写移动无边框的窗口 透明标签1是窗口标题

6. 易语言如何实现去除指定窗口的标题栏和边框并嵌入指定窗口

去除内部的标题栏,_启动窗口.边框 = 0
嵌入代码,  

置父窗口 ()

7. 易语言程序怎么把标题栏去掉?

鼠标点对窗口组件,之后在左边的属性栏选择窗口为无边框,默认的是普通固定边框。

易语言程序怎么把标题栏去掉?

8. 易语言可以设置窗口标题栏的高度吗,如果能的话怎么设置?

可以拦截 WM_NCCALCSIZE,修改 lParam 指向的 RECT 或 NCCALCSIZE_PARAMS,具体可以看一下 MSDN
http://msdn.microsoft.com/en-us/library/ms632634%28v=vs.85%29.aspx