TAPI, lineInitialize and lineInitializeEx

I try to use TAPI in my Delphi project.

When I use lineInitializeEx instead of lineInitialize I get an error msg like "Exception Processing Message c0000139 Parameters 168fc8 162820 75b4bf7c 75b4bf7c"

The code with lineInitializeEx is :

  var
    initPrm开发者_运维问答: TLineInitializeExParams;
  begin
    FillChar(initPrm, SizeOf(initPrm), 0);
    initPrm.dwTotalSize := SizeOf(initPrm);
    initPrm.dwOptions := LINEINITIALIZEEXOPTION_USEEVENT; // or LINEINITIALIZEEXOPTION_USEHIDDENWINDOW
    if lineInitializeEx(lineApp, HInstance, lineCallback, 'TAPI sample', nDevs, tapiVersion, initPrm) < 0 then

and definition of TLineInitializeExParams is:

TLineInitializeExParams = record
    dwTotalSize,                                    
    dwNeededSize,                                   
    dwUsedSize,                                     
    dwOptions: Longint;                             
    Handles: THandleUnion;
    dwCompletionKey: Longint;                       
  end;

When I use lineInitialize

if lineInitialize(lineApp, HInstance, lineCallback, 'TAPI sample', nDevs) < 0 then

everything is OK.

Is there any idea ?

Might be worth looking at TurboPower Async Professional, which is now open source. This is what we used to successfully implement a TAPI project.

https://sourceforge.net/projects/tpapro/