{"id":1629,"date":"2014-12-30T19:24:59","date_gmt":"2014-12-30T11:24:59","guid":{"rendered":"http:\/\/blog.qdac.cc\/?p=1629"},"modified":"2014-12-30T19:28:20","modified_gmt":"2014-12-30T11:28:20","slug":"json%e4%b8%8emsgpack%e6%a0%bc%e5%bc%8f%e7%9b%b8%e4%ba%92%e8%bd%ac%e6%8d%a2%e5%b7%a5%e5%85%b7%e5%87%bd%e6%95%b0","status":"publish","type":"post","link":"https:\/\/blog.qdac.cc\/?p=1629","title":{"rendered":"Json\u4e0eMsgPack\u683c\u5f0f\u76f8\u4e92\u8f6c\u6362\u5de5\u5177\u51fd\u6570"},"content":{"rendered":"<pre class=\"lang:delphi decode:true \">procedure JsonToMsgPack(AJson: TQJson; AMsgPack: TQMsgPack);\r\nvar\r\n  I: Integer;\r\n  AChild: TQJson;\r\n  procedure CopyChild(AJsonChild: TQJson; AMsgPackChild: TQMsgPack);\r\n  var\r\n    J: Integer;\r\n  begin\r\n  case AJsonChild.DataType of\r\n    jdtNull:\r\n      AMsgPackChild.DataType := mptNull;\r\n    jdtString:\r\n      AMsgPackChild.AsString := AJsonChild.AsString;\r\n    jdtInteger:\r\n      AMsgPackChild.AsInt64 := AJsonChild.AsInt64;\r\n    jdtFloat:\r\n      AMsgPackChild.AsFloat := AJsonChild.AsFloat;\r\n    jdtDateTime:\r\n      AMsgPackChild.AsDateTime := AJsonChild.AsDateTime;\r\n    jdtBoolean:\r\n      AMsgPackChild.AsBoolean := AJsonChild.AsBoolean;\r\n    jdtArray:\r\n      begin\r\n      AMsgPackChild.DataType := mptArray;\r\n      J := 0;\r\n      while J &lt; AJsonChild.Count do\r\n        begin\r\n        CopyChild(AJsonChild[J], AMsgPackChild.Add);\r\n        Inc(J);\r\n        end;\r\n      end;\r\n    jdtObject:\r\n      begin\r\n      AMsgPackChild.DataType := mptMap;\r\n      J := 0;\r\n      while J &lt; AJsonChild.Count do\r\n        begin\r\n        AChild := AJsonChild[J];\r\n        CopyChild(AChild, AMsgPackChild.Add(AChild.Name));\r\n        Inc(J);\r\n        end;\r\n      end;\r\n  end;\r\n  end;\r\n\r\nbegin\r\nAMsgPack.Clear;\r\nI := 0;\r\nwhile I &lt; AJson.Count do\r\n  begin\r\n  AChild := AJson[I];\r\n  CopyChild(AChild, AMsgPack.Add(AChild.Name));\r\n  Inc(I);\r\n  end;\r\nend;\r\n\r\nprocedure MsgPackToJson(AMsgPack: TQMsgPack; AJson: TQJson);\r\nvar\r\n  I: Integer;\r\n  AChild: TQMsgPack;\r\n  procedure CopyChild(AMsgPackChild: TQMsgPack; AJsonChild: TQJson);\r\n  var\r\n    J: Integer;\r\n  begin\r\n  case AMsgPackChild.DataType of\r\n    mptInteger:\r\n      AJsonChild.AsInt64 := AMsgPackChild.AsInt64;\r\n    mptNull:\r\n      AJsonChild.ResetNull;\r\n    mptBoolean:\r\n      AJsonChild.AsBoolean := AMsgPackChild.AsBoolean;\r\n    mptSingle, mptFloat:\r\n      AJsonChild.AsFloat := AMsgPackChild.AsFloat;\r\n    mptString, mptExtended:\r\n      AJsonChild.AsString := AMsgPackChild.AsString;\r\n    mptBinary:\r\n      AJsonChild.AsBytes := AMsgPackChild.AsBytes;\r\n    mptDateTime:\r\n      AJsonChild.AsDateTime:=AMsgPackChild.AsDateTime;\r\n    mptArray:\r\n      begin\r\n      AJsonChild.DataType := jdtArray;\r\n      J := 0;\r\n      while J &lt; AMsgPackChild.Count do\r\n        begin\r\n        CopyChild(AMsgPackChild[J], AJsonChild.Add);\r\n        Inc(J);\r\n        end;\r\n      end;\r\n    mptMap:\r\n      begin\r\n      AJsonChild.DataType := jdtObject;\r\n      J := 0;\r\n      while J &lt; AMsgPackChild.Count do\r\n        begin\r\n        AChild := AMsgPackChild[J];\r\n        CopyChild(AChild, AJsonChild.Add(AChild.Name));\r\n        Inc(J);\r\n        end;\r\n      end;\r\n  end;\r\n  end;\r\n\r\nbegin\r\nAJson.Clear;\r\nI := 0;\r\nwhile I &lt; AMsgPack.Count do\r\n  begin\r\n  AChild := AMsgPack[I];\r\n  CopyChild(AChild, AJson.Add(AChild.Name));\r\n  Inc(I);\r\n  end;\r\nend;<\/pre>\n<p>\u4e0a\u9762\u63d0\u4f9b\u4e86\u4e24\u4e2a\u51fd\u6570\uff0cJsonToMsgPack \u7528\u4e8e\u76f4\u63a5\u5c06\u51fd\u6570\u5185\u5bb9\u8f6c\u6362\u5230 TQMsgPack \u5bf9\u8c61\uff0cMsgPackToJson \u51fd\u6570\u6267\u884c\u53cd\u8fc7\u7a0b\uff0c\u7528\u4e8e\u5c06 MsgPack \u7684\u5185\u5bb9\u8f6c\u6362\u4e3a Json \u683c\u5f0f\u3002\u7531\u4e8e MsgPack \u652f\u6301\u7684\u7c7b\u578b\u8981\u6bd4 Json \u66f4\u591a\u4e00\u70b9\uff0c\u6240\u4ee5\u8fd9\u4e2a\u8f6c\u6362\u4f1a\u4e22\u5931\u4e00\u4e9b\u7c7b\u578b\u7684\u4fe1\u606f\uff0c\u8fd9\u70b9\u8fd8\u8bf7\u6ce8\u610f\u3002<\/p>\n<p>\u8981\u76f4\u63a5\u5c06 MsgPack \u7684\u5185\u5bb9\u4fdd\u5b58\u5230 Json \u683c\u5f0f\u7684\u5b57\u7b26\u4e32\u4e2d\uff0c\u76f4\u63a5\u7528 TQMsgPack.AsJson \u5373\u53ef\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"<p>procedure JsonToMsgP [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"site-sidebar-layout":"default","site-content-layout":"","ast-site-content-layout":"default","site-content-style":"default","site-sidebar-style":"default","ast-global-header-display":"","ast-banner-title-visibility":"","ast-main-header-display":"","ast-hfb-above-header-display":"","ast-hfb-below-header-display":"","ast-hfb-mobile-header-display":"","site-post-title":"","ast-breadcrumbs-content":"","ast-featured-img":"","footer-sml-layout":"","ast-disable-related-posts":"","theme-transparent-header-meta":"","adv-header-id-meta":"","stick-header-meta":"","header-above-stick-meta":"","header-main-stick-meta":"","header-below-stick-meta":"","astra-migrate-meta-layouts":"default","ast-page-background-enabled":"default","ast-page-background-meta":{"desktop":{"background-color":"var(--ast-global-color-4)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"ast-content-background-meta":{"desktop":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"footnotes":""},"categories":[69,8,9,7,44],"tags":[42,49,173,47],"class_list":["post-1629","post","type-post","status-publish","format-standard","hentry","category-c-builder","category-delphi","category-qdac","category-qjson","category-qmsgpack","tag-json","tag-messagepack","tag-msgpack","tag-47"],"views":8818,"_links":{"self":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/1629","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=1629"}],"version-history":[{"count":2,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/1629\/revisions"}],"predecessor-version":[{"id":1631,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/1629\/revisions\/1631"}],"wp:attachment":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=1629"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=1629"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=1629"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}