c#json处理的易语言方法 - 精易论坛

窗口程序集名	保留	保留	备注
程序集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.属性是否存在 (属性名称))