皮皮网

【dif源码】【usc信用盘源码】【体育信用网源码】易语言监控源码_易语言实时监控源码易语言源码祝福易语言刷商城

时间:2024-11-23 07:50:00 分类:热点 来源:jsp图片网站源码

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

易语言监控源码_易语言实时监控源码易语言源码祝福易语言刷商城

?????Լ??Դ??

       月数不好定,因为每个月天数不一样。码易码祝dif源码算到天就行了。实时刷商

       代码如下:

       .版本 2

       .支持库 spec

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

       .局部变量 运行时间,监控usc信用盘源码 整数型, , , 毫秒

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

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

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

       .参数 参_秒, 整数型

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

       .局部变量 天, 整数型

       .局部变量 小时, 整数型

       .局部变量 分钟, 整数型

       .局部变量 秒, 整数型

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

       天 = 参_秒 ÷ ÷ ÷

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

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

       秒 = 参_秒 %

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

易语言服务器端怎么连接客户端的摄像头!最好有一个简单的福易体育信用网源码源码 就连接一个摄像头

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

一、易语言监语言源码易语言源语接收端程序编写

       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

       .程序集变量 视频输入设备数组,易语言监语言源码易语言源语皮皮自动发卡源码 视频输入设备, , "0"

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

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

       .局部变量 n, 整数型

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

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

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

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

       .计次循环尾 ()

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

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

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

       .计次循环尾 ()

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

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

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

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

       销毁 ()

       发送端设置完成。

控源

控源

copyright © 2016 powered by 皮皮网   sitemap