编辑框

wh1234567

憨憨问号 发表于 2026-1-13 00:00
你看看这个帖子里面窗口大小和文本大小的比例是怎么算的，套用到编辑框上就行了
窗口大小可以鼠标拉动， ...

如何根据编辑框字体高度计算编辑框需要新设置的高度？

补充内容 (2026-1-13 00:03):
也就是根据编辑框字体高度计算编辑框自适应的高度

补充内容 (2026-1-13 00:11):
也就是缩放编辑框时，使编辑框高度和宽度以及字体自动缩放大小

BruceJoysky1987

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
大小	整数型

子程序名	返回值类型	公开	备 注
_编辑框1_内容被改变

子_行高 ()
编辑框1.高度 ＝ 编辑框1.高度 ＋ 大小 × 0.2

子程序名	返回值类型	公开	备 注
子_行高	整数型

变量名	类 型	静态	数组	备 注
局_分割	文本型		0

如果真 (取文本长度 (编辑框1.内容) ＞ 80)
清除数组 (局_分割)
局_分割 ＝ 分割文本 (编辑框1.内容, #换行符, )
大小 ＝ 子_字体大小 ()
返回 (取数组成员数 (局_分割))

子程序名	返回值类型	公开	备 注
子_字体大小	整数型

变量名	类 型	静态	数组	备 注
局_字体大小	整数型

局_字体大小 ＝ 编辑框1.字体.字体大小
返回 (局_字体大小)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 大小, 整数型<br /> <br /> .子程序 _编辑框1_内容被改变<br /> <br /> 子_行高 ()<br /> 编辑框1.高度 ＝ 编辑框1.高度 ＋ 大小 × 0.2<br /> <br /> .子程序 子_行高, 整数型<br /> .局部变量 局_分割, 文本型, , "0"<br /> <br /> .如果真 (取文本长度 (编辑框1.内容) ＞ 80)<br />     清除数组 (局_分割)<br />     局_分割 ＝ 分割文本 (编辑框1.内容, #换行符, )<br />     大小 ＝ 子_字体大小 ()<br /> .如果真结束<br /> 返回 (取数组成员数 (局_分割))<br /> <br /> .子程序 子_字体大小, 整数型<br /> .局部变量 局_字体大小, 整数型<br /> <br /> 局_字体大小 ＝ 编辑框1.字体.字体大小<br /> 返回 (局_字体大小)

这样的效果？


补充内容 (2026-1-13 00:18):
这个只是一个简单的思路

wh1234567

BruceJoysky1987 发表于 2026-1-13 00:17
[e=1].版本 2

.程序集 窗口程序集_启动窗口

没有效果，新帖https://bbs.ijingyi.com/forum.ph ... 14871002&extra=

BruceJoysky1987

wh1234567 发表于 2026-1-13 00:23
没有效果，新帖https://bbs.ijingyi.com/forum.php?mod=viewthread&tid=14871002&extra=

放在尺寸被改变事件下不就好了，不过你需要重新计算回弹效果

luwei202

挣点钱把