在Delphi中如何用Dispatch Table方式调用中间层方法(100分)

  • 主题发起人 主题发起人 herezhang
  • 开始时间 开始时间
H

herezhang

Unregistered / Unconfirmed
GUEST, unregistred user!
看了李维的《Delphi 5.x分布式多层系统应用篇》7-6至7-7两页, 照例没做成功。
多谢各位大虾指点!!!
 
原书例程如下:
var
aDisp : IrdmDemo3Disp;
begin
...
begin
aDisp := IrdmDemo3Disp(IDispatch(DComConnection1.AppServer));
aDisp.GetSystemInfo(vTime, vRDM, vThread);
...
end;
...
end;

本人使用的是SocketConnection;
多谢!!!
 
肯定能成功!你可以将失败的情况描述一下。是编译没通过还是执行到哪一步出错了?
客户端程序里要 uses 服务端的 XXXX_TLB.pas 文件
 
多谢z_cd,
我忘了将XXXX_TLB文件拷制客户端 100分给您了!!!
 
接受答案了.
 
后退
顶部