易语言如果使用分隔条?

来源：百度知道 编辑：UC知道 时间：2024/06/15 00:46:35
各位,谁能教我下怎么用分隔条么?

效果,点窗口上的分隔条一下,窗口会收缩或者展开..

谢谢了
比如你点QQ聊天窗口上的"聊天记录"那样

.版本 2

.程序集 窗口程序集1
.程序集变量 已变宽, 逻辑型

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

.如果 (已变宽 ＝ 真)
_启动窗口.宽度 ＝ _启动窗口.宽度 － 100
已变宽 ＝ 假
.否则
_启动窗口.宽度 ＝ _启动窗口.宽度 ＋ 100
已变宽 ＝ 真
.如果结束

.子程序 __启动窗口_创建完毕

已变宽 ＝ 假