你好,欢迎来到电脑编程技巧与维护杂志社! [免费注册][请登录 杂志社简介广告服务读者反馈编程社区  
合订本订阅
 
 
您的位置:杂志经典 / 编程语言
多路音频实时采样压缩存盘DLL的实现和使用(六)
 

bool _stdcall In878Audio(int num,int Iflag, int auformat,HWND sendhwnd)//初始化音频输入

bool _stdcall  apiSetAudioIn(int num,int PFlag,int  fmt)//设置输入音频

bool _stdcall  apiStarAudioIn(int num)//开始音频输入

 

3.5  WINIO.DLL函数在VB6.0调用

VB6.0中开发程序,要调用WINIO.DLL中的函数, 函数的封装要符合VB6.0开发环境给定的规则, 才能顺利调用。

 

上述接口函数在(VB)主程序中调用,要在模块文件中封装如下:

Declare Function talk729decoderinit Lib "WinIo.dll" () As Boolean

Declare Function DecodeAudioData Lib "WinIo.dll" (ByVal lpin As Long, ByVal inlen As Long, ByVal lpout As Long, ByVal lpoutlen As Long) As Boolean

Declare Function sendhwndtlp Lib "WinIo.dll" (ByVal vbtexthwnd As Long, ByVal vblpmax As Long, ByVal vbstorekhwnd As Long, ByVal vblpalldata1 As Long, ByVal vblpalldata2 As Long, ByVal vblpcodedata As Long) As Boolean '

Declare Function In878Audio Lib "WinIo.dll" (ByVal apinum As Long, ByVal apipflag As Long, ByVal apiauformat As Long, ByVal apisendhwnd As Long) As Boolean

  Declare Function SetAudioIn Lib "sd878AUD" (ByVal channum As Long, ByVal PanelFlag As Long, ByVal AudioFmt As Long) As Long

Declare Function StarAudioIn Lib "sd878AUD" (ByVal channum As Long) As Long

  Declare Function SetAudioIn Lib "sd878AUD" (ByVal channum As Long, ByVal PanelFlag As Long, ByVal AudioFmt As Long) As Long

 

3.6 VB 中变量指针的使用

VB中变量的指针用函数VarPtrVAR)计算,long类型,如下向DLL传送数组指针:

Dim ptr as long 

Dim allwdata(500000) as byte ’定义字节数组

ptr = VarPtr(allwdata(0)) ’计算数组指针

 sendhwndtlp(…,…, ptr,…)’DLL 传送指针 

 

4 结语

C程序编辑、连接为动态链接库文件,即可在 VB程序中调用有关函数, 编译生成运行代码, 运行结果, 30路音频可同时不间断压缩回放,300GB硬盘可以1个半月循环存放, 回放话音清晰。

  推荐精品文章

·探析云计算下应用软件用户数据安全问题
·地理空间集束线可视化表达
·Android智能净水机APP开发(一)
·2018年12月目录  
·springAOP的思想和设计以及实现
·LeetCode332. 重新安排行程
·基于fastjson的微信模板消息的封装与实现…
·WEB日志清洗 - java代码
·关于C++内存生长
·C++继承——宠物的生长
·python——实现名片管理器
·Clion c++调用c动态链接库
·【C# 重构】-散落的知识
·Java SE—面向对象 this关键字的作用

  联系方式
TEL:010-82561037
Fax: 010-82561614
QQ: 100164630
Mail:gaojian@comprg.com.cn

  友情链接
 
Copyright 2001-2010, www.comprg.com.cn, All Rights Reserved
京ICP备06048724号,电话/传真:010-82561037 82561614 ,Mail:gaojian@comprg.com.cn
地址:北京市海淀区长春桥路5号6号楼1209室,邮编:100089