皮皮网

【坦克大战jqery源码】【fwrite源码】【揉搓(源码】易语言电脑监控源码_易语言监控程序

时间:2024-12-24 21:56:56 来源:tar.gz压缩源码

1.?易语言电语????Ե??Լ??Դ??
2.易语言服务器端怎么连接客户端的摄像头!最好有一个简单的脑监源码 就连接一个摄像头

易语言电脑监控源码_易语言监控程序

?????Ե??Լ??Դ??

       月数不好定,因为每个月天数不一样。控源坦克大战jqery源码算到天就行了。码易

       代码如下:

       .版本 2

       .支持库 spec

       .子程序 _按钮1_被单击

       .局部变量 运行时间,监控fwrite源码 整数型, , , 毫秒

       运行时间 = 取启动时间 ()

       调试输出 (取毫秒到天 (运行时间))

       .子程序 取毫秒到天, 文本型

       .参数 参_秒, 整数型

       .局部变量 参_秒, 整数型

       .局部变量 天, 整数型

       .局部变量 小时, 整数型

       .局部变量 分钟, 整数型

       .局部变量 秒, 整数型

       参_秒 = 取启动时间 () ÷

       天 = 参_秒 ÷ ÷ ÷

       小时 = (参_秒 - 天 × × ) ÷

       分钟 = (参_秒 - 天 × × - 小时 × ) ÷

       秒 = 参_秒 %

       返回 (到文本 (天) + “天” + 到文本 (小时) + “小时” + 到文本 (分钟) + “分钟” + 到文本 (秒) + “秒”)

易语言服务器端怎么连接客户端的摄像头!最好有一个简单的程序揉搓(源码源码 就连接一个摄像头

       所用组件和支持库、变量:

一、易语言电语接收端程序编写

       1.支持库:视频聊天支持库

       2.接送端全局变量及组件

       全局变量 音频输出设备,脑监 文本型

       组件 多媒体播放器 说明:播放接收到的视频图像

       组件 服务器 说明:接收视频数据

       组件 时钟 说明:用于检测接收远程数据库速度

       组件 标签 说明:显示接收远程数据数据速度

       组件 窗口1 说明:设置输出音频

       组件 多媒体设备枚举器 说明:获取音频设备

       组件 组合框 说明:列出音频设备

       3.接收视频窗口设置-启动窗口                         

       4.启动窗口-窗口程序集代码

.版本 2

       .支持库 eChat

       .程序集 窗口程序集_启动窗口

       .程序集变量 流量计数, 整数型

       .子程序 __启动窗口_创建完毕

       载入 (窗口1, , 真)

       多媒体播放器1.设置视频输出窗口 ()

       多媒体播放器1.设置音频输出设备 (音频输出设备)

       多媒体播放器1.设置缓存时间 (, )

       多媒体播放器1.启动 ()

       .子程序 _时钟1_周期事件

       标签_流量.标题 = “流量:” + 到文本 (到整数 (流量计数 ÷ )) + “ KB/S”

       流量计数 = 0

       .子程序 _服务器1_数据到达

       .局部变量 远程视频数据, 字节集

       远程视频数据 = 服务器1.取回数据 ()

       流量计数 = 流量计数 + 取字节集长度 (远程视频数据)

       多媒体播放器1.追加字节集 (远程视频数据)

       .子程序 __启动窗口_可否被关闭, 逻辑型

       多媒体播放器1.停止 ()

       5.窗口1设置

       6.窗口1-窗口程序集代码

.版本 2

       .支持库 eChat

       .程序集 窗口程序集_窗口1

       .程序集变量 音频输出设备数组, 音频输入设备, , "0"

       .子程序 _窗口1_创建完毕

       .局部变量 i, 整数型

       音频输出设备数组 = 多媒体设备枚举器1.取音频输入设备列表 ()

       .计次循环首 (取数组成员数 (音频输出设备数组), i)

           组合框1.加入项目 (音频输出设备数组 [i].设备名称, )

       .计次循环尾 ()

       组合框1.现行选中项 = 0

       .子程序 _按钮1_被单击

       音频输出设备 = 音频输出设备数组 [组合框1.现行选中项 + 1].设备标识

       销毁 ()

       接收端设置完成。

二、控源发送端程序编写

       1.支持库:视频聊天支持库

       2.接送端全局变量及组件

       全局变量 视频输入设备,码易 文本型  说明:设置用于发送视频的设备

       全局变量 音频输入设备, 文本型 说明:设置用于发送音频的设备

       组件 多媒体采集器 说明:用于采集视频和音频数据

       组件 客户 说明:发送视频和音频数据

       组件 标签 说明:用于显示相关说明提示.

       组件 编辑框 说明:设置接收端的IP和端口

       组件 选择框 说明:设置是否发送音频数据选项

       3.启动窗口-发送端窗口设计

       4.启动窗口-窗口程序集代码

.版本 2

       .支持库 eChat

       .程序集 窗口程序集1

       .子程序 __启动窗口_创建完毕

       载入 (窗口1, , 真)

       .子程序 _按钮1_被单击

       .局部变量 帧率, 整数型

       .如果 (客户1.连接 (编辑框_目标IP地址.内容, 到整数 (编辑框_目标端口.内容)))

           .如果真 (多媒体采集器1.打开视频输入设备 (, , , , , ) = 假)

               信息框 (“没有视频输入设备!”,监控 0, )

               返回 ()

           .如果真结束

           帧率 = 8

           .如果真 (选择框1.选中)

               多媒体采集器1.打开音频输入设备 (, , , 1)

           .如果真结束

           多媒体采集器1.设置视频编码器参数 (0, 帧率, 帧率 × 2 - 1, , , 4, 7, , 0.6, 2)

           .如果真 (选择框1.选中)

               多媒体采集器1.设置音频编码器参数 ()

           .如果真结束

           多媒体采集器1.启动 ()

           按钮1.禁止 = 真

           选择框1.禁止 = 真

           编辑框_目标IP地址.禁止 = 真

           编辑框_目标端口.禁止 = 真

       .否则

           信息框 (“请先打开 [接收端] !”,程序 0, “连接失败”)

       .如果结束

       .子程序 _多媒体采集器1_获得编码数据

       .参数 数据地址, 整数型

       .参数 数据长度, 整数型

       客户1.发送数据 (指针到字节集 (数据地址, 数据长度))

       .子程序 __启动窗口_可否被关闭, 逻辑型

       多媒体采集器1.停止 ()

       4.窗口1,设计

       5.窗口-窗口程序集代码

.版本 2

       .支持库 eChat

       .程序集 窗口程序集2

       .程序集变量 视频输入设备数组,易语言电语jtbc源码 视频输入设备, , "0"

       .程序集变量 音频输入设备数组, 音频输入设备, , "0"

       .子程序 _窗口1_创建完毕

       .局部变量 n, 整数型

       视频输入设备数组 = 多媒体设备枚举器1.取视频输入设备列表 ()

       音频输入设备数组 = 多媒体设备枚举器1.取音频输入设备列表 ()

       .计次循环首 (取数组成员数 (视频输入设备数组), n)

           组合框_视频输入.加入项目 (视频输入设备数组 [n].设备名称, )

       .计次循环尾 ()

       组合框_视频输入.现行选中项 = 0

       .计次循环首 (取数组成员数 (音频输入设备数组), n)

           组合框_音频输入.加入项目 (音频输入设备数组 [n].设备名称, )

       .计次循环尾 ()

       组合框_音频输入.现行选中项 = 0

       .子程序 _按钮1_被单击

       视频输入设备 = 视频输入设备数组 [组合框_视频输入.现行选中项 + 1].设备路径

       音频输入设备 = 音频输入设备数组 [组合框_音频输入.现行选中项 + 1].设备标识

       销毁 ()

       发送端设置完成。

脑监

脑监

推荐资讯
暑期商機!統一夏日福袋抽180萬「黃金」 全聯、大潤發頭獎送休旅車

暑期商機!統一夏日福袋抽180萬「黃金」 全聯、大潤發頭獎送休旅車

8縣市防大雷雨!氣象署呼籲:注意雷擊及強陣風

8縣市防大雷雨!氣象署呼籲:注意雷擊及強陣風

广州多区解除临时管控区域,南周记者直击广州大桥恢复交通

广州多区解除临时管控区域,南周记者直击广州大桥恢复交通

「原子筆可以測出洗面乳的清潔力? 」 破解洗臉迷思

「原子筆可以測出洗面乳的清潔力? 」 破解洗臉迷思

豪大雨+閃電不斷! 松山、嘉義機場暫停地面作業、部分航班恐延誤

豪大雨+閃電不斷! 松山、嘉義機場暫停地面作業、部分航班恐延誤

藝人NONO被控性侵7罪起訴 士院下午首開庭

藝人NONO被控性侵7罪起訴 士院下午首開庭

copyright © 2016 powered by 皮皮网   sitemap