MTS的分发问题

你是如何实现client和server之间的通讯的。

解决方案 »

  1.   

    server会生成一个_tlb.pas
    client使用这个pas
    procedure TForm2.Button1Click(Sender: TObject);
    var
      aObj : Iatest;
    begin
      aObj := Coatest.CreateRemote('kxy');
      ShowMessage(FormatDateTime('yyyy-mm-dd',aObj.getServerTime));
    end;
      

  2.   

    已经在客户机运行了Server上导出的.msi文件
      

  3.   

    在服务器上有没有注册以下DLL?
     (1) v2.0 stdole, (C:\WINNT\System32\STDOLE2.TLB)
     (2) v4.0 StdVCL, (C:\WINNT\System32\STDVCL40.DLL)
     (3) v1.0 Midas, (C:\WINNT\System32\midas.dll)
      

  4.   

    那么你有没有在新机器上设置MTS组件的激活控制。
      

  5.   

    这么说吧
    我的两台机器都是Win2000,都安装了delphi5
    我再一台上写程序，Server和Client，通过后，把Client弄到另外一个机器上，就是这样
      

  6.   

    是不是没有regsrv32 server.dll
      

  7.   

    服务端和客户端也要注册这个Server.dll
      

  8.   

    应该注意以下： 
    v4.0 StdVCL, (C:\WINNT\System32\STDVCL40.DLL) 
    v1.0 Midas, (C:\WINNT\System32\midas.dll) 
    v2.0 stdole, (C:\WINNT\System32\STDOLE2.TLB)