JSON序列——主从表查询
JSON序列——主从表查询
客户端代码:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 | procedure TForm1.Button4Click(Sender: TObject); // 主从表 查询 begin var url: TynUrl := TynUrl.Create; var serial: TynJsonCross := TynJsonCross.Create; var send: TMemoryStream := TMemoryStream.Create; try url.url := Edit1.Text; url.command := 'query92' ; // 命令 url. params .Add( 'count=2' ); // 查询几个表的数据 url. params .Add( 'accountno=1' ); // 帐套号 url. params .Add( 'sql=select * from tgoods' ); // 查询SQL url. params .Add( 'sql2=select * from tunit' ); // 查询SQL2 serial.Text := IdHTTP1.Post(url.text, send); Memo1.Text := serial.Text; // serial.ReadFDMemTable(0, FDMemTable1); // serial.ReadFDMemTable(1, FDMemTable2); finally serial.DisposeOf; send.DisposeOf; url.DisposeOf; end; end; |
服务端返回JSON:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 | { "tables" : [ { "cols" : [ { "name" : "goodsid" , "size" : 8, "type" : "string" }, { "name" : "barcode" , "size" : 18, "type" : "string" }, { "name" : "goodsname" , "size" : 50, "type" : "string" }, { "name" : "pyjm" , "size" : 50, "type" : "string" }, { "name" : "gg" , "size" : 30, "type" : "string" }, { "name" : "kindid" , "size" : 8, "type" : "string" }, { "name" : "jj" , "size" : 4, "type" : "float" }, { "name" : "lsj" , "size" : 4, "type" : "float" }, { "name" : "kcxx" , "size" : 4, "type" : "float" }, { "name" : "kcsx" , "size" : 4, "type" : "float" }, { "name" : "unitid" , "size" : 8, "type" : "string" }, { "name" : "unitname" , "size" : 10, "type" : "string" }, { "name" : "kindname" , "size" : 30, "type" : "string" } ], "rows" : [ { "goodsid" : "100036" , "barcode" : "100036" , "goodsname" : "秋冬四件套哦" , "pyjm" : "" , "gg" : "" , "kindid" : "12002" , "jj" : 100, "lsj" : 430, "kcxx" : 50, "kcsx" : 5, "unitid" : "15" , "unitname" : "箱套" , "kindname" : "床上用品" }, { "goodsid" : "100050" , "barcode" : "100050" , "goodsname" : "天堂伞" , "pyjm" : "wrth" , "gg" : "" , "kindid" : "1" , "jj" : 10, "lsj" : 0, "kcxx" : 0, "kcsx" : 0, "unitid" : "15" , "unitname" : "箱套" , "kindname" : "1111" }, { "goodsid" : "100054" , "barcode" : "100054" , "goodsname" : "我们的 哎" , "pyjm" : "WMD D7" , "gg" : "" , "kindid" : "11002" , "jj" : 0, "lsj" : 0, "kcxx" : 0, "kcsx" : 0, "unitid" : "18" , "unitname" : "公斤" , "kindname" : "饮料" }, { "goodsid" : "100055" , "barcode" : "100055" , "goodsname" : "娃哈哈纯净水500ML" , "pyjm" : "WHHCJS500ML" , "gg" : "" , "kindid" : "11001" , "jj" : 0, "lsj" : 0, "kcxx" : 0, "kcsx" : 0, "unitid" : "18" , "unitname" : "公斤" , "kindname" : "奶粉" } ] }, { "cols" : [ { "name" : "unitid" , "size" : 4, "type" : "string" }, { "name" : "unitname" , "size" : 6, "type" : "string" } ], "rows" : [ { "unitid" : "11" , "unitname" : "个" }, { "unitid" : "12" , "unitname" : "双" } ] } ] } |
本文来自博客园,作者:{咏南中间件},转载请注明原文链接:https://www.cnblogs.com/hnxxcxg/p/10656990.html
【推荐】国内首个AI IDE,深度理解中文开发场景,立即下载体验Trae
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· 从 HTTP 原因短语缺失研究 HTTP/2 和 HTTP/3 的设计差异
· AI与.NET技术实操系列:向量存储与相似性搜索在 .NET 中的实现
· 基于Microsoft.Extensions.AI核心库实现RAG应用
· Linux系列:如何用heaptrack跟踪.NET程序的非托管内存泄露
· 开发者必知的日志记录最佳实践
· TypeScript + Deepseek 打造卜卦网站:技术与玄学的结合
· Manus的开源复刻OpenManus初探
· AI 智能体引爆开源社区「GitHub 热点速览」
· 三行代码完成国际化适配,妙~啊~
· .NET Core 中如何实现缓存的预热?