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

q1012789582 · 发表于 2021-10-31 23:40:07

本帖最后由 q1012789582 于 2021-10-31 23:48 编辑

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

LabelMainPlus_SVG Class.zip (2.13 KB, 下载次数: 80)

2021-10-31 23:41 上传

点击文件名下载附件
10

效果预览如下: QQ截图20211031233650.png

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

子程序名	返回值类型	公开	备注
输出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, 到字节集 (临时)))

水深与云起 · 发表于 2024-9-21 17:40:35

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

胖子葛格 · 发表于 2023-4-4 10:16:57

感谢大神分享

q1012789582 · 发表于 2022-8-25 00:12:53

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

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

gudujian420 · 发表于 2022-8-17 04:25:05

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

gudujian420 · 发表于 2022-8-16 01:12:54

支持开源

ghost12 · 发表于 2022-3-6 19:01:36

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

q1012789582 · 发表于 2021-12-16 14:32:36

没人喜欢啊？

q1012789582 · 发表于 2021-11-1 22:21:00

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

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

q1012789582 · 发表于 2021-11-1 22:20:44

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

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

[2021开源大赛(第六届)] [SVG字符串拼接模块源码]易语言将数据保存到SVG文件

评分