mormot2 json

mormot2有自己的JSON操作，適用於delphi+lazarus

uses mormot.core.variants
var DOC: TDocVariantData;     //json物件  

DOC.InitJsonFromFile(CONF);  //載入json檔案
DOC.I['connecttimeout']; 
DOC.S['loadbalance'];
doc.InitJson(); 
var ja, jo: PDocVariantData; 
ja := DOC.A['httpserver'];           //將所有靜態http服務加進字典
  for i := 0 to ja.Count - 1 do
  begin
    jo := ja._[i];
  end;