Order and save right now!
20% off with the 729824315 dicscount code for Ultimate Pack and any another product for Delphi from Greatis Programming! |
⤷ Detect if sound card is present
Use WaveOutGetNumDevs procedure. It returns number of waveform-audio output devices present in the system.Don't forget include MMSystem to uses chapter.
uses MMSystem;
...
procedure TForm1.Button1Click(Sender: TObject);
begin
if WaveOutGetNumDevs<>0 then
Label1.Caption:='Sound card is present'
else
Label1.Caption:='Sound card is not present';
end;
-
More for developers