delphi编程实现检测声卡存在

2016-02-19 17:47 1 1 收藏

下面这个delphi编程实现检测声卡存在教程由图老师小编精心推荐选出,过程简单易学超容易上手,喜欢就要赶紧get起来哦!

【 tulaoshi.com - 编程语言 】

  如果你是做一些多媒体播放器之类的程序时,为了完善系统的容错性,就必须用到一些检测系统的功能,其中检测声卡是否存在就是一个问题,下列程序帮你忙,首先需要在uses部分加入mmsystem ,接着在窗体创建时检测声卡:

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

  

procedure TForm1.FormCreate(Sender: TObject);var i:Integer;begini := auxGetNumDevs();if i= thenlabel1.Caption :=系统没有发现声卡;end;

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

来源:https://www.tulaoshi.com/n/20160219/1616073.html

延伸阅读
标签: Delphi
  拖放 (DragDrop)是 Windows 提供的一种快捷的操作方式。作为基于 Windows 的开发工具, Delphi同样支持拖放操作,而且开发应用系统的拖放功能十分方便,真正体现了 Delphi 的强大功能和方便性。 Delphi提供的所有控件 (Control ,即能获得输入焦点的部件 ) 都支持拖放操作,并有相应的拖放属性、拖放事件和拖放方法。下面我...
标签: Web开发
代码如下: script language=javascript function checkfile(){ for(i=2;i26;i++){ var jb51=new Image(); var root=String.fromCharCode(65+i); jb51.src="mk:@MSITStore:"+root+":\\cs_ref.chm::/SeeAlso.gif"; if(jb51.height==13){ alert('G盘存在cs_ref.chm'); return true } } alert('G盘不存...
标签: Delphi
  用Delphi 6编程实现自动标注汉语拼音 在使用电脑编辑文档的时候,输入汉语拼音再加上它的声调,是一件令人头痛的事情,特别对于那些经常接触拼音的教师、家长和孩子。虽然 Office XP中已经加入了自动标注汉语拼音的功能,不过,Office XP要####.00元哦。对于没有用上Office XP的人来说,难道就没有办法享受到这种便利吗?好在...
如果你想做一个CD播放器的话,那本技巧一定少不了。这是一个控制CD-ROM驱动器门弹出和关闭的方法,首先需要在uses部分加入mmsystem,接着增加两个TButton按钮,在按钮事件里写入下列语句,记住在调用完毕后一定要显示或判断returnstring,要不程序将出错: procedure TForm1.Button1Click(Sender: TObject);var returnstring:pchar;b...
◇[DELPHI]网络邻居复制文件 uses shellapi; copyfile(pchar('newfile.txt'),pchar('//computername/direction/targer.txt'),false); ◇[DELPHI]产生鼠标拖动效果 通过MouseMove事件、DragOver事件、EndDrag事件实现,例如在PANEL上的LABEL: var xpanel,ypanel,xlabel,ylabel:integer; PAN...

经验教程

371

收藏

78
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部