易语言设置锚点控件自适应窗口大小

易语言 2020-08-03 13:25:03

易语言设置锚点控件自适应窗口大小

水平均分子控件 (画板1.取窗口句柄 (), 0)
设置控件锚点 (选择夹1.取窗口句柄 (), 真, 真, 真, 真)
设置控件锚点 (画板1.取窗口句柄 (), 真, 真, 真, 真)

.子程序 水平均分子控件, , 公开, 将该控件的第一层子控件水平均分
.参数 父窗口句柄, 整数型, , 要水平其子控件的父窗口句柄
.参数 子控件高度, 整数型, , 要固定高度,则设定一个值;要动态自适应,则设为0
.参数 控件间距, 整数型, 可空
.局部变量 某父窗口, 父窗口
.局部变量 父窗口过程, 整数型

.如果真 (是否为空 (控件间距))
控件间距 = 5
.如果真结束
.如果真 (取父窗口索引 (父窗口句柄) = -1)
父窗口过程 = GetWindowLongA (父窗口句柄, #GWL_WNDPROC)
某父窗口.窗口句柄 = 父窗口句柄
某父窗口.旧窗口过程 = 父窗口过程
某父窗口.控制模式_水平均分 = 真
某父窗口.间距 = 控件间距
某父窗口.子控件高度 = 子控件高度
SetWindowLongA (父窗口句柄, #GWL_WNDPROC, &新窗口过程)
加入成员 (全父窗口, 某父窗口)