易语言源码怎么打开就是这样的啊有图!

易语言源码怎么打开就是这样的啊有图!,第1张

你打开的源码应该是从网上下载到电脑里的,但是呢,那个源码包里面没有那个模块哦。
去网上下载一个一样模块就可以了。
我帮你找到了。
你在百度打上“超级模块2012新年礼物(63永久免费版)”
第一个就是了,那个3G安全网共享了这个模块哦。
如果我回答的好,就选我为满意答案吧!
另外宣传一下知道团队:大汉帝国。
欢迎各路神仙加入!

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

一、接收端程序编写
1支持库:视频聊天支持库
2接送端全局变量及组件
全局变量 音频输出设备, 文本型
组件 多媒体播放器 说明:播放接收到的视频图像
组件 服务器 说明:接收视频数据
组件 时钟 说明:用于检测接收远程数据库速度
组件 标签 说明:显示接收远程数据数据速度
组件 窗口1 说明:设置输出音频
组件 多媒体设备枚举器 说明:获取音频设备
组件 组合框 说明:列出音频设备

3接收视频窗口设置-启动窗口                         
4启动窗口-窗口程序集代码

版本 2
支持库 eChat
程序集 窗口程序集_启动窗口
程序集变量 流量计数, 整数型
子程序 __启动窗口_创建完毕
载入 (窗口1, , 真)
多媒体播放器1设置视频输出窗口 ()
多媒体播放器1设置音频输出设备 (音频输出设备)
多媒体播放器1设置缓存时间 (1000, 3000)
多媒体播放器1启动 ()
子程序 _时钟1_周期事件
标签_流量标题 = “流量:” + 到文本 (到整数 (流量计数 ÷ 1024)) + “ 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打开视频输入设备 (, , 320, 240, 320, 240) = 假)
        信息框 (“没有视频输入设备!”, 0, )
        返回 ()
    如果真结束
    帧率 = 8
    如果真 (选择框1选中)
        多媒体采集器1打开音频输入设备 (, 16000, 16, 1)
    如果真结束
    多媒体采集器1设置视频编码器参数 (0, 帧率, 帧率 × 2 - 1, 30, 46, 4, 7, 16, 06, 2)
    如果真 (选择框1选中)
        多媒体采集器1设置音频编码器参数 (16000)
    如果真结束
    多媒体采集器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]设备标识
销毁 ()

发送端设置完成。


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/10568204.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-09
下一篇 2023-05-09

发表评论

登录后才能评论

评论列表(0条)

保存