CreateRemoteComObject(const MachineName: WideString; const ClassID: TGUID)
                    ****第一个参数是机器名****
CreateComObject(const ClassID: TGUID)const ClassID: TGUID:是DCOM/COM在机器上的注册标志,也是COM的入口