Verifica a existência de uma placa de som

Verifica a existência de uma placa de som

Como verificar a existência de uma placa de som via programação Delphi

Procedure TestaPlaca(Value:integer);
begin
som := ”;
if WaveOutGetNumDevs > 0 then
begin
result := True
end
else
begin
Result := False;
end;
end;

Posts Similares