[SVG字符串拼接模块源码]易语言将数据保存到SVG文件

q1012789582

[SVG字符串拼接模块源码]易语言将数据保存到SVG文件下载: LabelMainPlus_SVG Class.zip (2.13 KB, 下载次数: 82)

2021-10-31 23:41 上传

点击文件名下载附件
10
下载积分: 精币 -2 枚

效果预览如下:

类模块源代码在压缩包里请自行下载。{}

  

子程序名	返回值类型	公开	备 注
输出SVG	逻辑型		将数据保存到SVG文件
参数名	类 型	参考	可空	数组	备 注
p	文本型				保存路径

变量名	类 型	静态	数组	备 注
临时	字节集
SVG	LabelMainPlus_SVG

临时 ＝ 临时 ＋ SVG.置模板头 (_纸张.w, _纸张.h, “GB2312”)
判断 (_图形 [循环].类型 ＝ 1 或 _图形 [循环].类型 ＝ 2 或 _图形 [循环].类型 ＝ 3)
临时 ＝ 临时 ＋ SVG.置矩形 (_图形 [循环].RECT.x, _图形 [循环].RECT.y, _图形 [循环].RECT.w, _图形 [循环].RECT.h, _图形 [循环].线条宽, _图形 [循环].线条色, _图形 [循环].填充色, _图形 [循环].圆角 ÷ 2, _图形 [循环].圆角 ÷ 2)

判断 (_图形 [循环].类型 ＝ 4 或 _图形 [循环].类型 ＝ 5)
临时 ＝ 临时 ＋ SVG.置圆形 (_图形 [循环].RECT.x, _图形 [循环].RECT.y, _图形 [循环].RECT.w, _图形 [循环].RECT.h, _图形 [循环].线条宽, _图形 [循环].线条色, _图形 [循环].填充色)
判断 (_图形 [循环].类型 ＝ 6)
临时 ＝ 临时 ＋ SVG.置线条 (_图形 [循环].RECT.x, _图形 [循环].RECT.y ＋ 5, _图形 [循环].RECT.x ＋ _图形 [循环].RECT.w, _图形 [循环].RECT.y ＋ 5, _图形 [循环].线条宽, _图形 [循环].线条色)
判断 (_图形 [循环].类型 ＝ 7)
临时 ＝ 临时 ＋ SVG.置线条 (_图形 [循环].RECT.x ＋ 5, _图形 [循环].RECT.y, _图形 [循环].RECT.x ＋ 5, _图形 [循环].RECT.y ＋ _图形 [循环].RECT.h, _图形 [循环].线条宽, _图形 [循环].线条色)
判断 (_图形 [循环].类型 ＝ 8)
临时 ＝ 临时 ＋ SVG.置线条 (_图形 [循环].RECT.x, _图形 [循环].RECT.y, _图形 [循环].RECT.x ＋ _图形 [循环].RECT.w, _图形 [循环].RECT.y ＋ _图形 [循环].RECT.h, _图形 [循环].线条宽, _图形 [循环].线条色)
判断 (_图形 [循环].类型 ＝ 9)
临时 ＝ 临时 ＋ SVG.置线条 (_图形 [循环].RECT.x, _图形 [循环].RECT.y ＋ _图形 [循环].RECT.h, _图形 [循环].RECT.x ＋ _图形 [循环].RECT.w, _图形 [循环].RECT.y, _图形 [循环].线条宽, _图形 [循环].线条色)
判断 (_图形 [循环].类型 ＝ 10 或 _图形 [循环].类型 ＝ 11 或 _图形 [循环].类型 ＝ 12 或 _图形 [循环].类型 ＝ 16)
临时 ＝ 临时 ＋ SVG.置图形 (_图形 [循环].RECT.x, _图形 [循环].RECT.y, _图形 [循环].RECT.w, _图形 [循环].RECT.h, _图形 [循环].图片.图片)
判断 (_图形 [循环].类型 ＝ 13)
临时 ＝ 临时 ＋ SVG.置文本值 (_图形 [循环].RECT.x, _图形 [循环].RECT.y ＋ 到整数 (读配置项 (取运行目录 () ＋ “\settings.ini”, “调试”, “x”, )), _图形 [循环].文本, _图形 [循环].Font.角度 ÷ 10, _图形 [循环].Font.加粗, _图
形 [循环].Font.字体名称, _图形 [循环].Font.字体大小, _图形 [循环].字色)
判断 (_图形 [循环].类型 ＝ 15)
临时 ＝ 临时 ＋ SVG.置渐变矩形 (_图形 [循环].RECT.x, _图形 [循环].RECT.y, _图形 [循环].RECT.w, _图形 [循环].RECT.h, _图形 [循环].渐变方向, _图形 [循环].首渐变色, _图形 [循环].其它渐变色, _图形 [循环].替换)
临时 ＝ 临时 ＋ SVG.置模板尾 ()
返回 (写到文件 (p, 到字节集 (临时)))

.版本 2<br /> <br /> .子程序 输出SVG, 逻辑型, 公开, 将数据保存到SVG文件<br /> <br /> .参数 p, 文本型, , 保存路径<br /> <br /> .局部变量 临时, 字节集<br /> .局部变量 SVG, LabelMainPlus_SVG<br /> <br /> <br /> <br />         临时 ＝ 临时 ＋ SVG.置模板头 (_纸张.w, _纸张.h, “GB2312”)<br /> <br /> <br /> <br /> <br /> <br />         .判断开始 (_图形 [循环].类型 ＝ 1 或 _图形 [循环].类型 ＝ 2 或 _图形 [循环].类型 ＝ 3)<br /> <br />             临时 ＝ 临时 ＋ SVG.置矩形 (_图形 [循环].RECT.x, _图形 [循环].RECT.y, _图形 [循环].RECT.w, _图形 [循环].RECT.h, _图形 [循环].线条宽, _图形 [循环].线条色, _图形 [循环].填充色, _图形 [循环].圆角 ÷ 2, _图形 [循环].圆角 ÷ 2)<br /> <br />         .判断 (_图形 [循环].类型 ＝ 4 或 _图形 [循环].类型 ＝ 5)<br /> <br />             临时 ＝ 临时 ＋ SVG.置圆形 (_图形 [循环].RECT.x, _图形 [循环].RECT.y, _图形 [循环].RECT.w, _图形 [循环].RECT.h, _图形 [循环].线条宽, _图形 [循环].线条色, _图形 [循环].填充色)<br /> <br />         .判断 (_图形 [循环].类型 ＝ 6)<br /> <br />             临时 ＝ 临时 ＋ SVG.置线条 (_图形 [循环].RECT.x, _图形 [循环].RECT.y ＋ 5, _图形 [循环].RECT.x ＋ _图形 [循环].RECT.w, _图形 [循环].RECT.y ＋ 5, _图形 [循环].线条宽, _图形 [循环].线条色)<br /> <br />         .判断 (_图形 [循环].类型 ＝ 7)<br /> <br />             临时 ＝ 临时 ＋ SVG.置线条 (_图形 [循环].RECT.x ＋ 5, _图形 [循环].RECT.y, _图形 [循环].RECT.x ＋ 5, _图形 [循环].RECT.y ＋ _图形 [循环].RECT.h, _图形 [循环].线条宽, _图形 [循环].线条色)<br /> <br />         .判断 (_图形 [循环].类型 ＝ 8)<br /> <br />             临时 ＝ 临时 ＋ SVG.置线条 (_图形 [循环].RECT.x, _图形 [循环].RECT.y, _图形 [循环].RECT.x ＋ _图形 [循环].RECT.w, _图形 [循环].RECT.y ＋ _图形 [循环].RECT.h, _图形 [循环].线条宽, _图形 [循环].线条色)<br /> <br />         .判断 (_图形 [循环].类型 ＝ 9)<br /> <br />             临时 ＝ 临时 ＋ SVG.置线条 (_图形 [循环].RECT.x, _图形 [循环].RECT.y ＋ _图形 [循环].RECT.h, _图形 [循环].RECT.x ＋ _图形 [循环].RECT.w, _图形 [循环].RECT.y, _图形 [循环].线条宽, _图形 [循环].线条色)<br /> <br />         .判断 (_图形 [循环].类型 ＝ 10 或 _图形 [循环].类型 ＝ 11 或 _图形 [循环].类型 ＝ 12 或 _图形 [循环].类型 ＝ 16)<br /> <br />             临时 ＝ 临时 ＋ SVG.置图形 (_图形 [循环].RECT.x, _图形 [循环].RECT.y, _图形 [循环].RECT.w, _图形 [循环].RECT.h, _图形 [循环].图片.图片)<br /> <br />         .判断 (_图形 [循环].类型 ＝ 13)<br /> <br />             临时 ＝ 临时 ＋ SVG.置文本值 (_图形 [循环].RECT.x, _图形 [循环].RECT.y ＋ 到整数 (读配置项 (取运行目录 () ＋ “\settings.ini”, “调试”, “x”, )), _图形 [循环].文本, _图形 [循环].Font.角度 ÷ 10, _图形 [循环].Font.加粗, _图<br /> <br /> <br /> <br /> 形 [循环].Font.字体名称, _图形 [循环].Font.字体大小, _图形 [循环].字色)<br /> <br />         .判断 (_图形 [循环].类型 ＝ 15)<br /> <br />             临时 ＝ 临时 ＋ SVG.置渐变矩形 (_图形 [循环].RECT.x, _图形 [循环].RECT.y, _图形 [循环].RECT.w, _图形 [循环].RECT.h, _图形 [循环].渐变方向, _图形 [循环].首渐变色, _图形 [循环].其它渐变色, _图形 [循环].替换)<br /> <br /> <br /> <br /> 临时 ＝ 临时 ＋ SVG.置模板尾 ()<br /> <br /> 返回 (写到文件 (p, 到字节集 (临时)))

水深与云起

还是不懂用 看不懂怎么用~尴尬

胖子葛格

感谢大神分享

q1012789582

gudujian420 发表于 2022-8-17 04:25
正在编译现行程序
正在检查重复名称...
正在预处理现行程序

https://www.eyuyan.la/post/7815.html
仅供参考FIY

gudujian420

正在编译现行程序
正在检查重复名称...
正在预处理现行程序
错误(37): 找不到指定的命令／子程序／Dll命令调用名称“颜色值转RGB”。
编译现行易程序失败或被中止!

gudujian420

支持开源

ghost12

感谢你的支持，精易有你更精彩

q1012789582

没人喜欢啊？

q1012789582

yoobaby 发表于 2021-11-1 20:28
读配置项 (取运行目录 () ＋ “\settings.ini”, “调试”, “x”, )

[调试]
x=25
y=-49
w=50
h=50

q1012789582

[调试] x=25 y=-49 w=50 h=50