Função: Verifica se Existe uma Placa de Som no PC ¹ - Códigos Delphi

Função: Verifica se Existe uma Placa de Som no PC ¹

// Verifica se Existe uma Placa de Som no PC.

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