| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集_启动窗口 | | | |
| 变量名 | 类 型 | 数组 | 备 注 |
| BOOL | 逻辑型 | |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 网卡信息 | 网卡信息 | | 0 |
| i | 整数型 | | |
网卡信息 ＝
取网卡信息列表 ()
计次循环首 (取数组成员数 (网卡信息
), i
)
如果真 (网卡信息
[i
].IP地址 ＝
取IP地址 ())
编辑框1.内容 ＝ 网卡信息
[i
].IP地址
编辑框2.内容 ＝ 网卡信息
[i
].默认网关
编辑框3.内容 ＝ 网卡信息
[i
].子网掩码
计次循环尾 ()如果真 (BOOL ＝
真)返回 ()BOOL ＝ 真
启动线程 (&线程1, ,
)| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 网页返回 | 文本型 | | |
| json | 类_json | | |
判断循环首 (BOOL ＝
真)网页返回 ＝
编码_utf8到gb2312 (网页_访问S (“https://ip.cn/api/index?ip=&type=0”, 0, , , , , , , , , , , , , , , , , ,
))
json.
解析 (网页返回, ,
)编辑框5.内容 ＝ json.
取通用属性 (“ip”,
)编辑框4.内容 ＝ json.
取通用属性 (“address”,
)跳出循环 ()判断循环尾 ()BOOL ＝ 假
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 网卡信息 | 网卡信息 | | 0 |
| i | 整数型 | | |
网卡信息 ＝
取网卡信息列表 ()计次循环首 (取数组成员数 (网卡信息
), i
)如果真 (网卡信息
[i
].IP地址 ＝
取IP地址 ())
编辑框1.内容 ＝ 网卡信息
[i
].IP地址
编辑框2.内容 ＝ 网卡信息
[i
].默认网关
编辑框3.内容 ＝ 网卡信息
[i
].子网掩码
计次循环尾 ()如果真 (BOOL ＝
真)返回 ()BOOL ＝ 真
启动线程 (&线程1, ,
)标题 ＝
到文本 (取现行时间 ())
