调用咏南中间件插件演示


function GetSvrData(const accountNo, defineId: WideString; inParams: OleVariant): OleVariant; virtual; abstract;
// accountNo,帐套编号
// defineId=3位插件编号+2位自定义编号,defineId必须是唯一的
// inParams,TDataSet.Params的OLEVARIANT序列,如果没有输入参数就赋值NULL,否则 PackageParams()序列TPARAMS为OLEVARIANT
// 返回:NULL--默认不返回结果,非NULL--返回结果数据

客户端调用这个远程方法来调用服务端插件
客户端调用示例:
示例一:
clientdataset1.data:= GetSvrData('0', '12301', null);
示例二:

var

  p:tparams;
begin

p:=tparams.create(nil);
p.Clear;
p.CreateParam(ftString, 'paramName', ptInput).Value := 'xxx';
clientdataset1.data:= GetSvrData('0', '12301', PackageParams(p));

p.free;
end;

posted @   delphi中间件  阅读(449)  评论(0编辑  收藏  举报
编辑推荐:
· .NET Core 中如何实现缓存的预热?
· 从 HTTP 原因短语缺失研究 HTTP/2 和 HTTP/3 的设计差异
· AI与.NET技术实操系列:向量存储与相似性搜索在 .NET 中的实现
· 基于Microsoft.Extensions.AI核心库实现RAG应用
· Linux系列:如何用heaptrack跟踪.NET程序的非托管内存泄露
阅读排行:
· TypeScript + Deepseek 打造卜卦网站:技术与玄学的结合
· Manus的开源复刻OpenManus初探
· AI 智能体引爆开源社区「GitHub 热点速览」
· 三行代码完成国际化适配,妙~啊~
· .NET Core 中如何实现缓存的预热?
历史上的今天:
2015-06-14 粘包的处理
点击右上角即可分享
微信分享提示