url := "https://opi.tinysoft.com.cn/Service/OPS/Register/";
durl := "https://opi.tinysoft.com.cn/Service/OPS/data/";
username := "yourname"; //需换成天软账号
password := "yourpass"; //需换成对应密码
sessionkey := ""; //支持特殊租户(调用功能列表为*)
opslist := "hahaha,__subscription__/time"; //要注册的TS-OPS服务列表
ops := new opsserver(durl, "", opslist, "myopscallback", "myopssubcallback", url, "", nil , username, password, sessionkey, false );
//注册TS-OPS服务,并启动监听
while ops.waitmessage(50000000) do
begin
end;
其中,回调函数myopscallback、myopssubcallback已公用,用户可以在客户端中查看具体内容。