tltapi.pas

该源代码是有关modem 拨号

    record
      dwTotalSize,                                    // TAPI v2.0
      dwNeededSize,                                   // TAPI v2.0
      dwUsedSize,                                     // TAPI v2.0
      dwAgentHandlerInfoSize,                         // TAPI v2.0
      dwAgentHandlerInfoOffset,                       // TAPI v2.0
      dwCapsVersion,                                  // TAPI v2.0
      dwFeatures,                                     // TAPI v2.0
      dwStates,                                       // TAPI v2.0
      dwNextStates,                                   // TAPI v2.0
      dwMaxNumGroupEntries,                           // TAPI v2.0
      dwAgentStatusMessages,                          // TAPI v2.0
      dwNumAgentExtensionIDs,                         // TAPI v2.0
      dwAgentExtensionIDListSize,                     // TAPI v2.0
      dwAgentExtensionIDListOffset : DWORD;           // TAPI v2.0
    end;

  LPLINEAGENTGROUPENTRY = ^TLINEAGENTGROUPENTRY;
  PLINEAGENTGROUPENTRY = ^TLINEAGENTGROUPENTRY;
  TLINEAGENTGROUPENTRY =
    record
      GroupID :
        record
          dwGroupID1,                                 // TAPI v2.0
          dwGroupID2,                                 // TAPI v2.0
          dwGroupID3,                                 // TAPI v2.0
          dwGroupID4 : DWORD;                         // TAPI v2.0
        end;
      dwNameSize,                                     // TAPI v2.0
      dwNameOffset : DWORD;                           // TAPI v2.0
    end;

  LPLINEAGENTGROUPLIST = ^TLINEAGENTGROUPLIST;
  PLINEAGENTGROUPLIST = ^TLINEAGENTGROUPLIST;
  TLINEAGENTGROUPLIST =
    record
      dwTotalSize,                                    // TAPI v2.0
      dwNeededSize,                                   // TAPI v2.0
      dwUsedSize,                                     // TAPI v2.0
      dwNumEntries,                                   // TAPI v2.0
      dwListSize,                                     // TAPI v2.0
      dwListOffset : DWORD;                           // TAPI v2.0
    end;

  LPLINEAGENTSTATUS = ^TLINEAGENTSTATUS;
  PLINEAGENTSTATUS = ^TLINEAGENTSTATUS;
  TLINEAGENTSTATUS =
    record
      dwTotalSize,                                    // TAPI v2.0
      dwNeededSize,                                   // TAPI v2.0
      dwUsedSize,                                     // TAPI v2.0
      dwNumEntries,                                   // TAPI v2.0
      dwGroupListSize,                                // TAPI v2.0
      dwGroupListOffset,                              // TAPI v2.0
      dwState,                                        // TAPI v2.0
      dwNextState,                                    // TAPI v2.0
      dwActivityID,                                   // TAPI v2.0
      dwActivitySize,                                 // TAPI v2.0
      dwActivityOffset,                               // TAPI v2.0
      dwAgentFeatures,                                // TAPI v2.0
      dwValidStates,                                  // TAPI v2.0
      dwValidNextStates : DWORD;                      // TAPI v2.0
    end;

  LPLINEAPPINFO = ^TLINEAPPINFO;
  PLINEAPPINFO = ^TLINEAPPINFO;
  TLINEAPPINFO =
    record
      dwMachineNameSize,                              // TAPI v2.0
      dwMachineNameOffset,                            // TAPI v2.0
      dwUserNameSize,                                 // TAPI v2.0
      dwUserNameOffset,                               // TAPI v2.0
      dwModuleFilenameSize,                           // TAPI v2.0
      dwModuleFilenameOffset,                         // TAPI v2.0
      dwFriendlyNameSize,                             // TAPI v2.0
      dwFriendlyNameOffset,                           // TAPI v2.0
      dwMediaModes,                                   // TAPI v2.0
      dwAddressID : DWORD;                            // TAPI v2.0
    end;
{$ENDIF}

  LPLINEDIALPARAMS = ^TLINEDIALPARAMS;
  PLINEDIALPARAMS = ^TLINEDIALPARAMS;
  TLINEDIALPARAMS =
    record
      dwDialPause,
      dwDialSpeed,
      dwDigitDuration,
      dwWaitForDialtone : DWORD;
    end;

  LPLINECALLINFO = ^TLINECALLINFO;
  PLINECALLINFO = ^TLINECALLINFO;
  TLINECALLINFO =
    record
      dwTotalSize,
      dwNeededSize,
      dwUsedSize : DWORD;
      hLine : HLINE;
      dwLineDeviceID,
      dwAddressID,
      dwBearerMode,
      dwRate,
      dwMediaMode,
      dwAppSpecific,
      dwCallID,
      dwRelatedCallID,
      dwCallParamFlags,
      dwCallStates,
      dwMonitorDigitModes,
      dwMonitorMediaModes : DWORD;
      DialParams : TLINEDIALPARAMS;
      dwOrigin,
      dwReason,
      dwCompletionID,
      dwNumOwners,
      dwNumMonitors,
      dwCountryCode,
      dwTrunk,
      dwCallerIDFlags,
      dwCallerIDSize,
      dwCallerIDOffset,
      dwCallerIDNameSize,
      dwCallerIDNameOffset,
      dwCalledIDFlags,
      dwCalledIDSize,
      dwCalledIDOffset,
      dwCalledIDNameSize,
      dwCalledIDNameOffset,
      dwConnectedIDFlags,
      dwConnectedIDSize,
      dwConnectedIDOffset,
      dwConnectedIDNameSize,
      dwConnectedIDNameOffset,
      dwRedirectionIDFlags,
      dwRedirectionIDSize,
      dwRedirectionIDOffset,
      dwRedirectionIDNameSize,
      dwRedirectionIDNameOffset,
      dwRedirectingIDFlags,
      dwRedirectingIDSize,
      dwRedirectingIDOffset,
      dwRedirectingIDNameSize,
      dwRedirectingIDNameOffset,
      dwAppNameSize,
      dwAppNameOffset,
      dwDisplayableAddressSize,
      dwDisplayableAddressOffset,
      dwCalledPartySize,
      dwCalledPartyOffset,
      dwCommentSize,
      dwCommentOffset,
      dwDisplaySize,
      dwDisplayOffset,
      dwUserUserInfoSize,
      dwUserUserInfoOffset,
      dwHighLevelCompSize,
      dwHighLevelCompOffset,
      dwLowLevelCompSize,
      dwLowLevelCompOffset,
      dwChargingInfoSize,
      dwChargingInfoOffset,
      dwTerminalModesSize,
      dwTerminalModesOffset,
      dwDevSpecificSize,
      dwDevSpecificOffset : DWORD;

{$IFDEF Tapi_Ver20}
      dwCallTreatment,                                // TAPI v2.0
      dwCallDataSize,                                 // TAPI v2.0
      dwCallDataOffset,                               // TAPI v2.0
      dwSendingFlowspecSize,                          // TAPI v2.0
      dwSendingFlowspecOffset,                        // TAPI v2.0
      dwReceivingFlowspecSize,                        // TAPI v2.0
      dwReceivingFlowspecOffset : DWORD;              // TAPI v2.0
{$ENDIF}
    end;

  LPLINECALLLIST = ^TLINECALLLIST;
  PLINECALLLIST = ^TLINECALLLIST;
  TLINECALLLIST =
    record
      dwTotalSize,
      dwNeededSize,
      dwUsedSize,
      dwCallsNumEntries,
      dwCallsSize,
      dwCallsOffset : DWORD;
    end;

  LPLINECALLPARAMS = ^TLINECALLPARAMS;
  PLINECALLPARAMS = ^TLINECALLPARAMS;
  TLINECALLPARAMS =
    record                            // Defaults:
      dwTotalSize,                    // ---------
      dwBearerMode,                   // voice
      dwMinRate,                      // (3.1kHz)
      dwMaxRate,                      // (3.1kHz)
      dwMediaMode,                    // interactiveVoice
      dwCallParamFlags,               // 0
      dwAddressMode,                  // addressID
      dwAddressID : DWORD;            // (any available)
      DialParams : TLINEDIALPARAMS;   // (0, 0, 0, 0)
      dwOrigAddressSize,              // 0
      dwOrigAddressOffset,
      dwDisplayableAddressSize,
      dwDisplayableAddressOffset,
      dwCalledPartySize,              // 0
      dwCalledPartyOffset,
      dwCommentSize,                  // 0
      dwCommentOffset,
      dwUserUserInfoSize,             // 0
      dwUserUserInfoOffset,
      dwHighLevelCompSize,            // 0
      dwHighLevelCompOffset,
      dwLowLevelCompSize,             // 0
      dwLowLevelCompOffset,
      dwDevSpecificSize,              // 0
      dwDevSpecificOffset : DWORD;

{$IFDEF Tapi_Ver20}
      dwPredictiveAutoTransferStates,                 // TAPI v2.0
      dwTargetAddressSize,                            // TAPI v2.0
      dwTargetAddressOffset,                          // TAPI v2.0
      dwSendingFlowspecSize,                          // TAPI v2.0
      dwSendingFlowspecOffset,                        // TAPI v2.0
      dwReceivingFlowspecSize,                        // TAPI v2.0
      dwReceivingFlowspecOffset,                      // TAPI v2.0
      dwDeviceClassSize,                              // TAPI v2.0
      dwDeviceClassOffset,                            // TAPI v2.0
      dwDeviceConfigSize,                             // TAPI v2.0
      dwDeviceConfigOffset,                           // TAPI v2.0
      dwCallDataSize,                                 // TAPI v2.0
      dwCallDataOffset,                               // TAPI v2.0
      dwNoAnswerTimeout,                              // TAPI v2.0
      dwCallingPartyIDSize,                           // TAPI v2.0
      dwCallingPartyIDOffset : DWORD;                 // TAPI v2.0
{$ENDIF}
    end;

  LPLINECALLSTATUS = ^TLINECALLSTATUS;
  PLINECALLSTATUS = ^TLINECALLSTATUS;
  TLINECALLSTATUS =
    record
      dwTotalSize,
      dwNeededSize,
      dwUsedSize,
      dwCallState,
      dwCallStateMode,
      dwCallPrivilege,
      dwCallFeatures,
      dwDevSpecificSize,
      dwDevSpecificOffset : DWORD;

{$IFDEF Tapi_Ver20}
      dwCallFeatures2 : DWORD;                                    // TAPI v2.0
      {$IFDEF Win32}
      tStateEntryTime : TSystemTime;                              // TAPI v2.0
      {$ELSE}
      tStateEntryTime : array[0..7] of Word;                      // TAPI v2.0
      {$ENDIF}
{$ENDIF}
    end;
    

{$IFDEF Tapi_Ver20}
  LPLINECALLTREATMENTENTRY = ^TLINECALLTREATMENTENTRY;
  PLINECALLTREATMENTENTRY = ^TLINECALLTREATMENTENTRY;
  TLINECALLTREATMENTENTRY =
    record
      dwCallTreatmentID,                              // TAPI v2.0
      dwCallTreatmentNameSize,                        // TAPI v2.0
      dwCallTreatmentNameOffset : DWORD;              // TAPI v2.0
    end;
{$ENDIF}


  LPLINECARDENTRY = ^TLINECARDENTRY;
  PLINECARDENTRY = ^TLINECARDENTRY;
  TLINECARDENTRY =
    record
      dwPermanentCardID,
      dwCardNameSize,
      dwCardNameOffset,
      dwCardNumberDigits,                             // TAPI v1.4
      dwSameAreaRuleSize,                             // TAPI v1.4
      dwSameAreaRuleOffset,                           // TAPI v1.4
      dwLongDistanceRuleSize,                         // TAPI v1.4
      dwLongDistanceRuleOffset,                       // TAPI v1.4