新 新手 Unregistered / Unconfirmed GUEST, unregistred user! 1999-08-08 #1 Delphi 的多媒体好象只能控制由声卡发出的声音.如何控制 Pc喇叭? 有没有软件可模拟声卡使 pc喇叭发声?若有,用Delphi如何编制?
邹 邹光先 Unregistered / Unconfirmed GUEST, unregistred user! 1999-08-08 #2 找一本汇编的书,那上面有如何让pc喇叭发声。 在delphi内,用内嵌汇编代码就可实现.
W wgzhang Unregistered / Unconfirmed GUEST, unregistred user! 1999-08-08 #3 请看<a href="http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=111737">已答问题</a>
H Hexi Unregistered / Unconfirmed GUEST, unregistred user! 1999-08-09 #4 在NT下,你就不要去控制PC喇叭吧。 在9x下,可以嵌入汇编。 procedure Sound(Freq:Integer); var p:Integer; begin P:=1190000 div Freq; asm mov al,10110110B out 43h,al mov ax,P out 42h,al mov al,ah out 42,al in al,61h mov ah,al or al,03h out 61h,al end; end;
在NT下,你就不要去控制PC喇叭吧。 在9x下,可以嵌入汇编。 procedure Sound(Freq:Integer); var p:Integer; begin P:=1190000 div Freq; asm mov al,10110110B out 43h,al mov ax,P out 42h,al mov al,ah out 42,al in al,61h mov ah,al or al,03h out 61h,al end; end;
P pegasus Unregistered / Unconfirmed GUEST, unregistred user! 1999-08-09 #5 hehe, 我在另一个问题里面回答的WinDriver可以让您很容易地控制PC Speaker,在95/8/NT下面都行, 大家可以到金山公司的主页去找:www.joyo.com
N nuke Unregistered / Unconfirmed GUEST, unregistred user! 1999-08-09 #6 有控件(带原吗) http://www.torry.ru/vcl/sound/bleepint.zip http://www.torry.ru/vcl/sound/btbeeper.zip