c#json处理的易语言方法

maluking

刚开始用c#,发现tmd,c#的json就是反人类的存在,
所以,找到了这个易语言写dll 供c#调用的方法,
我从这时发现易语言才是最简洁的语言, 大爷的,
费话不说, 上代码,

  

窗口程序集名	保 留	保 留	备 注
程序集1
变量名	类 型	数组	备 注
json	JSON

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		请在本子程序中放置动态链接库初始化代码

变量名	类 型	静态	数组	备 注
文本	文本型

_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
json.解析 ( #常量2 )
文本 ＝ json.取通用属性 (“message”)
' 调试输出 (文本)
返回 (0)  ' 返回值被忽略。

子程序名	返回值类型	公开	备 注
_临时子程序

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。

子程序名	返回值类型	公开	备 注
json_Clear			通过制定一个易语言的值来生成一个JSON.如果xx不在可接受范围类将赋“空”值，会无条件清除之前的内容。本命令为初级对象成员命令。

json.赋值 (0)

子程序名	返回值类型	公开	备 注
json_Parse	逻辑型		解析
参数名	类 型	参考	可空	数组	备 注
文本	文本型

如果 (json.解析 (文本))
返回 (真)
返回 (假)

子程序名	返回值类型	公开	备 注
json_GetValue_text	逻辑型
参数名	类 型	参考	可空	数组	备 注
属性名称	文本型
buffer	整数型
bufferlength	整数型

变量名	类 型	静态	数组	备 注
文本	文本型

文本 ＝ json.取通用属性 (属性名称)
bufferlength ＝ 取文本长度 (文本)
buffer ＝ 申请内存 (bufferlength, 真)
写到内存 (文本, buffer, bufferlength)
如果 (bufferlength ＝ 0)
返回 (假)
返回 (真)

子程序名	返回值类型	公开	备 注
json_GetValue_Int	整数型
参数名	类 型	参考	可空	数组	备 注
属性名称	文本型

返回 (json.取通用属性 (属性名称))

子程序名	返回值类型	公开	备 注
json_ToText	逻辑型
参数名	类 型	参考	可空	数组	备 注
msg	整数型
BufferLength	整数型

变量名	类 型	静态	数组	备 注
文本	文本型

文本 ＝ json.到文本 ()
BufferLength ＝ 取文本长度 (文本)
msg ＝ 申请内存 (BufferLength, 真)
写到内存 (文本, msg, BufferLength)
如果 (BufferLength ＝ 0)
返回 (假)
返回 (真)

子程序名	返回值类型	公开	备 注
json_SetValue_Text
参数名	类 型	参考	可空	数组	备 注
属性名称	文本型
值	文本型

json.置属性 (属性名称, 值)

子程序名	返回值类型	公开	备 注
json_SetValue_Int
参数名	类 型	参考	可空	数组	备 注
属性名称	文本型
值	整数型

json.置属性 (属性名称, 值)

子程序名	返回值类型	公开	备 注
json_ValueValueExist	逻辑型
参数名	类 型	参考	可空	数组	备 注
属性名称	文本型

返回 (json.属性是否存在 (属性名称))

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

.版本 2<br /> .支持库 json<br /> .支持库 spec<br /> <br /> .程序集 程序集1<br /> .程序集变量 json, JSON<br /> <br /> .子程序 _启动子程序, 整数型, , 请在本子程序中放置动态链接库初始化代码<br /> .局部变量 文本, 文本型<br /> <br /> _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码<br /> json.解析 (#常量2)<br /> 文本 ＝ json.取通用属性 (“message”)<br /> ' 调试输出 (文本)<br /> 返回 (0)  ' 返回值被忽略。<br /> <br /> .子程序 _临时子程序<br /> <br /> ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。<br /> <br /> <br /> .子程序 json_Clear, , 公开, 通过制定一个易语言的值来生成一个JSON.如果xx不在可接受范围类将赋“空”值，会无条件清除之前的内容。本命令为初级对象成员命令。<br /> <br /> json.赋值 (0)<br /> <br /> .子程序 json_Parse, 逻辑型, 公开, 解析<br /> .参数 文本, 文本型<br /> <br /> .如果 (json.解析 (文本))<br />     返回 (真)<br /> .否则<br />     返回 (假)<br /> .如果结束<br /> <br /> <br /> .子程序 json_GetValue_text, 逻辑型, 公开<br /> .参数 属性名称, 文本型<br /> .参数 buffer, 整数型, 参考<br /> .参数 bufferlength, 整数型, 参考<br /> .局部变量 文本, 文本型<br /> <br /> 文本 ＝ json.取通用属性 (属性名称)<br /> bufferlength ＝ 取文本长度 (文本)<br /> buffer ＝ 申请内存 (bufferlength, 真)<br /> 写到内存 (文本, buffer, bufferlength)<br /> <br /> .如果 (bufferlength ＝ 0)<br />     返回 (假)<br /> .否则<br />     返回 (真)<br /> .如果结束<br /> <br /> <br /> .子程序 json_GetValue_Int, 整数型, 公开<br /> .参数 属性名称, 文本型<br /> <br /> 返回 (json.取通用属性 (属性名称))<br /> <br /> .子程序 json_ToText, 逻辑型, 公开<br /> .参数 msg, 整数型, 参考<br /> .参数 BufferLength, 整数型, 参考<br /> .局部变量 文本, 文本型<br /> <br /> 文本 ＝ json.到文本 ()<br /> BufferLength ＝ 取文本长度 (文本)<br /> msg ＝ 申请内存 (BufferLength, 真)<br /> 写到内存 (文本, msg, BufferLength)<br /> .如果 (BufferLength ＝ 0)<br />     返回 (假)<br /> .否则<br />     返回 (真)<br /> .如果结束<br /> <br /> <br /> .子程序 json_SetValue_Text, , 公开<br /> .参数 属性名称, 文本型<br /> .参数 值, 文本型<br /> <br /> json.置属性 (属性名称, 值)<br /> <br /> <br /> .子程序 json_SetValue_Int, , 公开<br /> .参数 属性名称, 文本型<br /> .参数 值, 整数型<br /> <br /> json.置属性 (属性名称, 值)<br /> <br /> .子程序 json_ValueValueExist, 逻辑型, 公开<br /> .参数 属性名称, 文本型<br /> <br /> 返回 (json.属性是否存在 (属性名称))

静态编译后, 把dll文件到放到C#项目的debug文件夹里面,
然后,调用



注意:易语言子程序命名不要用中文, 用中文,会报错
        返回不要返回字节集, 不要返回 文本型,
        文本型xx返回,采用 写到内存的方法, 文本型和c#的string据说不一样, 字节集返回,intptr 取出来长度可能不一样,
        所以用 指针的方式处理, 看代码就可以了, 参考 那里一定要选上,
后感:老外的思维还是比不上咱们中国人,大家多多努力!希望易语言发扬光大!

吴某仁

一句 反序列化

zmoli775

Newtonsoft.Json不香嘛？哎可怜的孩子·应该是不会用吧！

901

Newtonsoft.Json 他不香吗

8881020

Newtonsoft.Json 就一个命令解析就能用对象["json对象名字"]

堕落ぁ狼

可能真的不会用Newtonsoft.json吧

竹竹

maluking 发表于 2019-12-12 10:46
一样的引用, 语法确实没有易语言简洁!

...自己封装

qingshanlushui

事实上只有 js和易语言  会做json自动解析的...........但是易语言的json解析对ziyuan的浪费不敢恭维....

malei1194627023

四个字:井底之蛙

maluking

竹席 发表于 2019-12-12 09:05
你是用不好Newtonsoft.Json吧

一样的引用, 语法确实没有易语言简洁!