求gdi画图文

shian

想求一个gdi画图文的操作比如:
假设以下内容为图片:
欢迎xxx进入群聊
[此人头像]
xxxxxx

如果出现[pic=图片地址],那就写入图片在这一行

花间一壶酒

文本颜色 和 黑边的问题  看这下面的代码备注

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_窗口1

子程序名	返回值类型	公开	备 注
_窗口1_创建完毕

图片框1.图片 ＝ #图片1

子程序名	返回值类型	公开	备 注
_按钮_合成_被单击

变量名	类 型	静态	数组	备 注
图片宽度	整数型
图片高度	整数型
内存画板	内存画板
分层画板	分层画板
区域	矩形区_S
分层画板句柄	整数型
结果图片	字节集

图片宽度 ＝ 图片_取宽度 ( #图片1 )
图片高度 ＝ 图片_取高度 ( #图片1 )
内存画板.创建 (图片宽度, 图片高度 ＋ 30, 16777215, )
内存画板.画图片_数据 ( #图片1, 0, 15, 图片宽度, 图片高度, 0)
分层画板.创建 (图片宽度, 15)
分层画板.文本渲染模式 ( #文本渲染模式_抗锯齿 )  ' 不写这个文字会有黑边
区域.左边 ＝ 10
区域.顶边 ＝ 2
区域.宽度 ＝ 图片宽度
区域.高度 ＝ 15
分层画板.文本颜色 (RGB到ARGB ( #红色, 200))
分层画板.字体属性 (“黑体”, 15, 真, 假, , , )
分层画板.写文本_矩形内 (“欢迎xxx进入群聊”, 区域)
分层画板句柄 ＝ 分层画板.取句柄 ()
内存画板.合并分层画板 (分层画板句柄, 0, 0, 图片宽度, 15)
分层画板.销毁 ()
分层画板.创建 (图片宽度, 15)
区域.左边 ＝ 10
区域.顶边 ＝ 0
区域.宽度 ＝ 图片宽度
区域.高度 ＝ 15
分层画板.字体属性 (“Ink free”, 15, 真, , , , )
分层画板.文本颜色 (RGB到ARGB ( #蓝色, 200))
分层画板.写文本_矩形内 (“qq9999999999”, 区域)
分层画板句柄 ＝ 分层画板.取句柄 ()
内存画板.合并分层画板 (分层画板句柄, 0, 图片高度 ＋ 15, 图片宽度, 15)
分层画板.销毁 ()
内存画板.复制到窗口 (图片框2.取窗口句柄 (), , 假)
结果图片 ＝ 内存画板.取图片 (图片宽度, 图片高度 ＋ 30, 16777215)
图片_转换 (结果图片, 2, , 结果图片, )
写到文件 (取运行目录 () ＋ “\1.jpg”, 结果图片)

.版本 2<br /> <br /> .程序集 窗口程序集_窗口1<br /> <br /> .子程序 _窗口1_创建完毕<br /> <br /> 图片框1.图片 ＝ #图片1<br /> <br /> .子程序 _按钮_合成_被单击<br /> .局部变量 图片宽度, 整数型<br /> .局部变量 图片高度, 整数型<br /> .局部变量 内存画板, 内存画板<br /> .局部变量 分层画板, 分层画板<br /> .局部变量 区域, 矩形区_S<br /> .局部变量 分层画板句柄, 整数型<br /> .局部变量 结果图片, 字节集<br /> <br /> 图片宽度 ＝ 图片_取宽度 (#图片1)<br /> 图片高度 ＝ 图片_取高度 (#图片1)<br /> 内存画板.创建 (图片宽度, 图片高度 ＋ 30, 16777215, )<br /> 内存画板.画图片_数据 (#图片1, 0, 15, 图片宽度, 图片高度, 0)<br /> <br /> <br /> 分层画板.创建 (图片宽度, 15)<br /> 分层画板.文本渲染模式 (#文本渲染模式_抗锯齿)  ' 不写这个文字会有黑边<br /> 区域.左边 ＝ 10<br /> 区域.顶边 ＝ 2<br /> 区域.宽度 ＝ 图片宽度<br /> 区域.高度 ＝ 15<br /> 分层画板.文本颜色 (RGB到ARGB (#红色, 200))<br /> 分层画板.字体属性 (“黑体”, 15, 真, 假, , , )<br /> 分层画板.写文本_矩形内 (“欢迎xxx进入群聊”, 区域)<br /> 分层画板句柄 ＝ 分层画板.取句柄 ()<br /> 内存画板.合并分层画板 (分层画板句柄, 0, 0, 图片宽度, 15)<br /> 分层画板.销毁 ()<br /> <br /> 分层画板.创建 (图片宽度, 15)<br /> 区域.左边 ＝ 10<br /> 区域.顶边 ＝ 0<br /> 区域.宽度 ＝ 图片宽度<br /> 区域.高度 ＝ 15<br /> 分层画板.字体属性 (“Ink free”, 15, 真, , , , )<br /> 分层画板.文本颜色 (RGB到ARGB (#蓝色, 200))<br /> 分层画板.写文本_矩形内 (“qq9999999999”, 区域)<br /> 分层画板句柄 ＝ 分层画板.取句柄 ()<br /> 内存画板.合并分层画板 (分层画板句柄, 0, 图片高度 ＋ 15, 图片宽度, 15)<br /> 分层画板.销毁 ()<br /> <br /> 内存画板.复制到窗口 (图片框2.取窗口句柄 (), , 假)<br /> 结果图片 ＝ 内存画板.取图片 (图片宽度, 图片高度 ＋ 30, 16777215)<br /> 图片_转换 (结果图片, 2, , 结果图片, )<br /> 写到文件 (取运行目录 () ＋ “\1.jpg”, 结果图片)

花间一壶酒

用gdi内存画板 的分层画板写字再合并到内存画板 再输出图片就行了

shian

赤璃琴殇 发表于 2023-8-18 15:10
用gdi内存画板 的分层画板写字再合并到内存画板 再输出图片就行了

有例子吗

花间一壶酒

看这个例子