▲

[Smayds]

Hi All,

I'm having a problem enumerating the different recording channels on a device (Delphi 6). Here's the procedure I'm having trouble with:

Code SelectExpand


procedure TConfig.GetRecordingChannels(DeviceNum: integer);
var
i: integer;
p: pchar;
desc: string;
done: boolean;

begin

RecChn.Items.Clear; // Clear recording channel listbox

Bass_RecordInit(DeviceNum); // init recording for specified device

// Get Recording channels:
done:=false;
i:=0;
while not done do
 begin
  p:=Bass_RecordGetInputName(i); inc(i);
  Desc:=p;
  if Desc<>'' then
   RecChn.Items.Add(Desc)
  else
   done:=true;
 end;

Bass_RecordFree;

end;



I just get a single channel returned, "Wave". There is indeed a Wave option as one of the recording channels, but it's missing all the others (mic, line-in, CD etc).

Any ideas? It's bound to be something simple that I missed!

-Ayden

[Irrational86]

I made a recording example in delphi, if you download the Bass.zip package again, you'll see its there and it fully functions...Its inside the Delphi folder, RecordTest..

[Smayds]

Aha...

I think it could be a problem with my soundcard or its drivers... The recording demo has the same fault.

Thanks!

-Ayden

[Ian @ un4seen]

I guess the precompiled RECTEST.EXE example (in C directory) has the same problem? (note it's a dropdown list)... If so, this is the first I've heard of this happenning - I'll send you a debug version to see what's going on

btw, what soundcard are you using?

[Smayds]

Hi Ian,

Onboard CMI8738 Audio chip (C-Media, on Asus CUSI-M board w/SiS630E cs).

Latest drivers from the website don't fix the problem...  :-/

-Ayden