易语言编辑框随文本变化宽度和高度

  这个功能可以仿聊天气泡框。

.版本 2

.子程序 _编辑框1_内容被改变

.如果 (编辑框1.宽度 ≤ 230)
    编辑框1.宽度 = 取文本长度 (编辑框1.内容) × 7 + 7
.否则

    编辑框1.高度 = 20 × (取整 (取文本长度 (编辑框1.内容) × 7 ÷ 220) + 1)


.如果结束

 

==============

.版本 2

.子程序 计算编辑框宽高
.参数 文本, 文本型
.参数 编辑框, 编辑框
.局部变量 宽, 整数型
.局部变量 高, 整数型

.如果 (取文本长度 (文本) × 7 + 7 < 290)
    高 = 20
    宽 = 取文本长度 (文本) × 7 + 7

.否则

    宽 = 290
    高 = 20 × (取整 (取文本长度 (文本) × 7 ÷ 290) + 1)
.如果结束

编辑框.高度 = 高
编辑框.宽度 = 宽

这段代码,可以直接根据文本,生成相应的编辑框高度。

这里限制最大宽为290

posted @ 2021-12-04 11:30  洪雨  阅读(925)  评论(0编辑  收藏  举报

友情链接

洪雨营销