delphi xe datasnap 服务器显示客户端,Delphi xe datasnap[通俗易懂]

delphi xe datasnap 服务器显示客户端,Delphi xe datasnap[通俗易懂]我想从客户端向服务端提交多个OleVariant内容.最初我想这样这实现functionSaveData(aDataArr:arrayofOleVariant;aTableArr:arrayofstring;aKeyArr:arrayofstring;varaErrorStr:string):Boolean;这样经测试不行,DATASNAP参数不能为数组.现在我用TJSONObje…

大家好,又见面了,我是你们的朋友全栈君。

我想从客户端向服务端提交多个OleVariant内容.最初我想这样这实现

function SaveData(aDataArr:array of OleVariant;

aTableArr:array of string;

aKeyArr:array of string;

var aErrorStr:string):Boolean;

这样经测试不行,DATASNAP参数不能为数组.

现在我用TJSONObject类型做为参数.

例如

客户端

msg := TJSONObject.Create;

msgtype:=TJSONPair.Create(‘MsgType’,’Data’);

idata:=ClientDataSet1.Data;

msgContent1:=TJSONPair.Create(‘MsgContent1’,idata);

idata:=ClientDataSet2.Data;

msgContent2:=TJSONPair.Create(‘MsgContent2’,idata);

msg.AddPair(msgtype);

msg.AddPair(msgContent1);

msg.AddPair(msgContent2);

server.SaveData(msg);

服务端

function SaveData(aMsg:TJSONObject):Boolean;

iMsgType:string;

idata:olevariant;

begin

iMsgType:=TJSONObject(aMsg).Get(0).JsonValue.Value;

???

end;

我这样想对不对,这试了一下,不报错,msgtype可以提出信息,olevariant就不知道怎么提取了.

请大家帮帮忙了

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 举报,一经查实,本站将立刻删除。

发布者:全栈程序员-站长,转载请注明出处:https://javaforall.net/161330.html原文链接:https://javaforall.net

赞 (0)
全栈程序员-站长的头像全栈程序员-站长


相关推荐

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

关注全栈程序员社区公众号