MS-Vista und "WaveInGetNumDevs" fehlerhaft?

**Graffi**

Hallo,

ich lese schon seit Win98 mit folgender Routine die vorhandenen Audiogeräte (Eingänge) ein.

Unter Vista klappt das nicht mehr, da ebenso alle Ausgänge mit ausgegeben werden.

Ist das ein Bug von Vista, oder liegt das Problem in der MMSystem?

Sonnige Grüße, Ralf

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TSetup.WriteDeviceInfo;

var wd : string;

    WaveInCaps   : TWaveInCaps;

    i,NumDevs : integer;

begin

  NumDevs:=waveInGetNumDevs;

  WavList.Clear;

  if NumDevs=0 then

    Exit;

  for i:=0 to NumDevs-1 do 

  begin

    WaveInGetDevCaps(i, @WaveInCaps, SizeOf(WaveInCaps));

    wd := 'ID '+IntToStr(i)+', Device'+ String(WaveInCaps.szPName); 

    WavList.Items.Add(wd);

  end;

end;

[edit=sakura] M$->MS Mfg, sakura[/edit]

MS-Vista und "WaveInGetNumDevs" fehlerhaft?

MS-Vista und "WaveInGetNumDevs" fehlerhaft?

Forumregeln