高分求如何激活远程Com对象,不够再加分


unit Sys_Logins;{$WARN SYMBOL_PLATFORM OFF}interfaceuses
  Windows, ActiveX, Classes, ComObj, DfErpServer_TLB, StdVcl;type
  TLoginAccess = class(TTypedComObject, ILogin)
  protected
    {Declare ILogin methods here}
  end;implementationuses ComServ;initialization
  TTypedComObjectFactory.Create(ComServer, TLoginAccess, Class_LoginAccess,
    ciMultiInstance, tmApartment);end.如何在客户端获取激活TLoginAccess对象?要求能象SocketConnection那样激活远程Com对象.
即使用TCP/IP协议传输,可用于外部网.