<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
<head>
<title>XBMC Websockets</title>
<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
</head>
<body>
<script language="javascript" type="text/javascript">
var ws = new WebSocket('ws://127.0.0.1:20111/jsonrpc');
ws.onopen = function (event) {
send_message("Player.GetActivePlayers");
}
ws.onmessage = function (event) {
var j = JSON.parse(event.data);
if (j.id) // response
{
switch(j.id) {
case "Player.GetActivePlayers":
var r = j.result[0];
if (r.type == 'video') {
send_message("Player.GetItem", {
"properties": ["file", "streamdetails"],
"playerid": r.playerid,
});
}
break;
case "Player.GetItem":
//alert(event.data);
var r = j.result.item;
document.getElementById("name").innerHTML = r.label;
document.getElementById("file").innerHTML = r.file;
var v = r.streamdetails.video[0];
document.getElementById("details").innerHTML = v.width + 'x' + v.height + ', ' + v.duration + 's';
break;
default:
//alert(event.data);
}
}
else // notification
{
switch(j.method) {
case "Player.OnPlay":
send_message("Player.GetActivePlayers");
break;
case "Player.OnStop":
document.getElementById("name").innerHTML = "VIDEO PLAYER STOPPED";
document.getElementById("file").innerHTML = "";
document.getElementById("details").innerHTML = "";
break;
default:
//alert(event.data);
}
}
}
function send_message(method, params) {
var msg = {
"jsonrpc": "2.0",
"method": method,
"id": method
};
if (params) {
msg.params = params;
}
ws.send(JSON.stringify(msg));
}
</script>
<div id="name"></div>
<div id="file"></div>
<div id="details"></div>
</body>
</html>
没有合适的资源?快使用搜索试试~ 我知道了~
温馨提示
delphi7写应用程序作为服务端。delphi7安装websocket组件太麻烦了,还收费。既然websocket也是一个socket,那自己解析websocket就可以了。我只实现了握手,数据帧的简单解析。可以进行除汉字外的简单收发。如果你应用不是太深的话没问题的。若是深的话估计这些简单的你都会。。。。
资源推荐
资源详情
资源评论
收起资源包目录
websocketAtd7.rar (18个子文件)
websocketAtd7
Unit1.ddp 51B
websocketClient.html 1KB
Project1.res 876B
Unit1.dcu 16KB
Unit1.~ddp 51B
qbsha1.dcu 6KB
Unit1.dfm 2KB
Project1.cfg 406B
Project1.dpr 188B
Unit1.~dfm 2KB
Project1.exe 421KB
Delphi7Websocket.doc 393KB
Project1.dof 3KB
Unit1.~pas 12KB
Unit1.pas 12KB
qbsha1.pas 9KB
ttt.html 3KB
qbsha1.~pas 9KB
共 18 条
- 1
kyo1124
- 粉丝: 4
- 资源: 7
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
最新资源
- 探索tecreate:软件开发的未来之星.zip
- 打标机项目C#源码连接扫码
- 基于SSM的房屋租赁系统的设计与实现
- xyctf:从入门到精通的实用指南.zip
- mmqrcode1714153659780.png
- Screenshot_2024-04-27-06-08-58-486_com.baidu.xin.aiqicha.jpg
- 基于Javaweb+Tomcat+MySQL的大学生公寓管理系统+sql文件.zip
- 实训作业基于javaweb的订单管理系统源码+数据库+实训报告.zip
- 多机调度问题贪心算法基于最小堆和贪心算法求解多机调度问题.zip
- 基于同态加密技术的匿名电子投票系统源码.zip
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功
- 1
- 2
前往页