超级编辑框修改指定文本背景色

浅黑 · 发表于 2024-10-3 02:09:26

本帖最后由浅黑于 2024-10-3 02:19 编辑

之前找了一圈，发现只有超级编辑框整行修改背景色的案例，于是参考该帖子的代码，实现了，超级编辑框指定文本修改背景色

子程序名	返回值类型	公开	备注
超级列表框_置指定行背景颜色
参数名	类型	参考	可空	数组	备注
超级编辑框	超级编辑框
类型	整数型

变量名	类型	静态	数组	备注
局_窗口句柄	整数型
颜色	字节集

局_窗口句柄＝超级编辑框.取窗口句柄 ()
' 超级编辑框.起始选择位置＝超级编辑框.寻找 (0, 假, , 编辑框.内容)
' 超级编辑框.被选择字符数＝文本_取长度 (编辑框.内容)
判断 (类型＝ 0)
颜色＝ { 84, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 } ＋到字节集 (7651188) ＋ { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 } ' 7651188是浅绿色
SendMessageA (局_窗口句柄, #EM_SETCHARFORMAT, #SCF_SELECTION, 取变量数据地址 (颜色)) ' 修改当前选择文本背景色(这个设置)
颜色＝ { 84, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 } ＋到字节集 (16776182) ＋ { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 } ' 16776182是浅蓝色
SendMessageA (局_窗口句柄, #EM_SETCHARFORMAT, #SCF_ALL, 取变量数据地址 (颜色)) ' 修改全部文本背景色(这个恢复)

i支持库列表	支持库注释
const	(未知支持库)
spec	特殊功能支持库

效果图如下

pshq123 · 发表于 3 天前

ptqy123 · 发表于 2024-11-24 21:28:16

感谢分享，很给力！

jxm1010 · 发表于 2024-11-12 14:30:01

我想要超级编辑框插入右边文本，该怎么写？

yankejun520 · 发表于 2024-11-3 02:39:26

逆水寒天 · 发表于 2024-11-2 11:09:24

瞅瞅

王筅笙 · 发表于 2024-11-1 09:32:22

感谢分享，很给力！~

唐仁聪 · 发表于 2024-11-1 06:28:16

lihai厉害看看是怎么写的代码

我是乐一 · 发表于 2024-10-31 09:59:09

好厉害支持

久久nb · 发表于 2024-10-31 08:43:49

不错不错

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

[易语言纯源码] 超级编辑框修改指定文本背景色

评分

本帖被以下淘专辑推荐: