标签自己适应文字

精意源码 · 发表于 2022-8-12 10:34:43

代码

子程序名	返回值类型	公开	备注
文本_标签适合长度	整数型		取标签恰好可容纳下的文字长度，暂不直接支持字体更改，可通过微调或算法调整解决
参数名	类型	参考	可空	数组	备注
文本	文本型				文本
字体大小	整数型				可空；字体大小，不填为9，及创建标签的默认字体大小
算法	整数型				可空；更改算法，不填为1，及不修改
算法微调	整数型				可空；增加或减少最后的算法

如果真 (是否为空 (字体大小))

字体大小＝ 9

如果真 (是否为空 (算法))

算法＝字体大小－取整 (四舍五入 (字体大小 ÷ 3, ))
返回 (取文本长度 (文本) × 算法＋算法微调)

调用例程

标签1.宽度=文本_标签适合长度(标签1.内容，9，，)

精意源码 · 发表于 2024-10-7 11:28:22

chenyucheng 发表于 2022-8-14 20:30
自己看图去！

Windows宋体等宽，而Times New Roman不等宽

用算法微调

chenyucheng · 发表于 2022-8-14 20:30:20

精意源码发表于 2022-8-12 16:58
两个数字或者英文占用的空间等于一个中文，命令取文本长度中，是中文数*2+英文数+数字数，所以只有没有特 ...

自己看图去！

Windows宋体等宽，而Times New Roman不等宽
使用本机字体演示：

图片演示：

nihaojingyi · 发表于 2022-8-12 20:43:23

两个数字或者英文占用的空间等于一个中文，命令取文本长度中，是中文数*2+英文数+数字数，所以只有没有特殊字符，就可以实现

精意源码 · 发表于 2022-8-12 16:58:17

chenyucheng 发表于 2022-8-12 16:33
非等宽字体就没用了？

两个数字或者英文占用的空间等于一个中文，命令取文本长度中，是中文数*2+英文数+数字数，所以只有没有特殊字符，就可以实现

chenyucheng · 发表于 2022-8-12 16:33:57

非等宽字体就没用了？

外星人群控 · 发表于 2022-8-12 13:46:34

精意源码发表于 2022-8-12 11:21
应用的好是可以做到文本超出标签宽度自动隐藏的，比如：这是一个易语言例子，但是标签长度不够，只显示这 ...

哇，这个更实用啊，谢谢大佬

精意源码 · 发表于 2022-8-12 11:21:20

sangco 发表于 2022-8-12 11:01
Emm...我一般是预留足够的长度

应用的好是可以做到文本超出标签宽度自动隐藏的，比如：这是一个易语言例子，但是标签长度不够，只显示这是一个易，可以替换为是一个...，最近正在研究

sangco · 发表于 2022-8-12 11:01:05

Emm...我一般是预留足够的长度

		自动登录	找回密码
密码			注册

[分享] 标签自己适应文字