Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.03.29;
Скачать: CL | DM;

Вниз

Tapi -> lineanswer   Найти похожие ветки 

 
kolj   (2008-04-02 18:15) [0]

Возникла следующая проблема : Когда приходит входной звонок немогу поднять трубку, хотя ф-я lineanswer возвращает положытельное значение. В чем может быть причина ???

Пробовал так
1)

procedure lineCallBack (hDevice,dwMsg,dwCallbackInstance,dwParam1,dwParam2,dwParam3:dword);stdcall;
var err:longint;
begin
if dwmsg = LINE_APPNEWCALL then begin
 form1.ListBox1.Items.Add("RING");
 err:=lineSetCallPrivilege(dwparam2,LINECALLPRIVILEGE_OWNER );
 form1.listbox1.items.add("lineSetCallPrivilege= "+inttostr(err));
 err:=lineanswer(dwparam2,nil,0);
 form1.listbox1.items.add("lineanswer= "+inttostr(err));
end;

2)

procedure lineCallBack (hDevice,dwMsg,dwCallbackInstance,dwParam1,dwParam2,dwParam3:dword);stdcall;
var err:longint;
hc:hcall;

if dwmsg = LINECALLSTATE_OFFERING then begin
 form1.ListBox1.Items.Add("RING1");
 hc:=hcall(hdevice);
 err:=lineSetCallPrivilege(hc,LINECALLPRIVILEGE_OWNER );
 form1.listbox1.items.add("lineSetCallPrivilege= "+inttostr(err));
 err:=lineanswer(hc,P,SIZEOF(P));
 form1.listbox1.items.add("lineanswer= "+inttostr(err));

В обоих случаях ф-и lineSetCallPrivilege и lineanswer возвращают код успешного завершения (соответственно 0 и >0)

ф-я lineopen выглядит так и результатом ее выполнения есть 0.

err1:=lineopen(lineapp,dwTapiDeviceID,@f_hline,dwAPIVersion,0,0,LINECALLPRIVILEG E_MONITOR + LINECALLPRIVILEGE_OWNER  , LINEMEDIAMODE_INTERACTIVEVOICE, nil);


 
kolj   (2008-04-02 20:05) [1]

В первом случае lineanswer возвращает  LINEERR_INVALCALLSTATE(The call state is invalid.)



Страницы: 1 вся ветка

Текущий архив: 2009.03.29;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.027 c
2-1234191366
AlexDan
2009-02-09 17:56
2009.03.29
Изменить положение MessageDlg,


4-1207330446
Riply
2008-04-04 21:34
2009.03.29
NtReadFile NtFsControlFile. Разница возвращаемых данных.


2-1234270641
Alex_Ford
2009-02-10 15:57
2009.03.29
Ping - Программно


15-1232442288
123-ий
2009-01-20 12:04
2009.03.29
Delphi + PostgreSQL 8.3


2-1233838460
Allizar
2009-02-05 15:54
2009.03.29
1C и Delphi 7