3.4开发CGI类型的Web Serviceunit MyFirstWSIntf;interfaceuses
Types, XSBuiltIns;type
IMyfirstWS = interface(IInvokable)
['{2E192180-2240-4CB1-AD1F-C9265C53D799}'] //从哪里获取
function GetWSMsg : string; stdcall;
end;implementationuses
InvokeRegistry;initialization
InvRegistry.RegisterInterface(TypeInfo(IMyFirstWS),'','');
end.我的QQ:2784303相互交流,共同进步~~先谢过~~
Types, XSBuiltIns;type
IMyfirstWS = interface(IInvokable)
['{2E192180-2240-4CB1-AD1F-C9265C53D799}'] //从哪里获取
function GetWSMsg : string; stdcall;
end;implementationuses
InvokeRegistry;initialization
InvRegistry.RegisterInterface(TypeInfo(IMyFirstWS),'','');
end.我的QQ:2784303相互交流,共同进步~~先谢过~~
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货