Sistemde ses kartı var mı?

[csyasar]

Kod: Tümünü seç

Uses
  MMSystem;

Function IsSoundCardInstalled:Boolean;
Begin
  Result:=(waveOutGetNumDevs>0);
End;