Управление аудио входом/выходом

[Air]

Функции управления громкостью "Звук" мне знакомы, подскажите, пожалуйста как управлять громкостью "Общая" и "Front" (этот последний возможно не у всех есть)?
И второй вопрос:
Как изминить громкость на "Линейный вход" или "Громкость CD" (это у кого как называется) или ещё "Уровень"?

Заранее благодарен.

[SunKnight]

Вот исходники управлением микшера
[ATTACH]2696[/ATTACH]

[Air]

Спасибо "SunKnight" выручил.

[Air]

Если не секрет, каково назначение процедуры

procedure devs;
var
caps:TMIXERCAPS;
line:TMIXERLINE;
MaxLinecnt:integer;
i,err:integer;
maxSrc:integer;
curDest:integer;
curSrc:integer;
begin
//mixerOpen(@MixIdHandle,form1.cb_devs.ItemIndex,hinstance,0,CALLBACK_WINDOW);
mixerGetDevCaps(MixIdHandle,@caps,sizeof(caps));
MaxLinecnt:=255;
line.cbStruct:=sizeof(line);
curDest:=-1;
for i:=0 to maxlinecnt do
 begin
  inc(curDest);
  line.dwDestination:=curDest;
  err:=mixerGetLineInfo(MixIdHandle,@line,MIXER_GETLINEINFOF_DESTINATION or MIXER_OBJECTF_HMIXER);
  if err <> 0 then break;
  zzz[i]:=line.dwLineID;
 end;
end;

просто я так и не выяснил, что она даёт.

[SunKnight]

Накладочка вышла. Вот полный вариант с коментариями:
[ATTACH]2697[/ATTACH]

[Air]

"SunKnight" отличные наработки! Благодарю Вас.

[selevo]

хороший пример,спасибо.
Вот только не работают галочки типа микрофон выкл и остальные.

причём если счёлкать их в микшере windows то в программе галочки устанавливаются или снимаются,повторяют мои операции в микшере.

из-за чего такое может быть ?

[Air]

из-за чего такое может быть

Программа считывает данные с микшера...