[求助]为什么无效? - Delphi论坛

编程论坛 → 开发语言 → 『 Delphi论坛』 → [求助]为什么无效?

标题：[求助]为什么无效?

取消只看楼主

青格儿

等　级：贵宾
威　望：11
帖　子：698
专家分：20
注　册：2007-7-31
结帖率：87.5%

楼主

问题点数：0 回复次数：3

[求助]为什么无效?

Windows的API里有个检测声卡的函数WaveOutGetNumDevs
我一运行,它就提示,无效动态链接在'Winmm.dll'上,这是什么意思,怎么解决?
这是声明:
function WaveOutGetNumDevs:longint;stdcall;external 'winmm.dll' name 'WaveOutGetNumDevs';

搜索更多相关主题的帖子: function　Windows　动态　检测　

2007-10-21 14:52

青格儿

等　级：贵宾
威　望：11
帖　子：698
专家分：20
注　册：2007-7-31

第 2 楼

得分:0

function WaveOutGetNumDevs:longint;stdcall;external 'winmm.dll' name 'waveOutGetNumDevs';

这样写,不那样提示了,可是这个函数好像不起作用,我点检测它没反映我是否装声卡,但是为什么不执行?

procedure TForm1.Button1Click(Sender: TObject);
begin
if WaveOutGetNumDevs=0 then
RadioGroup1.ItemIndex:=1
else
radioGroup1.ItemIndex:=0;
end;

end.

两选项居中然都没选中,为什么不执行?

2007-10-21 15:14

青格儿

等　级：贵宾
威　望：11
帖　子：698
专家分：20
注　册：2007-7-31

第 3 楼

得分:0

嗯,明白了,多谢你们的回答!

2007-10-24 20:58

青格儿

等　级：贵宾
威　望：11
帖　子：698
专家分：20
注　册：2007-7-31

第 4 楼

得分:0

嗯,明白了,多谢你们的回答!