掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
JsonSerializerでのデータ読込 (ID:151159)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
とりあえず、動いたのが以下ですね。 uses System.JSON.Serializers; procedure TForm1.Button1Click(Sender: TObject); type TKihonInfo=Record KjnCode:String; end; TNenchoInfo=Record StatusId:String; end; TResult=Record KihonInfo:TKihonInfo; NencyoInfo:TNenchoInfo; end; TRoot=record ReturnCode:Integer; ReturnMsg:String; Result:Array of TResult; end; var st:string; js:TJsonSerializer; root:TRoot; begin st:='{'+ '"ReturnCode":0,'+ '"ReturnMsg":"処理は正常に終了しました。",'+ '"Result":['+ ' {'+ ' "KihonInfo":{"KjnCode":"0000002"},'+ ' "NencyoInfo":{"StatusId":"3"}'+ ' },'+ ' {'+ ' "KihonInfo":{"KjnCode":"0000003"},'+ ' "NencyoInfo":{"StatusId":"2"}'+ ' },'+ ' null'+ ']'+ '}'; js:=TJsonSerializer.Create; root:=js.Deserialize<TRoot>(st); end; はずしていたらすいません。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.