微软开发文档一键转易语言代码

Nick5469

对上个帖子的代码进行修复和更新
新增 一键将文档中定义的数据类型转换为易语言的自定义数据类型

Nick5469

忘记传文件了。。。

洋滨

测试了下数据类型有点问题，修复了下，加了一些基础数据类型转换

  

子程序名	返回值类型	公开	备 注
API_转换数据类型
参数名	类 型	参考	可空	数组	备 注
TEXT	文本型

变量名	类 型	静态	数组	备 注
函数名	文本型
data	文本型		0
i	整数型
成员类型	文本型		0
成员名	文本型		0
type	文本型
name	文本型

函数名 ＝ 文本_取出中间文本 (TEXT, “struct ”, “ {”, , )
函数名 ＝ 选择 (取文本左边 (函数名, 1) ＝ “_”, 文本_删左边 (函数名, 1), 函数名)
TEXT ＝ 子文本替换 (文本_取出中间文本 (TEXT, “{” ＋ #换行符, #换行符 ＋ “}”, , ), “?”, “”, , , 真)
data ＝ 分割文本 (TEXT, #换行符, )
调试输出 (data)
计次循环首 (取数组成员数 (data), i)
name ＝ 文本_取右边 (data [i], “ ”, , )
name ＝ 文本_删右边 (name, 1)
type ＝ 文本_取左边 (data [i], “ ” ＋ name, , )
type ＝ 删首尾空 (type)
type ＝ 基础类型转换 (type)
加入成员 (成员名, name)
加入成员 (成员类型, type)
计次循环尾 ()
编辑框2.内容 ＝ API_TYPE2E (函数名, 成员名, 成员类型)

子程序名	返回值类型	公开	备 注
基础类型转换	文本型		C++转E
参数名	类 型	参考	可空	数组	备 注
文本	文本型

文本 ＝ 删首尾空 (文本)
文本 ＝ 子文本替换 (文本, 字符 (10), , , , 真)
文本 ＝ 子文本替换 (文本, 字符 (13), , , , 真)
文本 ＝ 到小写 (文本)
如果真 (文本 ＝ “void”)
文本 ＝ “空白型”

如果真 (文本 ＝ “char”)
文本 ＝ “字节型”

如果真 (文本 ＝ “short”)
文本 ＝ “短整数型”

如果真 (文本 ＝ “int”)
文本 ＝ “整数型”

如果真 (文本 ＝ “long”)
文本 ＝ “长整数型”

如果真 (文本 ＝ “float”)
文本 ＝ “小数型”

如果真 (文本 ＝ “double”)
文本 ＝ “双精度小数型”

如果真 (文本 ＝ “bool”)
文本 ＝ “逻辑型”

如果真 (文本 ＝ “time_t”)
文本 ＝ “日期时间型”

如果真 (文本 ＝ “std::string”)
文本 ＝ “文本型”

如果真 (文本 ＝ “std::vector”)
文本 ＝ “字节集型”

如果真 (文本 ＝ “bool”)
文本 ＝ “逻辑型”

如果真 (文本 ＝ “byte”)
文本 ＝ “字节型”

如果真 (文本 ＝ “short”)
文本 ＝ “短整数型”

如果真 (文本 ＝ “long”)
文本 ＝ “长整数型”

如果真 (文本 ＝ “dword”)
文本 ＝ “长整数型”

如果真 (文本 ＝ “word”)
文本 ＝ “短整数型”

如果真 (文本 ＝ “longlong”)
文本 ＝ “长整数型”

如果真 (文本 ＝ “ulonglong”)
文本 ＝ “长整数型”

如果真 (文本 ＝ “uint”)
文本 ＝ “整数型”

如果真 (文本 ＝ “float”)
文本 ＝ “小数型”

如果真 (文本 ＝ “double”)
文本 ＝ “双精度小数型”

如果真 (文本 ＝ “pvoid”)
文本 ＝ “空白型”

如果真 (文本 ＝ “lpvoid”)
文本 ＝ “空白型”

如果真 (文本 ＝ “handle”)
文本 ＝ “空白型”

如果真 (文本 ＝ “lpstr”)
文本 ＝ “文本型”

如果真 (文本 ＝ “lpcstr”)
文本 ＝ “文本型”

如果真 (文本 ＝ “lpwstr”)
文本 ＝ “文本型”

如果真 (文本 ＝ “lpcwstr”)
文本 ＝ “文本型”

如果真 (文本 ＝ “filetime”)
文本 ＝ “日期时间型”

返回 (文本)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 API_转换数据类型<br /> .参数 TEXT, 文本型<br /> .局部变量 函数名, 文本型<br /> .局部变量 data, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 成员类型, 文本型, , "0"<br /> .局部变量 成员名, 文本型, , "0"<br /> .局部变量 type, 文本型<br /> .局部变量 name, 文本型<br /> <br /> 函数名 ＝ 文本_取出中间文本 (TEXT, “struct ”, “ {”, , )<br /> 函数名 ＝ 选择 (取文本左边 (函数名, 1) ＝ “_”, 文本_删左边 (函数名, 1), 函数名)<br /> TEXT ＝ 子文本替换 (文本_取出中间文本 (TEXT, “{” ＋ #换行符, #换行符 ＋ “}”, , ), “?”, “”, , , 真)<br /> data ＝ 分割文本 (TEXT, #换行符, )<br /> 调试输出 (data)<br /> .计次循环首 (取数组成员数 (data), i)<br /> <br />     name ＝ 文本_取右边 (data <i>, “ ”, , )<br />     name ＝ 文本_删右边 (name, 1)<br />     type ＝ 文本_取左边 (data <i>, “ ” ＋ name, , )<br />     type ＝ 删首尾空 (type)<br />     type ＝ 基础类型转换 (type)<br />     加入成员 (成员名, name)<br />     加入成员 (成员类型, type)<br /> .计次循环尾 ()<br /> 编辑框2.内容 ＝ API_TYPE2E (函数名, 成员名, 成员类型)<br /> <br /> .子程序 基础类型转换, 文本型, , C++转E<br /> .参数 文本, 文本型<br /> <br /> 文本 ＝ 删首尾空 (文本)<br /> 文本 ＝ 子文本替换 (文本, 字符 (10), , , , 真)<br /> 文本 ＝ 子文本替换 (文本, 字符 (13), , , , 真)<br /> 文本 ＝ 到小写 (文本)<br /> .如果真 (文本 ＝ “void”)<br />     文本 ＝ “空白型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “char”)<br />     文本 ＝ “字节型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “short”)<br />     文本 ＝ “短整数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “int”)<br />     文本 ＝ “整数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “long”)<br />     文本 ＝ “长整数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “float”)<br />     文本 ＝ “小数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “double”)<br />     文本 ＝ “双精度小数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “bool”)<br />     文本 ＝ “逻辑型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “time_t”)<br />     文本 ＝ “日期时间型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “std::string”)<br />     文本 ＝ “文本型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “std::vector”)<br />     文本 ＝ “字节集型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “bool”)<br />     文本 ＝ “逻辑型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “byte”)<br />     文本 ＝ “字节型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “short”)<br />     文本 ＝ “短整数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “long”)<br />     文本 ＝ “长整数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “dword”)<br />     文本 ＝ “长整数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “word”)<br />     文本 ＝ “短整数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “longlong”)<br />     文本 ＝ “长整数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “ulonglong”)<br />     文本 ＝ “长整数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “uint”)<br />     文本 ＝ “整数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “float”)<br />     文本 ＝ “小数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “double”)<br />     文本 ＝ “双精度小数型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “pvoid”)<br />     文本 ＝ “空白型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “lpvoid”)<br />     文本 ＝ “空白型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “handle”)<br />     文本 ＝ “空白型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “lpstr”)<br />     文本 ＝ “文本型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “lpcstr”)<br />     文本 ＝ “文本型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “lpwstr”)<br />     文本 ＝ “文本型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “lpcwstr”)<br />     文本 ＝ “文本型”<br /> .如果真结束<br /> <br /> .如果真 (文本 ＝ “filetime”)<br />     文本 ＝ “日期时间型”<br /> .如果真结束<br /> <br /> 返回 (文本)

yyyxx2022

66666666666666

candi

感谢分享

menghu780409

感谢大老分享

五花牛

很喜欢 支持一下

吃柠檬的包子

很喜欢 支持一下

气东来

功德无量

金叶

感谢大老分享

普通玩家

感谢分享

洋滨

yidufan 发表于 2024-8-10 18:37
大老 错误(4): 没有找到名为“DismImageType”的数据类型。

删了，那是楼主测试的