代码之家  ›  专栏  ›  技术社区  ›  SimaWB

tapi、lineinitialize和lineinitializex

  •  0
  • SimaWB  · 技术社区  · 15 年前

    我试着用 塔皮 在我的 德尔菲 项目。
    当我使用lineinitializex而不是lineinitialize时,会收到一条错误消息,如“ 异常处理消息c000139参数168fc8 162820 75b4bf7c 75b4bf7c
    LineInitializeEx的代码是:

      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
    

    tlineinitializeexparams的定义是:

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

    当我使用lineinitialize时

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

    一切正常。

    有什么主意吗?

    1 回复  |  直到 15 年前
        1
  •  0
  •   J__    15 年前

    可能值得一看现在是开源的TurboPowerAsyncProfessional。这是我们用来成功实现TAPI项目的方法。

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

    推荐文章