🚀 go-pugleaf

Using the registry is a very bad idea....
all kinds of false values can pop up..plus if a card WAS installed and
removed later it's still going to be listed if it's drivers are not
uninstalled....

the easiest thing to do is this

uses mmsystem;

function IsThereAWaveCompatibleDevice:Boolean;
begin
  Result := WaveOutGetNumDevs >0;
end;

function IsThereAMidiCompatibleDevice:Boolean;
begin
  Result := MidiOutGetNumDevs >0;
end;

If it's true, there's a device in the system....plain and simple


Jason McClain
Magnum Studios

This procedure to get a list of installed hardware might help:

ps. On Delphi versions < 4 you have to replace OpenKeyReadOnly(...) with
OpenKey(..., False).

uses
  Registry;

procedure GetHardwareList(List: TStrings);
var
  S: TStrings;
  R: TRegistry;
  i: Integer;
begin
  S := TStringList.Create;
  try
    R := TRegistry.Create;
    try
      R.RootKey := HKEY_DYN_DATA;
      if R.OpenKeyReadOnly('Config Manager\Enum') then
      try
        R.GetKeyNames(S);
      finally
        R.CloseKey;
      end;
      for i := 0 to S.Count - 1 do
        if R.OpenKeyReadOnly('Config Manager\Enum\' + S[i]) then
        try
          try
            S[i] := R.ReadString('HardWareKey');
          except
          end;
        finally
          R.CloseKey;
        end;
      R.RootKey := HKEY_LOCAL_MACHINE;
      List.Clear;
      for i := 0 to S.Count - 1 do
        if R.OpenKeyReadOnly('Enum\' + S[i]) then
        try
          try
            List.Add(R.ReadString('Class') + ': ' +
R.ReadString('DeviceDesc'));
          except
          end;
        finally
          R.CloseKey;
        end;
    finally
      R.Free;
    end;
  finally
    S.Free;
  end;
end;


"Yurij Nykon" <ynykon@ipm.lviv.ua> schreef in bericht
news:396DCDC3.E0D024E6@ipm.lviv.ua...
> I want to know where in Windows registry is stored the value whether the
>
> soundcard on my computer is installed.
> I had to check this value from macromedia Director, but I don't know
> where can  I find thist value in registry
>
> Thank you in advance
> Yurij
>
>
>
>

Why do you always use the registry to get those values?
Always try to avoid reading the registry... It might even change in the
future.

There is some API called GetWaveOutputDevices or something like that. Don't
know for sure if this is the right function, but you have to search the
libraries for the correct name. Or it's in some kind of mm .DLL.