Audio com 3 placas de som

[Guest Jorge Mantini]

Bom dia pessoal!

estou precisando de uma ajuda urgente que é o seguinte:

Necessito desenvolver um sistema de audio que iria tocar

3 estilos musicais diferentes em cada placa de som.

Onde eu pudesse escolher qual seria a placa de som a ser

usada para aquele player.

Exemplo:

Placa1 - MPB

Placa2 - Rock

Placa3 - Lounge

Desde já agradeço

dissim_jorge@hotmail.com

[Jhonas]

Esta procedure mostra num listbox todas as placas de som instaladas

uses mmsystem;

procedure GetWaveOutDevices(DeviceNames: TStrings);
var
  DNum: Integer;
  i: Integer;
  Caps: TWaveOutCapsA;
begin
  DNum := waveOutGetNumDevs;  // Number of Devices
  for i := 0 to DNum - 1 do     // Query Devicenames
  begin
    waveOutGetDevCaps(i, @Caps, SizeOf(TWaveOutCapsA));
    DeviceNames.Add(string(Caps.szPname));
  end;
end;


procedure TForm1.Button1Click(Sender: TObject);
begin
  GetWaveOutDevices(Listbox1.Items);
end;

waveInGetID

A função de waveInGetID adquire o identificador para um determinado dispositivo de entrada de audio.

MMRESULT waveInGetID(

HWAVEIN hwi,

LPUINT puDeviceID

);

waveInOpen

A função de waveInOpen abre um determinado dispositivo de audio pelo identificador.

MMRESULT waveInOpen(

LPHWAVEIN phwi,

UINT uDeviceID,

LPWAVEFORMATEX pwfx,

DWORD dwCallback,

DWORD dwCallbackInstance,

DWORD fdwOpen

);

OBS: Sei que é possivel direcionar o arquivo de som, especificamente para uma placa de som, mas ainda não usei .... voce vai achar mais informações no help do delphi ( existem mais funçoes para controle de som )

abraço

[Guest Jorge Mantini]

ok Jhonas,

listar as placas instaladas seria o primeiro passo,

agora o segundo passo é lincá-las ao tocador.

Vou pesquisar no help do Delphi, o problema é que

só poderei fazer isso no sabado (dia da entrega rsssss).

Mesmo assim fico agradecido por sua ajuda.