Datasnap客户端用FDStoredProc怎么传递对象参数
服务端
function TMethods.Objects(AObjects: TObjectsInfo): TDataset;
客户端
procedure TMain.Button1Click(Sender: TObject);
var
A:TObjectsInfo;
begin
inherited;
A:=TObjectsInfo.Create;
A.Category:='A6812A51-0429-4F86-AFF5-6F5BB945C4C4';
FDConnection1.Connected:=True;
FDStoredProc1.StoredProcName:='TMethods.Objects';
FDStoredProc1.Prepare;
FDStoredProc1.ParamByName('AObjects').
FDStoredProc1.Active:=True;
客户端FDStoredProc1.ParamByName('AObjects'). 怎么赋值为 A