咏南中间件修正了一处BUG,调用中间件插件会报:非法访问

咏南中间件修正了一处BUG,调用中间件插件会报:非法访问
将以下方法修改成如下的代码即可
function TServerMethods1.GetSvrData(const accountNo, defineId: WideString; inParams: OleVariant): OleVariant;
// 调用中间件的插件
// defineId=3位插件编号+2位自定义编号
var
p: TfrmPlugBase;
plugClass: string;
ps: TPersistent;
begin
Result := null;
try
// 从内存表获取类名,通过defineId
plugClass := GetPlugClass(defineId);
if plugClass = '' then
Exit;
// 还原出插件,通过类名
ps := FindClass(plugClass).Create;
if not assigned(ps) then
exit;
p := TfrmPlugBase(ps);
if Assigned(p) then
Result := p.GetSvrData(accountNo, defineId, inParams);

except
on e: Exception do
begin
Result := null;
Log.WriteLog('TServerMethods1.GetSvrData ' + e.Message);
end;
end;
end;

posted @   delphi中间件  阅读(279)  评论(0编辑  收藏  举报
编辑推荐:
· Linux系列:如何用heaptrack跟踪.NET程序的非托管内存泄露
· 开发者必知的日志记录最佳实践
· SQL Server 2025 AI相关能力初探
· Linux系列:如何用 C#调用 C方法造成内存泄露
· AI与.NET技术实操系列(二):开始使用ML.NET
阅读排行:
· 被坑几百块钱后,我竟然真的恢复了删除的微信聊天记录!
· 没有Manus邀请码?试试免邀请码的MGX或者开源的OpenManus吧
· 【自荐】一款简洁、开源的在线白板工具 Drawnix
· 园子的第一款AI主题卫衣上架——"HELLO! HOW CAN I ASSIST YOU TODAY
· 无需6万激活码!GitHub神秘组织3小时极速复刻Manus,手把手教你使用OpenManus搭建本
点击右上角即可分享
微信分享提示