请问怎么样调用API函数在PB中实现播放WAV文件的功能

smalldog1984 2003-10-16 10:30:02
我有一个问题就是怎么样调用API函数在PB中实现播放WAV文件的功能!
我用下面的代码为什么没有完成这个功能,请问各位在PB中播放WAV文件这个问题中有什么好的办法呢?
环境PB8系统WIN98。

代码如下
SndPlaySoundA()和WaveOutGetNumDevs()
功能这两个函数结合起来使用用于播放.WAV 格式的文件
声明格式FUNCTION boolean SndPlaySoundA(string wavfile, uint flag) LIBRARY
"WINMM.DLL"
FUNCTION uint WaveOutGetNumDevs() LIBRARY "WINMM.DLL"
示例uint lui_NumDevs, l_mode
string ls_file
l_mode = 0
ls_file = string"c:\windows\media\chimes.wav"
lui_NumDevs = WaveOutGetNumDevs()
IF lui_NumDevs > 0 THEN
SndPlaySoundA(ls_file, l_mode)
END IF

...全文
106 14 打赏 收藏 转发到动态 举报
写回复
用AI写文章
14 条回复
切换为时间正序
请发表友善的回复…
发表回复
888888888888 2003-11-05
  • 打赏
  • 举报
回复
关注
紫焰月读 2003-11-05
  • 打赏
  • 举报
回复
SndPlaySound 有两个,一个是ANSI版本的叫 SndPlaySoundA,一个是 Unicode 版本的叫 SndPlaySoundW,声明时注意用一个 Alias For 就行了
dingzhaofeng 2003-11-03
  • 打赏
  • 举报
回复
有这样的控件!
smalldog1984 2003-10-22
  • 打赏
  • 举报
回复
yjhyn(飘零的花) :老大请不要重复我行不行?I服了YOU!!!不过还是要感谢你回帖!谢谢!!
yjhyn 2003-10-21
  • 打赏
  • 举报
回复
SndPlaySoundA()和WaveOutGetNumDevs()
功能这两个函数结合起来使用用于播放.WAV 格式的文件
声明格式FUNCTION boolean SndPlaySoundA(string wavfile, uint flag) LIBRARY
"WINMM.DLL"
FUNCTION uint WaveOutGetNumDevs() LIBRARY "WINMM.DLL"

uint lui_NumDevs, l_mode

string ls_file
l_mode = 0
ls_file = string(c:\windows\media\chimes.wav)
lui_NumDevs = WaveOutGetNumDevs()
IF lui_NumDevs > 0 THEN
SndPlaySoundA(ls_file, l_mode)
END IF
smalldog1984 2003-10-20
  • 打赏
  • 举报
回复
谢谢楼上的.我知道他们是来干什么的.我也知道怎么用.我想问问为什么我那样用不对呀!!!
yjhyn 2003-10-20
  • 打赏
  • 举报
回复
WaveOutGetNumDevs()

sndPlaySoundA()

使用这两个函数可以用来播放所以*.wav的文件,是windows系统函数。
smalldog1984 2003-10-18
  • 打赏
  • 举报
回复
WaveOutGetNumDevs()函数是什么意思
sndPlaySoundA()函数是什么意思呢???有没有那里能查到他们的帮助呢?
longdrang 2003-10-17
  • 打赏
  • 举报
回复
/*******************************************************************/
//其中: modeofplay
//0 - 同步播放
//1 - 异步播放
//2 - 如果找不到?音文件,不使用缺省的?音文件
//3 - 第1?与第2?
//8 - 循?播放直到下一?sndPlaysound
//10- 不停止播放

//返回值:
//0 出?(通常是文件?有找到)
//1 成功
/*******************************************************************/

uint lui_NumDevs

lui_NumDevs = WaveOutGetNumDevs()
IF lui_NumDevs > 0 THEN
sndPlaySoundA( "123.wav",8)
END IF

我測試過完全可行.

smalldog1984 2003-10-17
  • 打赏
  • 举报
回复
weipd(谋) :
这个方法我还要试试,不过我的同事也给我讲过这个办法,我试了一下还是不行。不过调用的API函数名字不一样,方法倒是一致的。
谢谢你的回帖!
wantsong 2003-10-16
  • 打赏
  • 举报
回复
利用ocx也很方便的,调用mediaplayer
weipd 2003-10-16
  • 打赏
  • 举报
回复
string path
sndPlaySoundA(path,1)
就可以了,path 是wav文件的路径。
smalldog1984 2003-10-16
  • 打赏
  • 举报
回复
对不起,代码应该是
ls_file = "c:\windows\media\chimes.wav"
但是即使这样还是会报不知名的函数错误.
我不想用ocx.我就想试试api.
谢谢上面两位朋友的回帖!!!
chrisfy 2003-10-16
  • 打赏
  • 举报
回复
ls_file = string"c:\windows\media\chimes.wav"??????不应有string或""是括号吧
pb案例开发集锦,适合初学者学习,有经验也可以看看,里头有很多巧妙的应用。我在这里列出所有的目录。 源程序使用说明一、功能 本光碟提供了与图书完全一致的程序源代码和编译好的可执行文件,读者可以直接执行这些可执行文件,以便更加直观的体会案例运行的效果;如果想进一步研究案例的源代码,可以将相应文件夹下的文件在PowerBuilder10.0开发环境打开,然后编译运行。二、内容 本光碟包含图书的每个案例的源代码、可执行文件和所有资源文件,具体组织结构如下: 第1章 窗体与控件 案例1 创建应用、窗口与控件 案例2 目录浏览器 案例3 文件浏览器 案例4 图片浏览器 案例5 用户密码验证 案例6 等待窗口 案例7 使用滚动条 案例8 使用进度条 案例9 电子时钟 案例10 修改系统时间 案例11 颜色对话框 案例12 IP地址编辑框 案例13 人民币大小写金额的转换 第2章 菜单与MDI窗口 案例1 创建窗口菜单 案例2 带底图的MDI窗口 案例3 带浮动图标的工具栏 案例4 隐藏和显示任务栏 案例5 右键菜单 案例6 调用HtmlHelp文件 案例7 动态打开窗口 案例8 记事本 第3章 数据处理基础 案例1 创建数据库 案例2 设置表格颜色 案例3 比例图显示数据 案例4 动态设置数据窗口风格 案例5 使用选项卡 案例6 使用下拉子数据窗口 案例7 动态设立数据窗口 案例8 在窗口编辑数据 案例9 学生学号排序 案例10 数据窗口排序 案例11 利用DataStore共享数据 案例12 关联与条件查询 案例13 数据查询 案例14 模糊查询 案例15 键盘模拟器 案例16 将数据保存到Word文件 案例17 将数据保存到Excel文件 第4章 数据库高级操作 案例1 定义数据窗口的检索参数 案例2 窗口之间传递函数 案例3 在SQL查询使用变量 案例4 在Grid类型报表的Header区增加文字标题 案例5 使用动态SQL查询数据 案例6 两种不同查询方法的比较 案例7 外部数据源窗口的使用 案例8 更新由多个表生成的数据窗口 案例9 把数据窗口信息存为Html格式文件 案例10 数据窗口查询模式的应用 案例11 数据窗口的树形视图表示 案例12 数据窗口实现字段的组合 案例13 数据窗口的数据共享 第5章 网络与通信 案例1 Ping指定IP地址范围内的计算机 案例2 实现串口通信 案例3 制作收发电子邮件程序 案例4 使用组件收发电子邮件 案例5 Web服务器程序 案例6 调用WinFax发送传真 案例7 超级链接的制作 案例8 使用超级链接控件 案例9 获取本机名和IP地址 案例10 使用多线程下载网页 案例11 Socket通信客户端 案例12 Socket通信服务器端 案例13 FTP客户程序 第6章 API函数的应用 案例1 使用API函数实现透明窗体 案例2 制作位图菜单 案例3 控制窗口 案例4 获得系统信息 案例5 创建文件和目录 案例6 显示和设置时间 第7章 报表打印 案例1 报表打印预览 案例2 报表的打印 案例3 数据窗口的预览和打印实现 案例4 使用混合编程实现打印控制 案例5 使用PowerPrinter动态链接库实现打印扩展 案例6 数据窗口的打印 第8章 多媒体与图形 案例1 播放Gif动画 案例2 播放Flash动画 案例3 播放AVl文件 案例4 可连续播放的音乐播放器 案例5 带记忆的MP3播放器 案例6 播放WAV 案例7 播放指定的AVI-MID-WAV文件 案例8 CD播放器 案例9 播放光驱内所有VCD节目 案例10 生肖查询 案例11 位图动画 案例12 浏览大幅BMP图片 案例13 利用Picture制作小动画 案例14 制作屏幕保护程序 案例15 设计滚动字幕 案例16 制作动画光标 第9章 文件与系统 案例1 判断驱动器属性 案例2 清空回收站 案例3 使应用程序窗口总在最顶层 案例4 将程序设置成自动执行的程序 案例5 控制光驱的弹开与关闭 案例6 修改显示器像素色值 案例7 获得应用程序的当前路径 案例8 获取磁盘序列号 案例9 在程序启动ODBC数据源管理器 案例10 实现定时关闭计算机 第10章 其他技巧与应用 案例1 Windows窗口的枚举 案例2 多线程的实现 案例3 使用PB获得CPU的速度、型号和生产商 案例4 磁盘格式化的实现 第11章 综合应用案例 案例1 库存管理系统 案例2 C/S应用程序设计案例――工资管理 案例3 B/S应用程序举例―――简单链接与查询 三、运行环境 系统环境:Windows XP/Intel P4/1.7G/256M 开发工具:PowerBuilder10.0+Power Dynamo3.6 IIS信息服务器:Internet Information Server 5.0 数据库系统:Adaptive Server Anywhere 8.0 网页设计工具:FrontPage 2000四、注意事项 1、运行本书涉及数据库的实例时,必须设置数据库连接,关于数据库连接的设置在本书"第3章 案例1"有详细说明。读者自己配置数据库,运行前必须重新设置路径。所有使用到的数据库文件都在光盘根目录下“数据库”文件夹内,请根据本机有关设置重新定位源代码相关设置。数据库有问题的请仔细调试,详细情况看设置。 2、界面设置图片的实例必须重新设置图片路径,大部分图片在在本例目录下,读者也可以自行选择图片。许多实例运行后的界面没有图片,与书稿的图不一致,请仔细检查是否是源代码的路径的问题,是否是因为用的绝对路径的问题。 3、少数几个程序需要特殊的设置,特别是客户服务器结构的应用程序,请参看书的具体设置。 4、少数程序可执行文件出现问题可生成EXE+PBD模式,问题就可以解决!光盘例程出现的问题:FAQ:第2章 案例2 无图,运行前必须重新设置路径第5章 案例1 Ping不了只有单独连接因特网正常运行,通过局域网、宽带等连接因特网(或曾经连接过局域网),IP地址已经多次改变,不符合PING的原理。第5章实例4 不能建立邮件列表需要设置端口、服务器参数等第5章实例8 无图,运行前必须重新设置路径
目录: 1 Uppas40.htm Delphi 4增訂的Object Pascal 19K 2 Api_printer.htm Api函数列表-与打印有关 30K 3 Autocreate.htm 在Delphi3程序自动检测、建立数据库别名 7K 4 Autoxize.htm DELPHI自适应表单的实现 3K 5 Bat.htm 在Delphi利用Tbatch组件完成数据批处理 5K 6 Bde.htm 如何在注册表注册BDE 2K 7 Bjjlb.htm Delphi编辑俱乐部 4K 8 Cgi_1.htm CGI技术及其开发 11K 9 Cgi_2.htm CGI技术及其开发(二) 12K 10 Chang_backmap.htm 用Delphi实现壁纸更换 3K 11 Change_ip_dns.htm 任何动态改变/添加网络设置的 TCP/IP 的 DNS 地址 1K 12 Colorcour.htm 让彩色光标出现在Delphi程序 2K 13 Compon_mk.htm 面向组件的系统开发方法 2K 14 Comtech.htm COM/DCOM如何传递数组 2K 15 Comvsdcom.htm COM/DCOM的区别与联系 2K 16 Cookite.htm Delphi 3Cookie的建立使用 6K 17 Copy_screen.htm 一个实用的Delphi屏幕拷贝程序的设计 11K 18 Create_oracle7.htm 开发基于ORACLE7数据库的管理信息系统 9K 19 Cs_fast.htm 提高客户机/服务器应用系统性能的一些方法 8K 20 Def_color_dlg.htm 用Delphi实现自定义颜色对话框及其构件 12K 21 Def_preview.htm 自定义快速报表的打印预览窗口 6K 22 Delete.htm 如何把文件删除到回收站 1K 23 Delphi_c.htm 在Delphi与C++之间实现函数与对象共享 7K 24 Delphi_err.htm Delphi编译错误文手册 34K 25 Delphi_net1.htm DELPHI与INTERNET 34K 26 Delphi_net2.htm DELPHI与INTERNET 46K 27 Delphi_quick_develop.htm Delphi之快速设计(程序设计篇) 8K 28 Delphi_quick_develop2.htm Delphi之快速设计(界面篇) 3K 29 Delphi23_io.htm 在DELPHI2.0/3.0直接操作端口 3K 30 Delphivspb.htm 开发AS/400应用系统PB5与Delphi3的比较 9K 31 Device_isok.htm 检查驱动器是否就绪 1K 32 Dtccw03.htm 资源文件在DELPHI的使用 10K 33 Dttray.htm 如何创建任务栏的应用程序 11K 34 Edit_sysmenu.htm 控制系统菜单 3K 35 Fix_sybase.htm 如何恢复Sybase SQL Anywhere的数据库 4K 36 Fixsysbase_in.htm 解决sybase用户数据库不能进入故障的一种方法 5K 37 From_move.htm 用Delphi实现无边界窗体的移动 3K 38 Function.htm 部分函数、命令、属性文说明 13K 39 Get_form.htm Win95/98下监控运行的其他程序 2K 40 Get_info.htm 使用Delphi获取系列信息 3K 41 Get_net_friend.htm 如何在程序动态取得Win95/98的网络邻居的工作组及计算机名 12K 42 H_sort.htm 在DELPHI用线程排序 4K 43 Happymouse.htm 用Delphi编制趣味动画鼠标 3K 44 Hint.htm 改造HINT的输出方式 5K 45 Howto_chinese_delphi.htm "Delphi之完全汉语"终结版 6K 46 If.htm Delphi数据集过滤技巧 4K 47 Img.htm Delphi下汉字输入法的编程及使用 5K 48 Index_notf.htm 怎样解决打开一个DBF表时的"Index not found.."错误 3K 49 Install.htm 如何制作Delphi程序安装盘 7K 50 Ip

680

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder API 调用
社区管理员
  • API 调用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧