강민주님이 올려주신 소스는 이렇습니다...
제가 궁금한 부분에 질문을 드리겠습니다...

procedure TForm1.OpenMedia;
var
  MyOpenParms: TMCI_Open_Parms;
  MyPChar: PChar;
  TextLen: Longint;
begin
  Flags:=mci_Wait or mci_Open_Element or mci_Open_Type;

  with MyOpenParms do
  begin
    dwCallback:=Handle; // TForm1.Handle
    lpstrDeviceType:=PChar('WaveAudio');

-> WaveAudio말구 Line-In 신호를 받으려면 어떻게 적어주어야 하나요?
-> 그리고 왜 MCI_DEVTYPE_WAVEFORM_AUDIO 이걸 안 쓰고 간단하게
-> WaveAudio라고 해야 되는 건지요...

    lpstrElementName:=PChar('');
  end;

  MyError:=mciSendCommand(0,mci_Open,Flags,Longint(@MyOpenParms));
  if MyError = 0 then
    FDeviceID:=MyOpenParms.wDeviceID;
end;

답변 부탁드려요...