Skype (SKYPE4COMLib)

[Belokrinickiy]

Добрый день. Кто мб сталкивался с этим, требуется при разговоре с собеседником отправлять в поток микрофона (что бы он слышал), например .wav файл.

Делаю так:

procedure TForm1.SkypeCallStatus(Sender: TObject; const pCall: ICall; Status: TOleEnum);
begin
 if (Status = clsInProgress) then
  begin
  ...
   pCall.InputDevice[callIoDeviceTypeFile]:= 'c:\a.wav';
  ...
  end;
end;

не работает Заранее Спасибо.

[саша40]

Ты что мини-skype делаешь?
А ваще ты слыхал что информация передается пакетами?

[Belokrinickiy]

Сообщение от саша40

Ты что мини-skype делаешь?
А ваще ты слыхал что информация передается пакетами?

А ты наверно не "слыхал" о skype api.

Зы: Все еще жду ответа по существу.

[raxp]

pcall.set_InputDevice(CallIoDeviceTypeFile, @'с:\a.wav')

не?

[Belokrinickiy]

Сообщение от raxp

pcall.set_InputDevice(CallIoDeviceTypeFile, @'с:\a.wav')

не?

Ругается [DCC Error] main.pas(109): E2036 Variable required

[raxp]

...потому как нет такой.

Тут все правильно:

pCall.InputDevice[callIoDeviceTypeFile]:= '1.wav';

Важный момент в том, что сам WAV файл должен быть в PCM/Mono/16 бит/16 000 Гц дискретизация. Проверил, усе передает, тестовый прилагаю:


p.s.: вы для конвертации можете задействовать lame или ffmpeg для mp3 to wav ...скажем так:

ffmpeg -i filename.mp3 -ar 16000 -ac 1 1.wav

http://www.programmersclub.ru/програ...ние-для-skype/

[Belokrinickiy]

Огромное Спасибо.

[maximasystems]

Сделал также как описано. Не работает, проверил микрофон: не работает. Также Ваш сорц не работает

[raxp]

...у других работает, у меня работает. Может с вами и вашей системой-железом что-то не так?

[maximasystems]

Windows 8 использую... Сейчас попробовал через RDP на Windows 7 - также. В ответ молчание