C++ Builder 解析和生成 json (使用 jsoncpp (0.y.z))

jsoncpp 的 0.y.z 分支适用于早期版本的编译器,低版本的 C++ Builder 也可以使用。
下载和编译 jsoncpp 0.y.z 可以参考 《C++ Builder 编译 jsoncpp 库 (0.y.z 分支)》
master 分支的 jsoncpp 已经不使用本文的解析和生成 json 的方法了。

  • 使用 jsoncpp 静态库
  • 解析 json
    · 解析 json 字符串
    · 解析 json 文件
  • 生成 json
    · 一般格式 toStyledString
    · 压缩格式 FastWriter
    · 保存 json 文件
  • 下载本文例子源码

一. 使用 jsoncpp 静态库

1. 下载和编译 jsoncpp 静态库

下载和编译 jsoncpp 0.y.z 可以参考 《C++ Builder 编译 jsoncpp 库 (0.y.z 分支)》

2. 在项目选项里面,添加头文件和库文件的路径

选择菜单 Project -> Options

添加头文件和库文件的路径

头文件的路径需要添加这个文件夹:

头文件的文件夹

库文件的路径需要添加这个文件夹:

库文件的文件夹

3. 包含头文件和链接库文件

#include "json/json.h"
#if defined(__clang__) && (__POINTER_WIDTH__ == 64)
  #pragma link "jsoncpp.a"
#else
  #pragma link "jsoncpp.lib"
#endif
包含头文件,链接库文件

二. 解析 json

由于 jsoncpp 必须采用 UTF-8 编码,所以必须用 UTF8String 字符串类型。

1. 解析 json 字符串

使用 Json::Reader 解析 json 字符串,解析之后放在 Json::Value 里面。

Json::Value 里面存储的可能是一个单个的值,比如整数、浮点数、字符串等,也可能是一组键值对,也可能是数组。

Json::Value v;

如果 v 是 "key" : value 形式的键值对,
Json::Value &value = v["key"]; // 关键字 key 的值

如果 v 是数组
Json::Value &value = v[i]; // 数组第 i 个元素的值

如果要把 Json::Value 储存的单个值读出来,需要用 Json::Value 的成员函数:

函数 得到的值
asBool() 布尔型 bool
asInt() 整型 int
asInt64() 64位整型 long long
asUInt() 无符号整型 unsigned int
asUInt64() 64位无符号整型 unsigned long long
asLargestInt() 最大位数的整型 intmax_t
asLargestUInt() 最大位数的无符号整型 uintmax_t
asFloat() 浮点数 float
asDouble() 双精度浮点数 double
asString() 字符串 std::string
asCString() 字符串 const char *

例:从 Memo 控件里面获取 json 字符串,假定内容如下:

{
    "name" : "JSON 测试程序 - 玄坴",
    "desc" : "Test JSON, Copyright © Hsuanlu",
    "value": 1234.56,
    "故障" :
    [
        { "编码":101, "描述":"故障1" },
        { "编码":102, "描述":"故障2" }
    ]
}

程序代码:

虽然 C++ 11 规定了 u8"这是 UTF-8 字符串" 这样的写法,但是目前的 C++ Builder 编译器还不支持,所以定义了一个 _u8s 在程序里面使用能够简单方便一些:
#define _u8s(s) UTF8String(s).c_str()

#define _u8s(s) UTF8String(s).c_str()
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    try
    {
        UTF8String txt = Memo1->Text; // Memo1 里面的文字转为 UTF-8 编码

        Json::Reader jsReader;
        Json::Value jsValue;
        if(!jsReader.parse(txt.c_str(), jsValue))
        {
            Memo2->Lines->Add(L"JSON 解析错误");
            return;
        }

        UTF8String sVal;
        double lfVal;
        int iVal;

        sVal = jsValue["name"].asCString();
        Memo2->Lines->Add(sVal);

        sVal = jsValue["desc"].asCString();
        Memo2->Lines->Add(sVal);

        lfVal = jsValue["value"].asDouble();
        Memo2->Lines->Add(lfVal);

        for(int i=0; i<2; i++)
        {
            Json::Value &jsFault = jsValue[_u8s(L"故障")][i];
            iVal = jsFault[_u8s(L"编码")].asInt();
            Memo2->Lines->Add(iVal);

            sVal = jsFault[_u8s(L"描述")].asCString();
            Memo2->Lines->Add(sVal);
        }
    }
    catch(std::exception &e)
    {
        UTF8String sErrStr = e.what();
        Memo2->Lines->Add(L"错误:" + sErrStr);
    }
    catch(Exception &e)
    {
        UTF8String sErrStr = e.Message;
        Memo2->Lines->Add(L"错误:" + sErrStr);
    }
}

运行结果:

解析 json 的运行结果

2. 解析 json 文件

只要把文件内容读到 UTF8String 里面就可以用前面的解析 json 字符串的方法解析了。

下面程序把 L"d:\\folder\\filename.txt" 读到 UTF8String txt 里面,按照 BOM 自动识别文件编码 UTF-8 / UNICODE 等,如果没有 BOM 会认为是 ANSI 编码 (由操作系统确定具体编码,Windows 10 新版在控制面板里面可以设为没有 BOM 认为是 UTF-8,否则认为是 ANSI)。

    std::auto_ptr<TStringList>sl(new TStringList);
    sl->LoadFromFile(L"d:\\folder\\filename.txt");
    UTF8String txt = sl->Text;

如果要指定读取的文件是 UTF-8 编码,LoadFromFile 需要加参数 TEncoding::UTF8,如果读取的文件不是 UTF-8 编码,会抛出异常。

    sl->LoadFromFile(L"d:\\folder\\filename.txt", TEncoding::UTF8);

文件读取完成,就可以按照前面第二部分所述的解析 json 字符串的方法了。

三. 生成 json

1. 生成 json 字符串

例:要生成这样的 json:

{
   "data" : 12345,
   "error" : [
      {
         "描述" : "故障1",
         "编码" : "101"
      },
      {
         "描述" : "故障2",
         "编码" : "102"
      }
   ]
}

生成 json 的代码如下,把生成的 json 显示在 Memo2 里面。

void __fastcall TForm1::Button3Click(TObject *Sender)
{
    Json::Value J;
    J["data"] = 12345;
    J["error"][0][UTF8String(L"编码").c_str()] = UTF8String(L"101" ).c_str();
    J["error"][0][UTF8String(L"描述").c_str()] = UTF8String(L"故障1").c_str();
    J["error"][1][UTF8String(L"编码").c_str()] = UTF8String(L"102" ).c_str();
    J["error"][1][UTF8String(L"描述").c_str()] = UTF8String(L"故障2").c_str();

    Memo2->Lines->LineBreak = L"\n"; // jsoncpp 的换行符是 "\n"
    Memo2->Lines->Text = UTF8String(J.toStyledString().c_str());
    Memo2->Lines->LineBreak = L"\r\n"; // 恢复 Windows 的换行符 "\r\n"
}

运行结果:

生成 json 的运行结果

前面的代码是通过 json 根节点直接创建 json 字符串,下面代码是通过中间变量创建:

void __fastcall TForm1::Button4Click(TObject *Sender)
{
    typedef struct
    {
        const wchar_t *sCode;
        const wchar_t *sDesc;
    }   TErrorInfo;

    static const TErrorInfo EInfo[] =
    {
        { L"101", L"故障1" },
        { L"102", L"故障2" },
        { NULL  , NULL     },
    };

    Json::Value J;
    J["data"] = 12345;

    Json::Value &jsError = J["error"];

    for(int i=0; EInfo[i].sCode; i++)
    {
        const TErrorInfo &EI = EInfo[i];
        Json::Value &jsErrInfo = jsError[i];
        jsErrInfo[UTF8String(L"编码").c_str()] = UTF8String(EI.sCode).c_str();
        jsErrInfo[UTF8String(L"描述").c_str()] = UTF8String(EI.sDesc).c_str();
    }

    Memo2->Lines->LineBreak = L"\n"; // jsoncpp 的换行符是 "\n"
    Memo2->Lines->Text = UTF8String(J.toStyledString().c_str());
    Memo2->Lines->LineBreak = L"\r\n"; // 恢复 Windows 的换行符 "\r\n"
}

运行结果:

生成 json 的运行结果

2. 一般格式 toStyledString

用 Json::Value 的 toStyledString() 方法得到的就是一般格式的 json 字符串,如前面例子的效果。

3. 压缩格式 FastWriter

如果生成的 json 字符串用于网络传输,用前面的 toStyledString() 方法得到的字符串有大量的空格和换行符,占用空间太大了,需要用压缩格式的 json 字符串,不包含没有必要的空格和换行符。

void __fastcall TForm1::Button5Click(TObject *Sender)
{
    Json::Value J;
    J["data"] = 12345;
    J["error"][0][UTF8String(L"编码").c_str()] = UTF8String(L"101" ).c_str();
    J["error"][0][UTF8String(L"描述").c_str()] = UTF8String(L"故障1").c_str();
    J["error"][1][UTF8String(L"编码").c_str()] = UTF8String(L"102" ).c_str();
    J["error"][1][UTF8String(L"描述").c_str()] = UTF8String(L"故障2").c_str();

    Memo2->Lines->LineBreak = L"\n"; // jsoncpp 的换行符是 "\n"
    Memo2->Lines->Text = UTF8String(Json::FastWriter().write(J).c_str());
    Memo2->Lines->LineBreak = L"\r\n"; // 恢复 Windows 的换行符 "\r\n"
}

运行结果:

生成压缩格式 json 的运行结果

4. 保存 json 文件

4.1 例:生成一般格式的 UTF-8 编码的 json 文件

void __fastcall TForm1::Button6Click(TObject *Sender)
{
    Json::Value J;
    J["data"] = 12345;
    J["error"][0][UTF8String(L"编码").c_str()] = UTF8String(L"101" ).c_str();
    J["error"][0][UTF8String(L"描述").c_str()] = UTF8String(L"故障1").c_str();
    J["error"][1][UTF8String(L"编码").c_str()] = UTF8String(L"102" ).c_str();
    J["error"][1][UTF8String(L"描述").c_str()] = UTF8String(L"故障2").c_str();

    std::auto_ptr<TStringList>sl(new TStringList);
    sl->LineBreak = L"\n"; // jsoncpp 的换行符是 "\n"
    sl->Text = UTF8String(J.toStyledString().c_str());
    sl->LineBreak = L"\r\n"; // 恢复 Windows 的换行符 "\r\n"
    sl->SaveToFile(L"d:\\test.txt", TEncoding::UTF8);
}

生成的文件用记事本打开查看内容:

生成的 json 文件的内容

4.2 生成压缩格式的 UTF-8 编码的 json 文件

void __fastcall TForm1::Button7Click(TObject *Sender)
{
    Json::Value J;
    J["data"] = 12345;
    J["error"][0][UTF8String(L"编码").c_str()] = UTF8String(L"101" ).c_str();
    J["error"][0][UTF8String(L"描述").c_str()] = UTF8String(L"故障1").c_str();
    J["error"][1][UTF8String(L"编码").c_str()] = UTF8String(L"102" ).c_str();
    J["error"][1][UTF8String(L"描述").c_str()] = UTF8String(L"故障2").c_str();

    std::auto_ptr<TStringList>sl(new TStringList);
    sl->Text = UTF8String(Json::FastWriter().write(J).c_str());
    sl->SaveToFile(L"d:\\test.txt", TEncoding::UTF8);
}

生成的 json 文件用记事本打开查看内容:

生成的 json 文件的内容

四. 下载本文例子源码

请点击:jsoncpp-0.10.7-src-cbuilder 下载 jsoncpp 0.10.7 完整源码、C++ Builder 项目文件、编译好了的库文件、例子程序等。


参考:

最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 203,362评论 5 477
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 85,330评论 2 381
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 150,247评论 0 337
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 54,560评论 1 273
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 63,580评论 5 365
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 48,569评论 1 281
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 37,929评论 3 395
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 36,587评论 0 258
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 40,840评论 1 297
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 35,596评论 2 321
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 37,678评论 1 329
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 33,366评论 4 318
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 38,945评论 3 307
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 29,929评论 0 19
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 31,165评论 1 259
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 43,271评论 2 349
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 42,403评论 2 342

推荐阅读更多精彩内容