Category

Development Platform
Home > Document > Communication Document > View Code
TLTapi.pas
Package: TTapiLine.v3.0.rar　[view]
Upload User: adalike
Upload Date: 2013-06-24
Package Size: 1381k
Code Size: 144k
Category:

Communication Document

Development Platform:

Delphi

TLTapi.pas：Code Content
  1.       dwPhoneFeatures,                                // TAPI v2.0
  2.       dwSettableHandsetHookSwitchModes,               // TAPI v2.0
  3.       dwSettableSpeakerHookSwitchModes,               // TAPI v2.0
  4.       dwSettableHeadsetHookSwitchModes,               // TAPI v2.0
  5.       dwMonitoredHandsetHookSwitchModes,              // TAPI v2.0
  6.       dwMonitoredSpeakerHookSwitchModes,              // TAPI v2.0
  7.       dwMonitoredHeadsetHookSwitchModes : DWORD;      // TAPI v2.0
  8. {$ENDIF}
  9.     end;
  11.   LPPHONEEXTENSIONID = ^TPHONEEXTENSIONID;
  12.   PPHONEEXTENSIONID = ^TPHONEEXTENSIONID;
  13.   TPHONEEXTENSIONID =
  14.     record
  15.       dwExtensionID0,
  16.       dwExtensionID1,
  17.       dwExtensionID2,
  18.       dwExtensionID3 : DWORD;
  19.     end;
  21. {$IFDEF Tapi_Ver20}
  22.   LPPHONEINITIALIZEEXPARAMS = ^TPHONEINITIALIZEEXPARAMS;
  23.   PPHONEINITIALIZEEXPARAMS = ^TPHONEINITIALIZEEXPARAMS;
  24.   TPHONEINITIALIZEEXPARAMS =
  25.     record
  26.       dwTotalSize,                                    // TAPI v2.0
  27.       dwNeededSize,                                   // TAPI v2.0
  28.       dwUsedSize,                                     // TAPI v2.0
  29.       dwOptions : DWORD;                              // TAPI v2.0
  31.       Handles : THandleUnion; //!! Union converted to THandleUnion
  33.       dwCompletionKey : DWORD;                        // TAPI v2.0
  34.     end;
  36.   LPPHONEMESSAGE = ^TPHONEMESSAGE;
  37.   PPHONEMESSAGE = ^TPHONEMESSAGE;
  38.   TPHONEMESSAGE =
  39.     record
  40.       hDevice,                                        // TAPI v2.0
  41.       dwMessageID,                                    // TAPI v2.0
  42.       dwCallbackInstance,                             // TAPI v2.0
  43.       dwParam1,                                       // TAPI v2.0
  44.       dwParam2,                                       // TAPI v2.0
  45.       dwParam3 : DWORD;                               // TAPI v2.0
  46.     end;
  47. {$ENDIF}
  49.   LPPHONESTATUS = ^TPHONESTATUS;
  50.   PPHONESTATUS = ^TPHONESTATUS;
  51.   TPHONESTATUS =
  52.     record
  53.       dwTotalSize,
  54.       dwNeededSize,
  55.       dwUsedSize,
  56.       dwStatusFlags,
  57.       dwNumOwners,
  58.       dwNumMonitors,
  59.       dwRingMode,
  60.       dwRingVolume,
  61.       dwHandsetHookSwitchMode,
  62.       dwHandsetVolume,
  63.       dwHandsetGain,
  64.       dwSpeakerHookSwitchMode,
  65.       dwSpeakerVolume,
  66.       dwSpeakerGain,
  67.       dwHeadsetHookSwitchMode,
  68.       dwHeadsetVolume,
  69.       dwHeadsetGain,
  70.       dwDisplaySize,
  71.       dwDisplayOffset,
  72.       dwLampModesSize,
  73.       dwLampModesOffset,
  74.       dwOwnerNameSize,
  75.       dwOwnerNameOffset,
  76.       dwDevSpecificSize,
  77.       dwDevSpecificOffset : DWORD;
  79. {$IFDEF Tapi_Ver20}
  80.       dwPhoneFeatures : DWORD;                        // TAPI v2.0
  81. {$ENDIF}
  82.     end;
  84.   LPVARSTRING = ^TVARSTRING;
  85.   PVARSTRING = ^TVARSTRING;
  86.   TVARSTRING =
  87.     record
  88.       dwTotalSize,
  89.       dwNeededSize,
  90.       dwUsedSize,
  91.       dwStringFormat,
  92.       dwStringSize,
  93.       dwStringOffset : DWORD;
  94.     end;
  97. function lineAccept(
  98.     hCall : HCALL;
  99.     lpsUserUserInfo : LPCSTR;
  100.     dwSize : DWORD) : LONG; stdcall;
  102. function lineAddProvider(                                                // TAPI v1.4
  103.     lpszProviderFilename : LPCSTR;
  104.     hwndOwner : HWND;
  105.     lpdwPermanentProviderID : LPDWORD) : LONG; stdcall;
  107. {$IFDEF Win32}
  108. function lineAddProviderA(                                               // TAPI v1.4
  109.     lpszProviderFilename : LPCSTR;
  110.     hwndOwner : HWND;
  111.     lpdwPermanentProviderID : LPDWORD) : LONG; stdcall;
  113. function lineAddProviderW(
  114.     lpszProviderFilename : LPCWSTR;
  115.     hwndOwner : HWND;
  116.     lpdwPermanentProviderID : LPDWORD) : LONG; stdcall;
  117. {$ENDIF}
  119. function lineAddToConference(
  120.     hConfCall : HCALL;
  121.     hConsultCall : HCALL) : LONG; stdcall;
  123. {$IFDEF Tapi_Ver20}
  124. function lineAgentSpecific(                                              // TAPI v2.0
  125.     hLine : HLINE;
  126.     dwAddressID : DWORD;
  127.     dwAgentExtensionIDIndex : DWORD;
  128.     lpParams : LPVOID;
  129.     dwSize : DWORD) : LONG; stdcall;
  130. {$ENDIF}
  132. function lineAnswer(
  133.     hCall : HCALL;
  134.     lpsUserUserInfo : LPCSTR;
  135.     dwSize : DWORD) : LONG; stdcall;
  137. function lineBlindTransfer(
  138.     hCall : HCALL;
  139.     lpszDestAddress : LPCSTR;
  140.     dwCountryCode : DWORD) : LONG; stdcall;
  142. {$IFDEF Win32}
  143. function lineBlindTransferA(
  144.     hCall : HCALL;
  145.     lpszDestAddress : LPCSTR;
  146.     dwCountryCode : DWORD) : LONG; stdcall;
  148. function lineBlindTransferW(
  149.     hCall : HCALL;
  150.     lpszDestAddressW : LPCWSTR;
  151.     dwCountryCode : DWORD) : LONG; stdcall;
  152. {$ENDIF}
  154. function lineClose(
  155.     hLine : HLINE) : LONG; stdcall;
  157. function lineCompleteCall(
  158.     hCall : HCALL;
  159.     lpdwCompletionID : LPDWORD;
  160.     dwCompletionMode : DWORD;
  161.     dwMessageID : DWORD) : LONG; stdcall;
  163. function lineCompleteTransfer(
  164.     hCall : HCALL;
  165.     hConsultCall : HCALL;
  166.     lphConfCall : LPHCALL;
  167.     dwTransferMode : DWORD) : LONG; stdcall;
  169. function lineConfigDialog(
  170.     dwDeviceID : DWORD;
  171.     hwndOwner : HWND;
  172.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  174. {$IFDEF Win32}
  175. function lineConfigDialogA(
  176.     dwDeviceID : DWORD;
  177.     hwndOwner : HWND;
  178.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  180. function lineConfigDialogW(
  181.     dwDeviceID : DWORD;
  182.     hwndOwner : HWND;
  183.     lpszDeviceClass : LPCWSTR) : LONG; stdcall;
  184. {$ENDIF}
  186. function lineConfigDialogEdit(                                           // TAPI v1.4
  187.     dwDeviceID : DWORD;
  188.     hwndOwner : HWND;
  189.     lpszDeviceClass : LPCSTR;
  190.     const lpDeviceConfigIn : LPVOID;
  191.     dwSize : DWORD;
  192.     lpDeviceConfigOut : LPVARSTRING) : LONG; stdcall;
  194. {$IFDEF Win32}
  195. function lineConfigDialogEditA(                                          // TAPI v1.4
  196.     dwDeviceID : DWORD;
  197.     hwndOwner : HWND;
  198.     lpszDeviceClass : LPCSTR;
  199.     const lpDeviceConfigIn : LPVOID;
  200.     dwSize : DWORD;
  201.     lpDeviceConfigOut : LPVARSTRING) : LONG; stdcall;
  203. function lineConfigDialogEditW(
  204.     dwDeviceID : DWORD;
  205.     hwndOwner : HWND;
  206.     lpszDeviceClass : LPCWSTR;
  207.     const lpDeviceConfigIn : LPVOID;
  208.     dwSize : DWORD;
  209.     lpDeviceConfigOut : LPVARSTRING) : LONG; stdcall;
  210. {$ENDIF}
  212. function lineConfigProvider(                                             // TAPI v1.4
  213.     hwndOwner : HWND;
  214.     dwPermanentProviderID : DWORD) : LONG; stdcall;
  216. function lineDeallocateCall(
  217.     hCall : HCALL) : LONG; stdcall;
  219. function lineDevSpecific(
  220.     hLine : HLINE;
  221.     dwAddressID : DWORD;
  222.     hCall : HCALL;
  223.     lpParams : LPVOID;
  224.     dwSize : DWORD) : LONG; stdcall;
  226. function lineDevSpecificFeature(
  227.     hLine : HLINE;
  228.     dwFeature : DWORD;
  229.     lpParams : LPVOID;
  230.     dwSize : DWORD) : LONG; stdcall;
  232. function lineDial(
  233.     hCall : HCALL;
  234.     lpszDestAddress : LPCSTR;
  235.     dwCountryCode : DWORD) : LONG; stdcall;
  237. {$IFDEF Win32}
  238. function lineDialA(
  239.     hCall : HCALL;
  240.     lpszDestAddress : LPCSTR;
  241.     dwCountryCode : DWORD) : LONG; stdcall;
  243. function lineDialW(
  244.     hCall : HCALL;
  245.     lpszDestAddress : LPCWSTR;
  246.     dwCountryCode : DWORD) : LONG; stdcall;
  247. {$ENDIF}
  249. function lineDrop(
  250.     hCall : HCALL;
  251.     lpsUserUserInfo : LPCSTR;
  252.     dwSize : DWORD) : LONG; stdcall;
  254. function lineForward(
  255.     hLine : HLINE;
  256.     bAllAddresses : DWORD;
  257.     dwAddressID : DWORD;
  258.     const lpForwardList : LPLINEFORWARDLIST;
  259.     dwNumRingsNoAnswer : DWORD;
  260.     lphConsultCall : LPHCALL;
  261.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  263. {$IFDEF Win32}
  264. function lineForwardA(
  265.     hLine : HLINE;
  266.     bAllAddresses : DWORD;
  267.     dwAddressID : DWORD;
  268.     const lpForwardList : LPLINEFORWARDLIST;
  269.     dwNumRingsNoAnswer : DWORD;
  270.     lphConsultCall : LPHCALL;
  271.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  273. function lineForwardW(
  274.     hLine : HLINE;
  275.     bAllAddresses : DWORD;
  276.     dwAddressID : DWORD;
  277.     const lpForwardList : LPLINEFORWARDLIST;
  278.     dwNumRingsNoAnswer : DWORD;
  279.     lphConsultCall : LPHCALL;
  280.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  281. {$ENDIF}
  283. function lineGatherDigits(
  284.     hCall : HCALL;
  285.     dwDigitModes : DWORD;
  286.     lpsDigits : LPSTR;
  287.     dwNumDigits : DWORD;
  288.     lpszTerminationDigits : LPCSTR;
  289.     dwFirstDigitTimeout : DWORD;
  290.     dwInterDigitTimeout : DWORD) : LONG; stdcall;
  292. {$IFDEF Win32}
  293. function lineGatherDigitsA(
  294.     hCall : HCALL;
  295.     dwDigitModes : DWORD;
  296.     lpsDigits : LPSTR;
  297.     dwNumDigits : DWORD;
  298.     lpszTerminationDigits : LPCSTR;
  299.     dwFirstDigitTimeout : DWORD;
  300.     dwInterDigitTimeout : DWORD) : LONG; stdcall;
  302. function lineGatherDigitsW(
  303.     hCall : HCALL;
  304.     dwDigitModes : DWORD;
  305.     lpsDigits : LPWSTR;
  306.     dwNumDigits : DWORD;
  307.     lpszTerminationDigits : LPCWSTR;
  308.     dwFirstDigitTimeout : DWORD;
  309.     dwInterDigitTimeout : DWORD) : LONG; stdcall;
  310. {$ENDIF}
  312. function lineGenerateDigits(
  313.     hCall : HCALL;
  314.     dwDigitMode : DWORD;
  315.     lpszDigits : LPCSTR;
  316.     dwDuration : DWORD) : LONG; stdcall;
  318. {$IFDEF Win32}
  319. function lineGenerateDigitsA(
  320.     hCall : HCALL;
  321.     dwDigitMode : DWORD;
  322.     lpszDigits : LPCSTR;
  323.     dwDuration : DWORD) : LONG; stdcall;
  325. function lineGenerateDigitsW(
  326.     hCall : HCALL;
  327.     dwDigitMode : DWORD;
  328.     lpszDigits : LPCWSTR;
  329.     dwDuration : DWORD) : LONG; stdcall;
  330. {$ENDIF}
  332. function lineGenerateTone(
  333.     hCall : HCALL;
  334.     dwToneMode : DWORD;
  335.     dwDuration : DWORD;
  336.     dwNumTones : DWORD;
  337.     const lpTones : LPLINEGENERATETONE) : LONG; stdcall;
  339. function lineGetAddressCaps(
  340.     hLineApp : HLINEAPP;
  341.     dwDeviceID : DWORD;
  342.     dwAddressID : DWORD;
  343.     dwAPIVersion : DWORD;
  344.     dwExtVersion : DWORD;
  345.     lpAddressCaps : LPLINEADDRESSCAPS) : LONG; stdcall;
  347. {$IFDEF Win32}
  348. function lineGetAddressCapsA(
  349.     hLineApp : HLINEAPP;
  350.     dwDeviceID : DWORD;
  351.     dwAddressID : DWORD;
  352.     dwAPIVersion : DWORD;
  353.     dwExtVersion : DWORD;
  354.     lpAddressCaps : LPLINEADDRESSCAPS) : LONG; stdcall;
  356. function lineGetAddressCapsW(
  357.     hLineApp : HLINEAPP;
  358.     dwDeviceID : DWORD;
  359.     dwAddressID : DWORD;
  360.     dwAPIVersion : DWORD;
  361.     dwExtVersion : DWORD;
  362.     lpAddressCaps : LPLINEADDRESSCAPS) : LONG; stdcall;
  363. {$ENDIF}
  365. function lineGetAddressID(
  366.     hLine : HLINE;
  367.     lpdwAddressID : LPDWORD;
  368.     dwAddressMode : DWORD;
  369.     lpsAddress : LPCSTR;
  370.     dwSize : DWORD) : LONG; stdcall;
  372. {$IFDEF Win32}
  373. function lineGetAddressIDA(
  374.     hLine : HLINE;
  375.     lpdwAddressID : LPDWORD;
  376.     dwAddressMode : DWORD;
  377.     lpsAddress : LPCSTR;
  378.     dwSize : DWORD) : LONG; stdcall;
  380. function lineGetAddressIDW(
  381.     hLine : HLINE;
  382.     lpdwAddressID : LPDWORD;
  383.     dwAddressMode : DWORD;
  384.     lpsAddress : LPCWSTR;
  385.     dwSize : DWORD) : LONG; stdcall;
  386. {$ENDIF}
  388. function lineGetAddressStatus(
  389.     hLine : HLINE;
  390.     dwAddressID : DWORD;
  391.     lpAddressStatus : LPLINEADDRESSSTATUS) : LONG; stdcall;
  393. {$IFDEF Win32}
  394. function lineGetAddressStatusA(
  395.     hLine : HLINE;
  396.     dwAddressID : DWORD;
  397.     lpAddressStatus : LPLINEADDRESSSTATUS) : LONG; stdcall;
  399. function lineGetAddressStatusW(
  400.     hLine : HLINE;
  401.     dwAddressID : DWORD;
  402.     lpAddressStatus : LPLINEADDRESSSTATUS) : LONG; stdcall;
  403. {$ENDIF}
  405. {$IFDEF Tapi_Ver20}
  406. {$IFDEF Win32}
  407. function lineGetAgentActivityListA(                                       // TAPI v2.0
  408.     hLine : HLINE;
  409.     dwAddressID : DWORD;
  410.     lpAgentActivityList : LPLINEAGENTACTIVITYLIST) : LONG; stdcall;
  411. {$ENDIF}
  413. function lineGetAgentActivityList(                                       // TAPI v2.0
  414.     hLine : HLINE;
  415.     dwAddressID : DWORD;
  416.     lpAgentActivityList : LPLINEAGENTACTIVITYLIST) : LONG; stdcall;
  418. {$IFDEF Win32}
  419. function lineGetAgentActivityListW(                                       // TAPI v2.0
  420.     hLine : HLINE;
  421.     dwAddressID : DWORD;
  422.     lpAgentActivityList : LPLINEAGENTACTIVITYLIST) : LONG; stdcall;
  424. function lineGetAgentCapsA(                                               // TAPI v2.0
  425.     hLineApp : HLINEAPP;
  426.     dwDeviceID : DWORD;
  427.     dwAddressID : DWORD;
  428.     dwAppAPIVersion : DWORD;
  429.     lpAgentCaps : LPLINEAGENTCAPS) : LONG; stdcall;
  430. {$ENDIF}
  432. function lineGetAgentCaps(                                               // TAPI v2.0
  433.     hLineApp : HLINEAPP;
  434.     dwDeviceID : DWORD;
  435.     dwAddressID : DWORD;
  436.     dwAppAPIVersion : DWORD;
  437.     lpAgentCaps : LPLINEAGENTCAPS) : LONG; stdcall;
  439. {$IFDEF Win32}
  440. function lineGetAgentCapsW(                                               // TAPI v2.0
  441.     hLineApp : HLINEAPP;
  442.     dwDeviceID : DWORD;
  443.     dwAddressID : DWORD;
  444.     dwAppAPIVersion : DWORD;
  445.     lpAgentCaps : LPLINEAGENTCAPS) : LONG; stdcall;
  447. function lineGetAgentGroupListA(                                          // TAPI v2.0
  448.     hLine : HLINE;
  449.     dwAddressID : DWORD;
  450.     lpAgentGroupList : LPLINEAGENTGROUPLIST) : LONG; stdcall;
  451. {$ENDIF}
  453. function lineGetAgentGroupList(                                          // TAPI v2.0
  454.     hLine : HLINE;
  455.     dwAddressID : DWORD;
  456.     lpAgentGroupList : LPLINEAGENTGROUPLIST) : LONG; stdcall;
  458. {$IFDEF Win32}
  459. function lineGetAgentGroupListW(                                          // TAPI v2.0
  460.     hLine : HLINE;
  461.     dwAddressID : DWORD;
  462.     lpAgentGroupList : LPLINEAGENTGROUPLIST) : LONG; stdcall;
  464. function lineGetAgentStatusA(                                             // TAPI v2.0
  465.     hLine : HLINE;
  466.     dwAddressID : DWORD;
  467.     lpAgentStatus : LPLINEAGENTSTATUS) : LONG; stdcall;
  468. {$ENDIF}
  470. function lineGetAgentStatus(                                             // TAPI v2.0
  471.     hLine : HLINE;
  472.     dwAddressID : DWORD;
  473.     lpAgentStatus : LPLINEAGENTSTATUS) : LONG; stdcall;
  475. {$IFDEF Win32}
  476. function lineGetAgentStatusW(                                             // TAPI v2.0
  477.     hLine : HLINE;
  478.     dwAddressID : DWORD;
  479.     lpAgentStatus : LPLINEAGENTSTATUS) : LONG; stdcall;
  480. {$ENDIF}
  482. {$ENDIF}
  484. function lineGetAppPriority(                                             // TAPI v1.4 :
  485.     lpszAppFilename : LPCSTR;
  486.     dwMediaMode : DWORD;
  487.     lpExtensionID : LPLINEEXTENSIONID;
  488.     dwRequestMode : DWORD;
  489.     lpExtensionName : LPVARSTRING;
  490.     lpdwPriority : LPDWORD) : LONG; stdcall;
  492. {$IFDEF Win32}
  493. function lineGetAppPriorityA(                                            // TAPI v1.4
  494.     lpszAppFilename : LPCSTR;
  495.     dwMediaMode : DWORD;
  496.     lpExtensionID : LPLINEEXTENSIONID;
  497.     dwRequestMode : DWORD;
  498.     lpExtensionName : LPVARSTRING;
  499.     lpdwPriority : LPDWORD) : LONG; stdcall;
  501. function lineGetAppPriorityW(                                             // TAPI v1.4
  502.     lpszAppFilename : LPCWSTR;
  503.     dwMediaMode : DWORD;
  504.     lpExtensionID : LPLINEEXTENSIONID;
  505.     dwRequestMode : DWORD;
  506.     lpExtensionName : LPVARSTRING;
  507.     lpdwPriority : LPDWORD) : LONG; stdcall;
  508. {$ENDIF}
  510. function lineGetCallInfo(
  511.     hCall : HCALL;
  512.     lpCallInfo : LPLINECALLINFO) : LONG; stdcall;
  514. {$IFDEF Win32}
  515. function lineGetCallInfoA(
  516.     hCall : HCALL;
  517.     lpCallInfo : LPLINECALLINFO) : LONG; stdcall;
  519. function lineGetCallInfoW(
  520.     hCall : HCALL;
  521.     lpCallInfo : LPLINECALLINFO) : LONG; stdcall;
  522. {$ENDIF}
  524. function lineGetCallStatus(
  525.     hCall : HCALL;
  526.     lpCallStatus : LPLINECALLSTATUS) : LONG; stdcall;
  528. function lineGetConfRelatedCalls(
  529.     hCall : HCALL;
  530.     lpCallList : LPLINECALLLIST) : LONG; stdcall;
  532. function lineGetCountry(                                                 // TAPI v1.4
  533.     dwCountryID : DWORD;
  534.     dwAPIVersion : DWORD;
  535.     lpLineCountryList : LPLINECOUNTRYLIST) : LONG; stdcall;
  537. {$IFDEF Win32}
  538. function lineGetCountryA(                                                 // TAPI v1.4
  539.     dwCountryID : DWORD;
  540.     dwAPIVersion : DWORD;
  541.     lpLineCountryList : LPLINECOUNTRYLIST) : LONG; stdcall;
  543. function lineGetCountryW(                                                // TAPI v1.4
  544.     dwCountryID : DWORD;
  545.     dwAPIVersion : DWORD;
  546.     lpLineCountryList : LPLINECOUNTRYLIST) : LONG; stdcall;
  547. {$ENDIF}
  549. function lineGetDevCaps(
  550.     hLineApp : HLINEAPP;
  551.     dwDeviceID : DWORD;
  552.     dwAPIVersion : DWORD;
  553.     dwExtVersion : DWORD;
  554.     lpLineDevCaps : LPLINEDEVCAPS) : LONG; stdcall;
  556. {$IFDEF Win32}
  557. function lineGetDevCapsA(
  558.     hLineApp : HLINEAPP;
  559.     dwDeviceID : DWORD;
  560.     dwAPIVersion : DWORD;
  561.     dwExtVersion : DWORD;
  562.     lpLineDevCaps : LPLINEDEVCAPS) : LONG; stdcall;
  564. function lineGetDevCapsW(
  565.     hLineApp : HLINEAPP;
  566.     dwDeviceID : DWORD;
  567.     dwAPIVersion : DWORD;
  568.     dwExtVersion : DWORD;
  569.     lpLineDevCaps : LPLINEDEVCAPS) : LONG; stdcall;
  570. {$ENDIF}
  572. function lineGetDevConfig(
  573.     dwDeviceID : DWORD;
  574.     lpDeviceConfig : LPVARSTRING;
  575.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  577. {$IFDEF Win32}
  578. function lineGetDevConfigA(
  579.     dwDeviceID : DWORD;
  580.     lpDeviceConfig : LPVARSTRING;
  581.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  583. function lineGetDevConfigW(
  584.     dwDeviceID : DWORD;
  585.     lpDeviceConfig : LPVARSTRING;
  586.     lpszDeviceClass : LPCWSTR) : LONG; stdcall;
  587. {$ENDIF}
  589. function lineGetNewCalls(
  590.     hLine : HLINE;
  591.     dwAddressID : DWORD;
  592.     dwSelect : DWORD;
  593.     lpCallList : LPLINECALLLIST) : LONG; stdcall;
  595. function lineGetIcon(
  596.     dwDeviceID : DWORD;
  597.     lpszDeviceClass : LPCSTR;
  598.     var hIcon : HICON) : LONG; stdcall;
  600. {$IFDEF Win32}
  601. function lineGetIconA(
  602.     dwDeviceID : DWORD;
  603.     lpszDeviceClass : LPCSTR;
  604.     var hIcon : HICON) : LONG; stdcall;
  606. function lineGetIconW(
  607.     dwDeviceID : DWORD;
  608.     lpszDeviceClass : LPCWSTR;
  609.     var hIcon : HICON) : LONG; stdcall;
  610. {$ENDIF}
  612. function lineGetID(
  613.     hLine : HLINE;
  614.     dwAddressID : DWORD;
  615.     hCall : HCALL;
  616.     dwSelect : DWORD;
  617.     lpDeviceID : LPVARSTRING;
  618.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  620. {$IFDEF Win32}
  621. function lineGetIDA(
  622.     hLine : HLINE;
  623.     dwAddressID : DWORD;
  624.     hCall : HCALL;
  625.     dwSelect : DWORD;
  626.     lpDeviceID : LPVARSTRING;
  627.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  629. function lineGetIDW(
  630.     hLine : HLINE;
  631.     dwAddressID : DWORD;
  632.     hCall : HCALL;
  633.     dwSelect : DWORD;
  634.     lpDeviceID : LPVARSTRING;
  635.     lpszDeviceClass : LPCWSTR) : LONG; stdcall;
  636. {$ENDIF}
  638. function lineGetLineDevStatus(
  639.     hLine : HLINE;
  640.     lpLineDevStatus : LPLINEDEVSTATUS) : LONG; stdcall;
  642. {$IFDEF Win32}
  643. function lineGetLineDevStatusA(
  644.     hLine : HLINE;
  645.     lpLineDevStatus : LPLINEDEVSTATUS) : LONG; stdcall;
  647. function lineGetLineDevStatusW(
  648.     hLine : HLINE;
  649.     lpLineDevStatus : LPLINEDEVSTATUS) : LONG; stdcall;
  650. {$ENDIF}
  652. {$IFDEF Tapi_Ver20}
  653. function lineGetMessage(                                                 // TAPI v2.0
  654.     hLineApp : HLINEAPP;
  655.     lpMessage : LPLINEMESSAGE;
  656.     dwTimeout : DWORD) : LONG; stdcall;
  657. {$ENDIF}
  659. function lineGetNumRings(
  660.     hLine : HLINE;
  661.     dwAddressID : DWORD;
  662.     var lpdwNumRings : DWORD) : LONG; stdcall;
  664. function lineGetProviderList(                                            // TAPI v1.4
  665.     dwAPIVersion : DWORD;
  666.     lpProviderList : LPLINEPROVIDERLIST) : LONG; stdcall;
  668. {$IFDEF Win32}
  669. function lineGetProviderListA(
  670.     dwAPIVersion : DWORD;
  671.     lpProviderList : LPLINEPROVIDERLIST) : LONG; stdcall;
  673. function lineGetProviderListW(
  674.     dwAPIVersion : DWORD;
  675.     lpProviderList : LPLINEPROVIDERLIST) : LONG; stdcall;
  676. {$ENDIF}
  678. function lineGetRequest(
  679.     hLineApp : HLINEAPP;
  680.     dwRequestMode : DWORD;
  681.     lpRequestBuffer : LPVOID) : LONG; stdcall;
  683. {$IFDEF Win32}
  684. function lineGetRequestA(
  685.     hLineApp : HLINEAPP;
  686.     dwRequestMode : DWORD;
  687.     lpRequestBuffer : LPVOID) : LONG; stdcall;
  689. function lineGetRequestW(
  690.     hLineApp : HLINEAPP;
  691.     dwRequestMode : DWORD;
  692.     lpRequestBuffer : LPVOID) : LONG; stdcall;
  693. {$ENDIF}
  695. function lineGetStatusMessages(
  696.     hLine : HLINE;
  697.     lpdwLineStates : LPDWORD;
  698.     lpdwAddressStates : LPDWORD) : LONG; stdcall;
  700. function lineGetTranslateCaps(
  701.     hLineApp : HLINEAPP;
  702.     dwAPIVersion : DWORD;
  703.     lpTranslateCaps : LPLINETRANSLATECAPS) : LONG; stdcall;
  705. {$IFDEF Win32}
  706. function lineGetTranslateCapsA(
  707.     hLineApp : HLINEAPP;
  708.     dwAPIVersion : DWORD;
  709.     lpTranslateCaps : LPLINETRANSLATECAPS) : LONG; stdcall;
  711. function lineGetTranslateCapsW(
  712.     hLineApp : HLINEAPP;
  713.     dwAPIVersion : DWORD;
  714.     lpTranslateCaps : LPLINETRANSLATECAPS) : LONG; stdcall;
  715. {$ENDIF}
  717. function lineHandoff(
  718.     hCall : HCALL;
  719.     lpszFileName : LPCSTR;
  720.     dwMediaMode : DWORD) : LONG; stdcall;
  722. {$IFDEF Win32}
  723. function lineHandoffA(
  724.     hCall : HCALL;
  725.     lpszFileName : LPCSTR;
  726.     dwMediaMode : DWORD) : LONG; stdcall;
  728. function lineHandoffW(
  729.     hCall : HCALL;
  730.     lpszFileName : LPCWSTR;
  731.     dwMediaMode : DWORD) : LONG; stdcall;
  732. {$ENDIF}
  734. function lineHold(
  735.     hCall : HCALL) : LONG; stdcall;
  737. function lineInitialize(
  738.     lphLineApp : LPHLINEAPP;
  739.     hInstance : HINSTANCE;
  740.     lpfnCallback : TLINECALLBACK;
  741.     lpszAppName : LPCSTR;
  742.     lpdwNumDevs : LPDWORD) : LONG; stdcall;
  744. {$IFDEF Tapi_Ver20}
  746. {$IFDEF Win32}
  747. function lineInitializeExA(                                               // TAPI v2.0
  748.     lphLineApp : LPHLINEAPP;
  749.     hInstance : HINSTANCE;
  750.     lpfnCallback : TLINECALLBACK;
  751.     lpszFriendlyAppName : LPCSTR;
  752.     lpdwNumDevs : LPDWORD;
  753.     lpdwAPIVersion : LPDWORD;
  754.     lpLineInitializeExParams : LPLINEINITIALIZEEXPARAMS) : LONG; stdcall;
  755. {$ENDIF}
  757. function lineInitializeEx(                                               // TAPI v2.0
  758.     lphLineApp : LPHLINEAPP;
  759.     hInstance : HINSTANCE;
  760.     lpfnCallback : TLINECALLBACK;
  761.     lpszFriendlyAppName : LPCSTR;
  762.     lpdwNumDevs : LPDWORD;
  763.     lpdwAPIVersion : LPDWORD;
  764.     lpLineInitializeExParams : LPLINEINITIALIZEEXPARAMS) : LONG; stdcall;
  766. {$IFDEF Win32}
  767. function lineInitializeExW(                                               // TAPI v2.0
  768.     lphLineApp : LPHLINEAPP;
  769.     hInstance : HINSTANCE;
  770.     lpfnCallback : TLINECALLBACK;
  771.     lpszFriendlyAppName : LPCWSTR;
  772.     lpdwNumDevs : LPDWORD;
  773.     lpdwAPIVersion : LPDWORD;
  774.     lpLineInitializeExParams : LPLINEINITIALIZEEXPARAMS) : LONG; stdcall;
  775. {$ENDIF}
  777. {$ENDIF}
  779. function lineMakeCall(
  780.     hLine : HLINE;
  781.     lphCall : LPHCALL;
  782.     lpszDestAddress : LPCSTR;
  783.     dwCountryCode : DWORD;
  784.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  786. {$IFDEF Win32}
  787. function lineMakeCallA(
  788.     hLine : HLINE;
  789.     lphCall : LPHCALL;
  790.     lpszDestAddress : LPCSTR;
  791.     dwCountryCode : DWORD;
  792.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  794. function lineMakeCallW(
  795.     hLine : HLINE;
  796.     lphCall : LPHCALL;
  797.     lpszDestAddress : LPCWSTR;
  798.     dwCountryCode : DWORD;
  799.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  800. {$ENDIF}
  802. function lineMonitorDigits(
  803.     hCall : HCALL;
  804.     dwDigitModes : DWORD) : LONG; stdcall;
  806. function lineMonitorMedia(
  807.     hCall : HCALL;
  808.     dwMediaModes : DWORD) : LONG; stdcall;
  810. function lineMonitorTones(
  811.     hCall : HCALL;
  812.     const lpToneList : LPLINEMONITORTONE;
  813.     dwNumEntries : DWORD) : LONG; stdcall;
  815. function lineNegotiateAPIVersion(
  816.     hLineApp : HLINEAPP;
  817.     dwDeviceID : DWORD;
  818.     dwAPILowVersion : DWORD;
  819.     dwAPIHighVersion : DWORD;
  820.     lpdwAPIVersion : LPDWORD;
  821.     lpExtensionID : LPLINEEXTENSIONID) : LONG; stdcall;
  823. function lineNegotiateExtVersion(
  824.     hLineApp : HLINEAPP;
  825.     dwDeviceID : DWORD;
  826.     dwAPIVersion : DWORD;
  827.     dwExtLowVersion : DWORD;
  828.     dwExtHighVersion : DWORD;
  829.     lpdwExtVersion : LPDWORD) : LONG; stdcall;
  831. function lineOpen(
  832.     hLineApp : HLINEAPP;
  833.     dwDeviceID : DWORD;
  834.     lphLine : LPHLINE;
  835.     dwAPIVersion : DWORD;
  836.     dwExtVersion : DWORD;
  837.     dwCallbackInstance : DWORD;
  838.     dwPrivileges : DWORD;
  839.     dwMediaModes : DWORD;
  840.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  842. {$IFDEF Win32}
  843. function lineOpenA(
  844.     hLineApp : HLINEAPP;
  845.     dwDeviceID : DWORD;
  846.     lphLine : LPHLINE;
  847.     dwAPIVersion : DWORD;
  848.     dwExtVersion : DWORD;
  849.     dwCallbackInstance : DWORD;
  850.     dwPrivileges : DWORD;
  851.     dwMediaModes : DWORD;
  852.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  854. function lineOpenW(
  855.     hLineApp : HLINEAPP;
  856.     dwDeviceID : DWORD;
  857.     lphLine : LPHLINE;
  858.     dwAPIVersion : DWORD;
  859.     dwExtVersion : DWORD;
  860.     dwCallbackInstance : DWORD;
  861.     dwPrivileges : DWORD;
  862.     dwMediaModes : DWORD;
  863.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  864. {$ENDIF}
  866. function linePark(
  867.     hCall : HCALL;
  868.     dwParkMode : DWORD;
  869.     lpszDirAddress : LPCSTR;
  870.     lpNonDirAddress : LPVARSTRING) : LONG; stdcall;
  872. {$IFDEF Win32}
  873. function lineParkA(
  874.     hCall : HCALL;
  875.     dwParkMode : DWORD;
  876.     lpszDirAddress : LPCSTR;
  877.     lpNonDirAddress : LPVARSTRING) : LONG; stdcall;
  879. function lineParkW(
  880.     hCall : HCALL;
  881.     dwParkMode : DWORD;
  882.     lpszDirAddress : LPCWSTR;
  883.     lpNonDirAddress : LPVARSTRING) : LONG; stdcall;
  884. {$ENDIF}
  886. function linePickup(
  887.     hLine : HLINE;
  888.     dwAddressID : DWORD;
  889.     lphCall : LPHCALL;
  890.     lpszDestAddress : LPCSTR;
  891.     lpszGroupID : LPCSTR) : LONG; stdcall;
  893. {$IFDEF Win32}
  894. function linePickupA(
  895.     hLine : HLINE;
  896.     dwAddressID : DWORD;
  897.     lphCall : LPHCALL;
  898.     lpszDestAddress : LPCSTR;
  899.     lpszGroupID : LPCSTR) : LONG; stdcall;
  901. function linePickupW(
  902.     hLine : HLINE;
  903.     dwAddressID : DWORD;
  904.     lphCall : LPHCALL;
  905.     lpszDestAddress : LPCWSTR;
  906.     lpszGroupID : LPCWSTR) : LONG; stdcall;
  907. {$ENDIF}
  909. function linePrepareAddToConference(
  910.     hConfCall : HCALL;
  911.     lphConsultCall : LPHCALL;
  912.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  914. {$IFDEF Win32}
  915. function linePrepareAddToConferenceA(
  916.     hConfCall : HCALL;
  917.     lphConsultCall : LPHCALL;
  918.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  920. function linePrepareAddToConferenceW(
  921.     hConfCall : HCALL;
  922.     lphConsultCall : LPHCALL;
  923.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  924. {$ENDIF}
  926. {$IFDEF Tapi_Ver20}
  927. function lineProxyMessage(                                               // TAPI v2.0
  928.     hLine : HLINE;
  929.     hCall : HCALL;
  930.     dwMsg : DWORD;
  931.     dwParam1 : DWORD;
  932.     dwParam2 : DWORD;
  933.     dwParam3 : DWORD) : LONG; stdcall;
  935. function lineProxyResponse(                                              // TAPI v2.0
  936.     hLine : HLINE;
  937.     lpProxyRequest : LPLINEPROXYREQUEST;
  938.     dwResult : DWORD) : LONG; stdcall;
  939. {$ENDIF}
  941. function lineRedirect(
  942.     hCall : HCALL;
  943.     lpszDestAddress : LPCSTR;
  944.     dwCountryCode : DWORD) : LONG; stdcall;
  946. {$IFDEF Win32}
  947. function lineRedirectA(
  948.     hCall : HCALL;
  949.     lpszDestAddress : LPCSTR;
  950.     dwCountryCode : DWORD) : LONG; stdcall;
  952. function lineRedirectW(
  953.     hCall : HCALL;
  954.     lpszDestAddress : LPCWSTR;
  955.     dwCountryCode : DWORD) : LONG; stdcall;
  956. {$ENDIF}
  958. function lineRegisterRequestRecipient(
  959.     hLineApp : HLINEAPP;
  960.     dwRegistrationInstance : DWORD;
  961.     dwRequestMode : DWORD;
  962.     bEnable : DWORD) : LONG; stdcall;
  964. function lineReleaseUserUserInfo(                                        // TAPI v1.4
  965.     hCall : HCALL) : LONG; stdcall;
  967. function lineRemoveFromConference(
  968.     hCall : HCALL) : LONG; stdcall;
  970. function lineRemoveProvider(                                             // TAPI v1.4
  971.     dwPermanentProviderID : DWORD;
  972.     hwndOwner : HWND) : LONG; stdcall;
  974. function lineSecureCall(
  975.     hCall : HCALL) : LONG; stdcall;
  977. function lineSendUserUserInfo(
  978.     hCall : HCALL;
  979.     lpsUserUserInfo : LPCSTR;
  980.     dwSize : DWORD) : LONG; stdcall;
  982. {$IFDEF Tapi_Ver20}
  983. function lineSetAgentActivity(                                           // TAPI v2.0
  984.     hLine : HLINE;
  985.     dwAddressID : DWORD;
  986.     dwActivityID : DWORD) : LONG; stdcall;
  988. function lineSetAgentGroup(                                              // TAPI v2.0
  989.     hLine : HLINE;
  990.     dwAddressID : DWORD;
  991.     lpAgentGroupList : LPLINEAGENTGROUPLIST) : LONG; stdcall;
  993. function lineSetAgentState(                                              // TAPI v2.0
  994.     hLine : HLINE;
  995.     dwAddressID : DWORD;
  996.     dwAgentState : DWORD;
  997.     dwNextAgentState : DWORD) : LONG; stdcall;
  998. {$ENDIF}
  1000. function lineSetAppPriority(                                             // TAPI v1.4
  1001.     lpszAppFilename : LPCSTR;
  1002.     dwMediaMode : DWORD;
  1003.     lpExtensionID : LPLINEEXTENSIONID;
  1004.     dwRequestMode : DWORD;
  1005.     lpszExtensionName : LPCSTR;
  1006.     dwPriority : DWORD) : LONG; stdcall;
  1008. {$IFDEF Win32}
  1009. function lineSetAppPriorityA(                                             // TAPI v1.4
  1010.     lpszAppFilename : LPCSTR;
  1011.     dwMediaMode : DWORD;
  1012.     lpExtensionID : LPLINEEXTENSIONID;
  1013.     dwRequestMode : DWORD;
  1014.     lpszExtensionName : LPCSTR;
  1015.     dwPriority : DWORD) : LONG; stdcall;
  1017. function lineSetAppPriorityW(                                             // TAPI v1.4
  1018.     lpszAppFilename : LPCWSTR;
  1019.     dwMediaMode : DWORD;
  1020.     lpExtensionID : LPLINEEXTENSIONID;
  1021.     dwRequestMode : DWORD;
  1022.     lpszExtensionName : LPCWSTR;
  1023.     dwPriority : DWORD) : LONG; stdcall;
  1024. {$ENDIF}
  1026. function lineSetAppSpecific(
  1027.     hCall : HCALL;
  1028.     dwAppSpecific : DWORD) : LONG; stdcall;
  1030. {$IFDEF Tapi_Ver20}
  1031. function lineSetCallData(                                                // TAPI v2.0
  1032.     hCall : HCALL;
  1033.     lpCallData : LPVOID;
  1034.     dwSize : DWORD) : LONG; stdcall;
  1035. {$ENDIF}
  1037. function lineSetCallParams(
  1038.     hCall : HCALL;
  1039.     dwBearerMode : DWORD;
  1040.     dwMinRate : DWORD;
  1041.     dwMaxRate : DWORD;
  1042.     const lpDialParams : LPLINEDIALPARAMS) : LONG; stdcall;
  1044. function lineSetCallPrivilege(
  1045.     hCall : HCALL;
  1046.     dwCallPrivilege : DWORD) : LONG; stdcall;
  1048. {$IFDEF Tapi_Ver20}
  1049. function lineSetCallQualityOfService(                                    // TAPI v2.0
  1050.     hCall : HCALL;
  1051.     lpSendingFlowspec : LPVOID;
  1052.     dwSendingFlowspecSize : DWORD;
  1053.     lpReceivingFlowspec : LPVOID;
  1054.     dwReceivingFlowspecSize : DWORD) : LONG; stdcall;
  1056. function lineSetCallTreatment(                                           // TAPI v2.0
  1057.     hCall : HCALL;
  1058.     dwTreatment : DWORD) : LONG; stdcall;
  1059. {$ENDIF}
  1061. function lineSetCurrentLocation(
  1062.     hLineApp : HLINEAPP;
  1063.     dwLocation : DWORD) : LONG; stdcall;
  1065. function lineSetDevConfig(
  1066.     dwDeviceID : DWORD;
  1067.     const lpDeviceConfig : LPVOID;
  1068.     dwSize : DWORD;
  1069.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  1071. {$IFDEF Win32}
  1072. function lineSetDevConfigA(
  1073.     dwDeviceID : DWORD;
  1074.     const lpDeviceConfig : LPVOID;
  1075.     dwSize : DWORD;
  1076.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  1078. function lineSetDevConfigW(
  1079.     dwDeviceID : DWORD;
  1080.     const lpDeviceConfig : LPVOID;
  1081.     dwSize : DWORD;
  1082.     lpszDeviceClass : LPCWSTR) : LONG; stdcall;
  1083. {$ENDIF}
  1085. {$IFDEF Tapi_Ver20}
  1086. function lineSetLineDevStatus(                                           // TAPI v2.0
  1087.     hLine : HLINE;
  1088.     dwStatusToChange : DWORD;
  1089.     fStatus : DWORD) : LONG; stdcall;
  1090. {$ENDIF}
  1092. function lineSetMediaControl(
  1093.     hLine : HLINE;
  1094.     dwAddressID : DWORD;
  1095.     hCall : HCALL;
  1096.     dwSelect : DWORD;
  1097.     const lpDigitList : LPLINEMEDIACONTROLDIGIT;
  1098.     dwDigitNumEntries : DWORD;
  1099.     const lpMediaList : LPLINEMEDIACONTROLMEDIA;
  1100.     dwMediaNumEntries : DWORD;
  1101.     const lpToneList : LPLINEMEDIACONTROLTONE;
  1102.     dwToneNumEntries : DWORD;
  1103.     const lpCallStateList : LPLINEMEDIACONTROLCALLSTATE;
  1104.     dwCallStateNumEntries : DWORD) : LONG; stdcall;
  1106. function lineSetMediaMode(
  1107.     hCall : HCALL;
  1108.     dwMediaModes : DWORD) : LONG; stdcall;
  1110. function lineSetNumRings(
  1111.     hLine : HLINE;
  1112.     dwAddressID : DWORD;
  1113.     dwNumRings : DWORD) : LONG; stdcall;
  1115. function lineSetStatusMessages(
  1116.     hLine : HLINE;
  1117.     dwLineStates : DWORD;
  1118.     dwAddressStates : DWORD) : LONG; stdcall;
  1120. function lineSetTerminal(
  1121.     hLine : HLINE;
  1122.     dwAddressID : DWORD;
  1123.     hCall : HCALL;
  1124.     dwSelect : DWORD;
  1125.     dwTerminalModes : DWORD;
  1126.     dwTerminalID : DWORD;
  1127.     bEnable : DWORD) : LONG; stdcall;
  1129. function lineSetTollList(
  1130.     hLineApp : HLINEAPP;
  1131.     dwDeviceID : DWORD;
  1132.     lpszAddressIn : LPCSTR;
  1133.     dwTollListOption : DWORD) : LONG; stdcall;
  1135. {$IFDEF Win32}
  1136. function lineSetTollListA(
  1137.     hLineApp : HLINEAPP;
  1138.     dwDeviceID : DWORD;
  1139.     lpszAddressIn : LPCSTR;
  1140.     dwTollListOption : DWORD) : LONG; stdcall;
  1142. function lineSetTollListW(
  1143.     hLineApp : HLINEAPP;
  1144.     dwDeviceID : DWORD;
  1145.     lpszAddressInW : LPCWSTR;
  1146.     dwTollListOption : DWORD) : LONG; stdcall;
  1147. {$ENDIF}
  1149. function lineSetupConference(
  1150.     hCall : HCALL;
  1151.     hLine : HLINE;
  1152.     lphConfCall : LPHCALL;
  1153.     lphConsultCall : LPHCALL;
  1154.     dwNumParties : DWORD;
  1155.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  1157. {$IFDEF Win32}
  1158. function lineSetupConferenceA(
  1159.     hCall : HCALL;
  1160.     hLine : HLINE;
  1161.     lphConfCall : LPHCALL;
  1162.     lphConsultCall : LPHCALL;
  1163.     dwNumParties : DWORD;
  1164.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  1166. function lineSetupConferenceW(
  1167.     hCall : HCALL;
  1168.     hLine : HLINE;
  1169.     lphConfCall : LPHCALL;
  1170.     lphConsultCall : LPHCALL;
  1171.     dwNumParties : DWORD;
  1172.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  1173. {$ENDIF}
  1175. function lineSetupTransfer(
  1176.     hCall : HCALL;
  1177.     lphConsultCall : LPHCALL;
  1178.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  1180. {$IFDEF Win32}
  1181. function lineSetupTransferA(
  1182.     hCall : HCALL;
  1183.     lphConsultCall : LPHCALL;
  1184.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  1186. function lineSetupTransferW(
  1187.     hCall : HCALL;
  1188.     lphConsultCall : LPHCALL;
  1189.     const lpCallParams : LPLINECALLPARAMS) : LONG; stdcall;
  1190. {$ENDIF}
  1192. function lineShutdown(
  1193.     hLineApp : HLINEAPP) : LONG; stdcall;
  1195. function lineSwapHold(
  1196.     hActiveCall : HCALL;
  1197.     hHeldCall : HCALL) : LONG; stdcall;
  1199. function lineTranslateAddress(
  1200.     hLineApp : HLINEAPP;
  1201.     dwDeviceID : DWORD;
  1202.     dwAPIVersion : DWORD;
  1203.     lpszAddressIn : LPCSTR;
  1204.     dwCard : DWORD;
  1205.     dwTranslateOptions : DWORD;
  1206.     lpTranslateOutput : LPLINETRANSLATEOUTPUT) : LONG; stdcall;
  1208. {$IFDEF Win32}
  1209. function lineTranslateAddressA(
  1210.     hLineApp : HLINEAPP;
  1211.     dwDeviceID : DWORD;
  1212.     dwAPIVersion : DWORD;
  1213.     lpszAddressIn : LPCSTR;
  1214.     dwCard : DWORD;
  1215.     dwTranslateOptions : DWORD;
  1216.     lpTranslateOutput : LPLINETRANSLATEOUTPUT) : LONG; stdcall;
  1218. function lineTranslateAddressW(
  1219.     hLineApp : HLINEAPP;
  1220.     dwDeviceID : DWORD;
  1221.     dwAPIVersion : DWORD;
  1222.     lpszAddressIn : LPCWSTR;
  1223.     dwCard : DWORD;
  1224.     dwTranslateOptions : DWORD;
  1225.     lpTranslateOutput : LPLINETRANSLATEOUTPUT) : LONG; stdcall;
  1226. {$ENDIF}
  1228. function lineTranslateDialog(                                            // TAPI v1.4
  1229.     hLineApp : HLINEAPP;
  1230.     dwDeviceID : DWORD;
  1231.     dwAPIVersion : DWORD;
  1232.     hwndOwner : HWND;
  1233.     lpszAddressIn : LPCSTR) : LONG; stdcall;
  1235. {$IFDEF Win32}
  1236. function lineTranslateDialogA(                                            // TAPI v1.4
  1237.     hLineApp : HLINEAPP;
  1238.     dwDeviceID : DWORD;
  1239.     dwAPIVersion : DWORD;
  1240.     hwndOwner : HWND;
  1241.     lpszAddressIn : LPCSTR) : LONG; stdcall;
  1243. function lineTranslateDialogW(
  1244.     hLineApp : HLINEAPP;
  1245.     dwDeviceID : DWORD;
  1246.     dwAPIVersion : DWORD;
  1247.     hwndOwner : HWND;
  1248.     lpszAddressIn : LPCWSTR) : LONG; stdcall;
  1249. {$ENDIF}
  1251. function lineUncompleteCall(
  1252.     hLine : HLINE;
  1253.     dwCompletionID : DWORD) : LONG; stdcall;
  1255. function lineUnhold(
  1256.     hCall : HCALL) : LONG; stdcall;
  1258. function lineUnpark(
  1259.     hLine : HLINE;
  1260.     dwAddressID : DWORD;
  1261.     lphCall : LPHCALL;
  1262.     lpszDestAddress : LPCSTR) : LONG; stdcall;
  1264. {$IFDEF Win32}
  1265. function lineUnparkA(
  1266.     hLine : HLINE;
  1267.     dwAddressID : DWORD;
  1268.     lphCall : LPHCALL;
  1269.     lpszDestAddress : LPCSTR) : LONG; stdcall;
  1271. function lineUnparkW(
  1272.     hLine : HLINE;
  1273.     dwAddressID : DWORD;
  1274.     lphCall : LPHCALL;
  1275.     lpszDestAddress : LPCWSTR) : LONG; stdcall;
  1276. {$ENDIF}
  1278. function phoneClose(
  1279.     hPhone : HPHONE) : LONG; stdcall;
  1281. function phoneConfigDialog(
  1282.     dwDeviceID : DWORD;
  1283.     hwndOwner : HWND;
  1284.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  1286. {$IFDEF Win32}
  1287. function phoneConfigDialogA(
  1288.     dwDeviceID : DWORD;
  1289.     hwndOwner : HWND;
  1290.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  1292. function phoneConfigDialogW(
  1293.     dwDeviceID : DWORD;
  1294.     hwndOwner : HWND;
  1295.     lpszDeviceClass : LPCWSTR) : LONG; stdcall;
  1296. {$ENDIF}
  1298. function phoneDevSpecific(
  1299.     hPhone : HPHONE;
  1300.     lpParams : LPVOID;
  1301.     dwSize : DWORD) : LONG; stdcall;
  1303. function phoneGetButtonInfo(
  1304.     hPhone : HPHONE;
  1305.     dwButtonLampID : DWORD;
  1306.     lpButtonInfo : LPPHONEBUTTONINFO) : LONG; stdcall;
  1308. {$IFDEF Win32}
  1309. function phoneGetButtonInfoA(
  1310.     hPhone : HPHONE;
  1311.     dwButtonLampID : DWORD;
  1312.     lpButtonInfo : LPPHONEBUTTONINFO) : LONG; stdcall;
  1314. function phoneGetButtonInfoW(
  1315.     hPhone : HPHONE;
  1316.     dwButtonLampID : DWORD;
  1317.     lpButtonInfo : LPPHONEBUTTONINFO) : LONG; stdcall;
  1318. {$ENDIF}
  1320. function phoneGetData(
  1321.     hPhone : HPHONE;
  1322.     dwDataID : DWORD;
  1323.     lpData : LPVOID;
  1324.     dwSize : DWORD) : LONG; stdcall;
  1326. function phoneGetDevCaps(
  1327.     hPhoneApp : HPHONEAPP;
  1328.     dwDeviceID : DWORD;
  1329.     dwAPIVersion : DWORD;
  1330.     dwExtVersion : DWORD;
  1331.     lpPhoneCaps : LPPHONECAPS) : LONG; stdcall;
  1333. {$IFDEF Win32}
  1334. function phoneGetDevCapsA(
  1335.     hPhoneApp : HPHONEAPP;
  1336.     dwDeviceID : DWORD;
  1337.     dwAPIVersion : DWORD;
  1338.     dwExtVersion : DWORD;
  1339.     lpPhoneCaps : LPPHONECAPS) : LONG; stdcall;
  1341. function phoneGetDevCapsW(
  1342.     hPhoneApp : HPHONEAPP;
  1343.     dwDeviceID : DWORD;
  1344.     dwAPIVersion : DWORD;
  1345.     dwExtVersion : DWORD;
  1346.     lpPhoneCaps : LPPHONECAPS) : LONG; stdcall;
  1347. {$ENDIF}
  1349. function phoneGetDisplay(
  1350.     hPhone : HPHONE;
  1351.     lpDisplay : LPVARSTRING) : LONG; stdcall;
  1353. function phoneGetGain(
  1354.     hPhone : HPHONE;
  1355.     dwHookSwitchDev : DWORD;
  1356.     lpdwGain : LPDWORD) : LONG; stdcall;
  1358. function phoneGetHookSwitch(
  1359.     hPhone : HPHONE;
  1360.     lpdwHookSwitchDevs : LPDWORD) : LONG; stdcall;
  1362. function phoneGetIcon(
  1363.     dwDeviceID : DWORD;
  1364.     lpszDeviceClass : LPCSTR;
  1365.     lphIcon : LPHICON) : LONG; stdcall;
  1367. {$IFDEF Win32}
  1368. function phoneGetIconA(
  1369.     dwDeviceID : DWORD;
  1370.     lpszDeviceClass : LPCSTR;
  1371.     lphIcon : LPHICON) : LONG; stdcall;
  1373. function phoneGetIconW(
  1374.     dwDeviceID : DWORD;
  1375.     lpszDeviceClass : LPCWSTR;
  1376.     lphIcon : LPHICON) : LONG; stdcall;
  1377. {$ENDIF}
  1379. function phoneGetID(
  1380.     hPhone : HPHONE;
  1381.     lpDeviceID : LPVARSTRING;
  1382.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  1384. {$IFDEF Win32}
  1385. function phoneGetIDA(
  1386.     hPhone : HPHONE;
  1387.     lpDeviceID : LPVARSTRING;
  1388.     lpszDeviceClass : LPCSTR) : LONG; stdcall;
  1390. function phoneGetIDW(
  1391.     hPhone : HPHONE;
  1392.     lpDeviceID : LPVARSTRING;
  1393.     lpszDeviceClass : LPCWSTR) : LONG; stdcall;
  1394. {$ENDIF}
  1396. function phoneGetLamp(
  1397.     hPhone : HPHONE;
  1398.     dwButtonLampID : DWORD;
  1399.     lpdwLampMode : LPDWORD) : LONG; stdcall;
  1401. {$IFDEF Tapi_Ver20}
  1402. function phoneGetMessage(                                                // TAPI v2.0
  1403.     hPhoneApp : HPHONEAPP;
  1404.     lpMessage : LPPHONEMESSAGE;
  1405.     dwTimeout : DWORD) : LONG; stdcall;
  1406. {$ENDIF}
  1408. function phoneGetRing(
  1409.     hPhone : HPHONE;
  1410.     lpdwRingMode : LPDWORD;
  1411.     lpdwVolume : LPDWORD) : LONG; stdcall;
  1413. function phoneGetStatus(
  1414.     hPhone : HPHONE;
  1415.     lpPhoneStatus : LPPHONESTATUS) : LONG; stdcall;
  1417. {$IFDEF Win32}
  1418. function phoneGetStatusA(
  1419.     hPhone : HPHONE;
  1420.     lpPhoneStatus : LPPHONESTATUS) : LONG; stdcall;
  1422. function phoneGetStatusW(
  1423.     hPhone : HPHONE;
  1424.     lpPhoneStatus : LPPHONESTATUS) : LONG; stdcall;
  1425. {$ENDIF}
  1427. function phoneGetStatusMessages(
  1428.     hPhone : HPHONE;
  1429.     lpdwPhoneStates : LPDWORD;
  1430.     lpdwButtonModes : LPDWORD;
  1431.     lpdwButtonStates : LPDWORD) : LONG; stdcall;
  1433. function phoneGetVolume(
  1434.     hPhone : HPHONE;
  1435.     dwHookSwitchDev : DWORD;
  1436.     lpdwVolume : LPDWORD) : LONG; stdcall;
  1438. function phoneInitialize(
  1439.     lphPhoneApp : LPHPHONEAPP;
  1440.     hInstance : HINSTANCE;
  1441.     lpfnCallback : TPHONECALLBACK;
  1442.     lpszAppName : LPCSTR;
  1443.     lpdwNumDevs : LPDWORD) : LONG; stdcall;
  1446. {$IFDEF Tapi_Ver20}
  1447. {$IFDEF Win32}
  1448. function phoneInitializeExA(                                              // TAPI v2.0
  1449.     lphPhoneApp : LPHPHONEAPP;
  1450.     hInstance : HINSTANCE;
  1451.     lpfnCallback : TPHONECALLBACK;
  1452.     lpszFriendlyAppName : LPCSTR;
  1453.     lpdwNumDevs : LPDWORD;
  1454.     lpdwAPIVersion : LPDWORD;
  1455.     lpPhoneInitializeExParams : LPPHONEINITIALIZEEXPARAMS) : LONG; stdcall;
  1456. {$ENDIF}
  1458. function phoneInitializeEx(                                              // TAPI v2.0
  1459.     lphPhoneApp : LPHPHONEAPP;
  1460.     hInstance : HINSTANCE;
  1461.     lpfnCallback : TPHONECALLBACK;
  1462.     lpszFriendlyAppName : LPCSTR;
  1463.     lpdwNumDevs : LPDWORD;
  1464.     lpdwAPIVersion : LPDWORD;
  1465.     lpPhoneInitializeExParams : LPPHONEINITIALIZEEXPARAMS) : LONG; stdcall;
  1467. {$IFDEF Win32}
  1468. function phoneInitializeExW(                                              // TAPI v2.0
  1469.     lphPhoneApp : LPHPHONEAPP;
  1470.     hInstance : HINSTANCE;
  1471.     lpfnCallback : TPHONECALLBACK;
  1472.     lpszFriendlyAppName : LPCWSTR;
  1473.     lpdwNumDevs : LPDWORD;
  1474.     lpdwAPIVersion : LPDWORD;
  1475.     lpPhoneInitializeExParams : LPPHONEINITIALIZEEXPARAMS) : LONG; stdcall;
  1476. {$ENDIF}
  1478. {$ENDIF}
  1480. function phoneNegotiateAPIVersion(
  1481.     hPhoneApp : HPHONEAPP;
  1482.     dwDeviceID : DWORD;
  1483.     dwAPILowVersion : DWORD;
  1484.     dwAPIHighVersion : DWORD;
  1485.     lpdwAPIVersion : LPDWORD;
  1486.     lpExtensionID : LPPHONEEXTENSIONID) : LONG; stdcall;
  1488. function phoneNegotiateExtVersion(
  1489.     hPhoneApp : HPHONEAPP;
  1490.     dwDeviceID : DWORD;
  1491.     dwAPIVersion : DWORD;
  1492.     dwExtLowVersion : DWORD;
  1493.     dwExtHighVersion : DWORD;
  1494.     lpdwExtVersion : LPDWORD) : LONG; stdcall;
  1496. function phoneOpen(
  1497.     hPhoneApp : HPHONEAPP;
  1498.     dwDeviceID : DWORD;
  1499.     lphPhone : LPHPHONE;
  1500.     dwAPIVersion : DWORD;
  1501.     dwExtVersion : DWORD;
  1502.     dwCallbackInstance : DWORD;
  1503.     dwPrivilege : DWORD) : LONG; stdcall;
  1505. function phoneSetButtonInfo(
  1506.     hPhone : HPHONE;
  1507.     dwButtonLampID : DWORD;
  1508.     const lpButtonInfo : LPPHONEBUTTONINFO) : LONG; stdcall;
  1510. {$IFDEF Win32}
  1511. function phoneSetButtonInfoA(
  1512.     hPhone : HPHONE;
  1513.     dwButtonLampID : DWORD;
  1514.     const lpButtonInfo : LPPHONEBUTTONINFO) : LONG; stdcall;
  1516. function phoneSetButtonInfoW(
  1517.     hPhone : HPHONE;
  1518.     dwButtonLampID : DWORD;
  1519.     const lpButtonInfo : LPPHONEBUTTONINFO) : LONG; stdcall;
  1520. {$ENDIF}
  1522. function phoneSetData(
  1523.     hPhone : HPHONE;
  1524.     dwDataID : DWORD;
  1525.     const lpData : LPVOID;
  1526.     dwSize : DWORD) : LONG; stdcall;
  1528. function phoneSetDisplay(
  1529.     hPhone : HPHONE;
  1530.     dwRow : DWORD;
  1531.     dwColumn : DWORD;
  1532.     lpsDisplay : LPCSTR;
  1533.     dwSize : DWORD) : LONG; stdcall;
  1535. function phoneSetGain(
  1536.     hPhone : HPHONE;
  1537.     dwHookSwitchDev : DWORD;
  1538.     dwGain : DWORD) : LONG; stdcall;
  1540. function phoneSetHookSwitch(
  1541.     hPhone : HPHONE;
  1542.     dwHookSwitchDevs : DWORD;
  1543.     dwHookSwitchMode : DWORD) : LONG; stdcall;
  1545. function phoneSetLamp(
  1546.     hPhone : HPHONE;
  1547.     dwButtonLampID : DWORD;
  1548.     dwLampMode : DWORD) : LONG; stdcall;
  1550. function phoneSetRing(
  1551.     hPhone : HPHONE;
  1552.     dwRingMode : DWORD;
  1553.     dwVolume : DWORD) : LONG; stdcall;
  1555. function phoneSetStatusMessages(
  1556.     hPhone : HPHONE;
  1557.     dwPhoneStates : DWORD;
  1558.     dwButtonModes : DWORD;
  1559.     dwButtonStates : DWORD) : LONG; stdcall;
  1561. function phoneSetVolume(
  1562.     hPhone : HPHONE;
  1563.     dwHookSwitchDev : DWORD;
  1564.     dwVolume : DWORD) : LONG; stdcall;
  1566. function phoneShutdown(
  1567.     hPhoneApp : HPHONEAPP) : LONG; stdcall;
  1569. function tapiGetLocationInfo(
  1570.     lpszCountryCode : LPSTR;
  1571.     lpszCityCode : LPSTR) : LONG; stdcall;
  1573. {$IFDEF Win32}
  1574. function tapiGetLocationInfoA(
  1575.     lpszCountryCode : LPSTR;
  1576.     lpszCityCode : LPSTR) : LONG; stdcall;
  1578. function tapiGetLocationInfoW(
  1579.     lpszCountryCodeW : LPWSTR;
  1580.     lpszCityCodeW : LPWSTR) : LONG; stdcall;
  1581. {$ENDIF}
  1582.     
  1583. function tapiRequestDrop(
  1584.     hwnd : HWND;
  1585.     wRequestID : WPARAM) : LONG; stdcall;
  1587. function tapiRequestMakeCall(
  1588.     lpszDestAddress : LPCSTR;
  1589.     lpszAppName : LPCSTR;
  1590.     lpszCalledParty : LPCSTR;
  1591.     lpszComment : LPCSTR) : LONG; stdcall;
  1593. {$IFDEF Win32}
  1594. function tapiRequestMakeCallA(
  1595.     lpszDestAddress : LPCSTR;
  1596.     lpszAppName : LPCSTR;
  1597.     lpszCalledParty : LPCSTR;
  1598.     lpszComment : LPCSTR) : LONG; stdcall;
  1600. function tapiRequestMakeCallW(
  1601.     lpszDestAddress : LPCWSTR;
  1602.     lpszAppName : LPCWSTR;
  1603.     lpszCalledParty : LPCWSTR;
  1604.     lpszComment : LPCWSTR) : LONG; stdcall;
  1605. {$ENDIF}
  1606.     
  1607. function tapiRequestMediaCall(
  1608.     hwnd : HWND;
  1609.     wRequestID : WPARAM;
  1610.     lpszDeviceClass : LPCSTR;
  1611.     lpDeviceID : LPCSTR;
  1612.     dwSize : DWORD;
  1613.     dwSecure : DWORD;
  1614.     lpszDestAddress : LPCSTR;
  1615.     lpszAppName : LPCSTR;
  1616.     lpszCalledParty : LPCSTR;
  1617.     lpszComment : LPCSTR) : LONG; stdcall;
  1619. {$IFDEF Win32}
  1620. function tapiRequestMediaCallA(
  1621.     hwnd : HWND;
  1622.     wRequestID : WPARAM;
  1623.     lpszDeviceClass : LPCSTR;
  1624.     lpDeviceID : LPCSTR;
  1625.     dwSize : DWORD;
  1626.     dwSecure : DWORD;
  1627.     lpszDestAddress : LPCSTR;
  1628.     lpszAppName : LPCSTR;
  1629.     lpszCalledParty : LPCSTR;
  1630.     lpszComment : LPCSTR) : LONG; stdcall;
  1632. function tapiRequestMediaCallW(
  1633.     hwnd : HWND;
  1634.     wRequestID : WPARAM;
  1635.     lpszDeviceClass : LPCWSTR;
  1636.     lpDeviceID : LPCWSTR;
  1637.     dwSize : DWORD;
  1638.     dwSecure : DWORD;
  1639.     lpszDestAddress : LPCWSTR;
  1640.     lpszAppName : LPCWSTR;
  1641.     lpszCalledParty : LPCWSTR) : LONG; stdcall;
  1642. {$ENDIF}
  1644. (*
  1646. TAPIERROR_FORMATMESSAGE - macro to convert a TAPI error constant
  1647.     into a constant that FormatMessage will accept
  1648.     
  1649.         TAPIERR : Negative numbers and 0
  1650.             Map to : strip off high WORD
  1651.             Example: 0xFFFFFFFF (-1) becomes 0x0000FFFF
  1652.         LINEERR : Start at 0x80000000
  1653.             Map to : strip off 0x80000000 and add 0xE000
  1654.             Example: 0x80000004 becomes 0x0000E004
  1655.         PHONEERR: Start at 0x90000000
  1656.             Map to : strip off 0x90000000 and add 0xF000
  1657.             Example: 0x9000000A becomes 0x0000F00A
  1659.         pseudocode:
  1660.         
  1661.         if (__ErrCode__ is a TAPIERR)
  1662.             strip off high word
  1664.             else if (__ErrCode__ is a PHONEERR)
  1665.                 strip off 0x90000000
  1666.                 add 0xE000
  1668.                 else
  1669.                     strip off 0x80000000
  1670.                     add 0xF000
  1672. *)
  1674. //function TAPIERROR_FORMATMESSAGE (ErrCode : INT) : INT;
  1676. {!! Convenience functions added for Delphi: }
  1678. //function TapiError (ResultCode : Integer) : Boolean;
  1679.   {-Returns True if ResultCode indicates an error; True if success }
  1681. {!!}
  1683. implementation
  1685. uses
  1686.   SysUtils, TAPILine;
  1688. const
  1689. {$IFDEF Win32}
  1690.   TapiDll = 'tapi32.dll';
  1691. {$ELSE}
  1692.   TapiDll = 'tapi.dll';
  1693. {$ENDIF}
  1695. function lineAccept; external TapiDll name 'lineAccept';
  1696. function lineAddProvider; external TapiDll name 'lineAddProvider';
  1697. function lineAddToConference; external TapiDll name 'lineAddToConference';
  1698. {$IFDEF Tapi_Ver20}
  1699. function lineAgentSpecific; external TapiDll name 'lineAgentSpecific';
  1700. {$ENDIF}
  1701. function lineAnswer; external TapiDll name 'lineAnswer';
  1702. function lineBlindTransfer; external TapiDll name 'lineBlindTransfer';
  1703. function lineClose; external TapiDll name 'lineClose';
  1704. function lineCompleteCall; external TapiDll name 'lineCompleteCall';
  1705. function lineCompleteTransfer; external TapiDll name 'lineCompleteTransfer';
  1706. function lineConfigDialog; external TapiDll name 'lineConfigDialog';
  1707. function lineConfigDialogEdit; external TapiDll name 'lineConfigDialogEdit';
  1708. function lineConfigProvider; external TapiDll name 'lineConfigProvider';
  1709. function lineDeallocateCall; external TapiDll name 'lineDeallocateCall';
  1710. function lineDevSpecific; external TapiDll name 'lineDevSpecific';
  1711. function lineDevSpecificFeature; external TapiDll name 'lineDevSpecificFeature';
  1712. function lineDial; external TapiDll name 'lineDial';
  1713. function lineDrop; external TapiDll name 'lineDrop';
  1714. function lineForward; external TapiDll name 'lineForward';
  1715. function lineGatherDigits; external TapiDll name 'lineGatherDigits';
  1716. function lineGenerateDigits; external TapiDll name 'lineGenerateDigits';
  1717. function lineGenerateTone; external TapiDll name 'lineGenerateTone';
  1718. function lineGetAddressCaps; external TapiDll name 'lineGetAddressCaps';
  1719. function lineGetAddressID; external TapiDll name 'lineGetAddressID';
  1720. function lineGetAddressStatus; external TapiDll name 'lineGetAddressStatus';
  1721. {$IFDEF Tapi_Ver20}
  1722. function lineGetAgentStatus; external TapiDll name 'lineGetAgentStatus';
  1723. function lineGetAgentGroupList; external TapiDll name 'lineGetAgentGroupList';
  1724. function lineGetAgentCaps; external TapiDll name 'lineGetAgentCaps';
  1725. function lineGetAgentActivityList; external TapiDll name 'lineGetAgentActivityList';
  1726. {$ENDIF}
  1727. function lineGetAppPriority; external TapiDll name 'lineGetAppPriority';
  1728. function lineGetCallInfo; external TapiDll name 'lineGetCallInfo';
  1729. function lineGetCallStatus; external TapiDll name 'lineGetCallStatus';
  1730. function lineGetConfRelatedCalls; external TapiDll name 'lineGetConfRelatedCalls';
  1731. function lineGetCountry; external TapiDll name 'lineGetCountry';
  1732. function lineGetDevCaps; external TapiDll name 'lineGetDevCaps';
  1733. function lineGetDevConfig; external TapiDll name 'lineGetDevConfig';
  1734. function lineGetNewCalls; external TapiDll name 'lineGetNewCalls';
  1735. function lineGetIcon; external TapiDll name 'lineGetIcon';
  1736. function lineGetID; external TapiDll name 'lineGetID';
  1737. function lineGetLineDevStatus; external TapiDll name 'lineGetLineDevStatus';
  1738. {$IFDEF Tapi_Ver20}
  1739. function lineGetMessage; external TapiDll name 'lineGetMessage';
  1740. {$ENDIF}
  1741. function lineGetNumRings; external TapiDll name 'lineGetNumRings';
  1742. function lineGetProviderList; external TapiDll name 'lineGetProviderList';
  1743. function lineGetRequest; external TapiDll name 'lineGetRequest';
  1744. function lineGetStatusMessages; external TapiDll name 'lineGetStatusMessages';
  1745. function lineGetTranslateCaps; external TapiDll name 'lineGetTranslateCaps';
  1746. function lineHandoff; external TapiDll name 'lineHandoff';
  1747. function lineHold; external TapiDll name 'lineHold';
  1748. function lineInitialize; external TapiDll name 'lineInitialize';
  1749. {$IFDEF Tapi_Ver20}
  1750. function lineInitializeEx; external TapiDll name 'lineInitializeEx';
  1751. {$ENDIF}
  1752. function lineMakeCall; external TapiDll name 'lineMakeCall';
  1753. function lineMonitorDigits; external TapiDll name 'lineMonitorDigits';
  1754. function lineMonitorMedia; external TapiDll name 'lineMonitorMedia';
  1755. function lineMonitorTones; external TapiDll name 'lineMonitorTones';
  1756. function lineNegotiateAPIVersion; external TapiDll name 'lineNegotiateAPIVersion';
  1757. function lineNegotiateExtVersion; external TapiDll name 'lineNegotiateExtVersion';
  1758. function lineOpen; external TapiDll name 'lineOpen';
  1759. function linePark; external TapiDll name 'linePark';
  1760. function linePickup; external TapiDll name 'linePickup';
  1761. function linePrepareAddToConference; external TapiDll name 'linePrepareAddToConference';
  1762. {$IFDEF Tapi_Ver20}
  1763. function lineProxyMessage; external TapiDll name 'lineProxyMessage';
  1764. function lineProxyResponse; external TapiDll name 'lineProxyResponse';
  1765. {$ENDIF}
  1766. function lineRedirect; external TapiDll name 'lineRedirect';
  1767. function lineRegisterRequestRecipient; external TapiDll name 'lineRegisterRequestRecipient';
  1768. function lineReleaseUserUserInfo; external TapiDll name 'lineReleaseUserUserInfo';
  1769. function lineRemoveFromConference; external TapiDll name 'lineRemoveFromConference';
  1770. function lineRemoveProvider; external TapiDll name 'lineRemoveProvider';
  1771. function lineSecureCall; external TapiDll name 'lineSecureCall';
  1772. function lineSendUserUserInfo; external TapiDll name 'lineSendUserUserInfo';
  1773. {$IFDEF Tapi_Ver20}
  1774. function lineSetAgentActivity; external TapiDll name 'lineSetAgentActivity';
  1775. function lineSetAgentGroup; external TapiDll name 'lineSetAgentGroup';
  1776. function lineSetAgentState; external TapiDll name 'lineSetAgentState';
  1777. {$ENDIF}
  1778. function lineSetAppPriority; external TapiDll name 'lineSetAppPriority';
  1779. function lineSetAppSpecific; external TapiDll name 'lineSetAppSpecific';
  1780. {$IFDEF Tapi_Ver20}
  1781. function lineSetCallData; external TapiDll name 'lineSetCallData';
  1782. {$ENDIF}
  1783. function lineSetCallParams; external TapiDll name 'lineSetCallParams';
  1784. function lineSetCallPrivilege; external TapiDll name 'lineSetCallPrivilege';
  1785. {$IFDEF Tapi_Ver20}
  1786. function lineSetCallQualityOfService; external TapiDll name 'lineSetCallQualityOfService';
  1787. function lineSetCallTreatment; external TapiDll name 'lineSetCallTreatment';
  1788. {$ENDIF}
  1789. function lineSetCurrentLocation; external TapiDll name 'lineSetCurrentLocation';
  1790. function lineSetDevConfig; external TapiDll name 'lineSetDevConfig';
  1791. {$IFDEF Tapi_Ver20}
  1792. function lineSetLineDevStatus; external TapiDll name 'lineSetLineDevStatus';
  1793. {$ENDIF}
  1794. function lineSetMediaControl; external TapiDll name 'lineSetMediaControl';
  1795. function lineSetMediaMode; external TapiDll name 'lineSetMediaMode';
  1796. function lineSetNumRings; external TapiDll name 'lineSetNumRings';
  1797. function lineSetStatusMessages; external TapiDll name 'lineSetStatusMessages';
  1798. function lineSetTerminal; external TapiDll name 'lineSetTerminal';
  1799. function lineSetTollList; external TapiDll name 'lineSetTollList';
  1800. function lineSetupConference; external TapiDll name 'lineSetupConference';
  1801. function lineSetupTransfer; external TapiDll name 'lineSetupTransfer';
  1802. function lineShutdown; external TapiDll name 'lineShutdown';
  1803. function lineSwapHold; external TapiDll name 'lineSwapHold';
  1804. function lineTranslateAddress; external TapiDll name 'lineTranslateAddress';
  1805. function lineTranslateDialog; external TapiDll name 'lineTranslateDialog';
  1806. function lineUncompleteCall; external TapiDll name 'lineUncompleteCall';
  1807. function lineUnhold; external TapiDll name 'lineUnhold';
  1808. function lineUnpark; external TapiDll name 'lineUnpark';
  1809. function phoneClose; external TapiDll name 'phoneClose';
  1810. function phoneConfigDialog; external TapiDll name 'phoneConfigDialog';
  1811. function phoneDevSpecific; external TapiDll name 'phoneDevSpecific';
  1812. function phoneGetButtonInfo; external TapiDll name 'phoneGetButtonInfo';
  1813. function phoneGetData; external TapiDll name 'phoneGetData';
  1814. function phoneGetDevCaps; external TapiDll name 'phoneGetDevCaps';
  1815. function phoneGetDisplay; external TapiDll name 'phoneGetDisplay';
  1816. function phoneGetGain; external TapiDll name 'phoneGetGain';
  1817. function phoneGetHookSwitch; external TapiDll name 'phoneGetHookSwitch';
  1818. function phoneGetIcon; external TapiDll name 'phoneGetIcon';
  1819. function phoneGetID; external TapiDll name 'phoneGetID';
  1820. function phoneGetLamp; external TapiDll name 'phoneGetLamp';
  1821. {$IFDEF Tapi_Ver20}
  1822. function phoneGetMessage; external TapiDll name 'phoneGetMessage';
  1823. {$ENDIF}
  1824. function phoneGetRing; external TapiDll name 'phoneGetRing';
  1825. function phoneGetStatus; external TapiDll name 'phoneGetStatus';
  1826. function phoneGetStatusMessages; external TapiDll name 'phoneGetStatusMessages';
  1827. function phoneGetVolume; external TapiDll name 'phoneGetVolume';
  1828. function phoneInitialize; external TapiDll name 'phoneInitialize';
  1829. {$IFDEF Tapi_Ver20}
  1830. function phoneInitializeEx; external TapiDll name 'phoneInitializeEx';
  1831. {$ENDIF}
  1832. function phoneNegotiateAPIVersion; external TapiDll name 'phoneNegotiateAPIVersion';
  1833. function phoneNegotiateExtVersion; external TapiDll name 'phoneNegotiateExtVersion';
  1834. function phoneOpen; external TapiDll name 'phoneOpen';
  1835. function phoneSetButtonInfo; external TapiDll name 'phoneSetButtonInfo';
  1836. function phoneSetData; external TapiDll name 'phoneSetData';
  1837. function phoneSetDisplay; external TapiDll name 'phoneSetDisplay';
  1838. function phoneSetGain; external TapiDll name 'phoneSetGain';
  1839. function phoneSetHookSwitch; external TapiDll name 'phoneSetHookSwitch';
  1840. function phoneSetLamp; external TapiDll name 'phoneSetLamp';
  1841. function phoneSetRing; external TapiDll name 'phoneSetRing';
  1842. function phoneSetStatusMessages; external TapiDll name 'phoneSetStatusMessages';
  1843. function phoneSetVolume; external TapiDll name 'phoneSetVolume';
  1844. function phoneShutdown; external TapiDll name 'phoneShutdown';
  1845. function tapiGetLocationInfo; external TapiDll name 'tapiGetLocationInfo';
  1846. function tapiRequestDrop; external TapiDll name 'tapiRequestDrop';
  1847. function tapiRequestMakeCall; external TapiDll name 'tapiRequestMakeCall';
  1848. function tapiRequestMediaCall; external TapiDll name 'tapiRequestMediaCall';
  1850. {$IFDEF Win32}
  1851. function lineAddProviderA; external TapiDll name 'lineAddProvider';
  1852. function lineAddProviderW; external TapiDll name 'lineAddProviderW';
  1853. function lineBlindTransferA; external TapiDll name 'lineBlindTransfer';
  1854. function lineBlindTransferW; external TapiDll name 'lineBlindTransferW';
  1855. function lineConfigDialogA; external TapiDll name 'lineConfigDialog';
  1856. function lineConfigDialogW; external TapiDll name 'lineConfigDialogW';
  1857. function lineConfigDialogEditA; external TapiDll name 'lineConfigDialogEdit';
  1858. function lineConfigDialogEditW; external TapiDll name 'lineConfigDialogEditW';
  1859. function lineDialA; external TapiDll name 'lineDial';
  1860. function lineDialW; external TapiDll name 'lineDialW';
  1861. function lineForwardA; external TapiDll name 'lineForward';
  1862. function lineForwardW; external TapiDll name 'lineForwardW';
  1863. function lineGatherDigitsA; external TapiDll name 'lineGatherDigits';
  1864. function lineGatherDigitsW; external TapiDll name 'lineGatherDigitsW';
  1865. function lineGenerateDigitsA; external TapiDll name 'lineGenerateDigits';
  1866. function lineGenerateDigitsW; external TapiDll name 'lineGenerateDigitsW';
  1867. function lineGetAddressCapsA; external TapiDll name 'lineGetAddressCaps';
  1868. function lineGetAddressCapsW; external TapiDll name 'lineGetAddressCapsW';
  1869. function lineGetAddressIDA; external TapiDll name 'lineGetAddressID';
  1870. function lineGetAddressIDW; external TapiDll name 'lineGetAddressIDW';
  1871. function lineGetAddressStatusA; external TapiDll name 'lineGetAddressStatus';
  1872. function lineGetAddressStatusW; external TapiDll name 'lineGetAddressStatusW';
  1873. function lineGetAgentActivityListA; external TapiDll name 'lineGetAgentActivityList';
  1874. function lineGetAgentActivityListW; external TapiDll name 'lineGetAgentActivityListW';
  1875. function lineGetAgentCapsA; external TapiDll name 'lineGetAgentCaps';
  1876. function lineGetAgentCapsW; external TapiDll name 'lineGetAgentCapsW';
  1877. function lineGetAgentGroupListA; external TapiDll name 'lineGetAgentGroupList';
  1878. function lineGetAgentGroupListW; external TapiDll name 'lineGetAgentGroupListW';
  1879. function lineGetAgentStatusA; external TapiDll name 'lineGetAgentStatus';
  1880. function lineGetAgentStatusW; external TapiDll name 'lineGetAgentStatusW';
  1881. function lineGetAppPriorityA; external TapiDll name 'lineGetAppPriority';
  1882. function lineGetAppPriorityW; external TapiDll name 'lineGetAppPriorityW';
  1883. function lineGetCallInfoA; external TapiDll name 'lineGetCallInfo';
  1884. function lineGetCallInfoW; external TapiDll name 'lineGetCallInfoW';
  1885. function lineGetCountryA; external TapiDll name 'lineGetCountry';
  1886. function lineGetCountryW; external TapiDll name 'lineGetCountryW';
  1887. function lineGetDevCapsA; external TapiDll name 'lineGetDevCaps';
  1888. function lineGetDevCapsW; external TapiDll name 'lineGetDevCapsW';
  1889. function lineGetDevConfigA; external TapiDll name 'lineGetDevConfig';
  1890. function lineGetDevConfigW; external TapiDll name 'lineGetDevConfigW';
  1891. function lineGetIconA; external TapiDll name 'lineGetIcon';
  1892. function lineGetIconW; external TapiDll name 'lineGetIconW';
  1893. function lineGetIDA; external TapiDll name 'lineGetID';
  1894. function lineGetIDW; external TapiDll name 'lineGetIDW';
  1895. function lineGetLineDevStatusA; external TapiDll name 'lineGetLineDevStatus';
  1896. function lineGetLineDevStatusW; external TapiDll name 'lineGetLineDevStatusW';
  1897. function lineGetProviderListA; external TapiDll name 'lineGetProviderList';
  1898. function lineGetProviderListW; external TapiDll name 'lineGetProviderListW';
  1899. function lineGetRequestA; external TapiDll name 'lineGetRequest';
  1900. function lineGetRequestW; external TapiDll name 'lineGetRequestW';
  1901. function lineGetTranslateCapsA; external TapiDll name 'lineGetTranslateCaps';
  1902. function lineGetTranslateCapsW; external TapiDll name 'lineGetTranslateCapsW';
  1903. function lineHandoffA; external TapiDll name 'lineHandoff';
  1904. function lineHandoffW; external TapiDll name 'lineHandoffW';
  1905. {$IFDEF Tapi_Ver20}
  1906. function lineInitializeExA; external TapiDll name 'lineInitializeEx';
  1907. function lineInitializeExW; external TapiDll name 'lineInitializeExW';
  1908. {$ENDIF}
  1909. function lineMakeCallA; external TapiDll name 'lineMakeCall';
  1910. function lineMakeCallW; external TapiDll name 'lineMakeCallW';
  1911. function lineOpenA; external TapiDll name 'lineOpen';
  1912. function lineOpenW; external TapiDll name 'lineOpenW';
  1913. function lineParkA; external TapiDll name 'linePark';
  1914. function lineParkW; external TapiDll name 'lineParkW';
  1915. function linePickupA; external TapiDll name 'linePickup';
  1916. function linePickupW; external TapiDll name 'linePickupW';
  1917. function linePrepareAddToConferenceA; external TapiDll name 'linePrepareAddToConference';
  1918. function linePrepareAddToConferenceW; external TapiDll name 'linePrepareAddToConferenceW';
  1919. function lineRedirectA; external TapiDll name 'lineRedirect';
  1920. function lineRedirectW; external TapiDll name 'lineRedirectW';
  1921. function lineSetAppPriorityA; external TapiDll name 'lineSetAppPriority';
  1922. function lineSetAppPriorityW; external TapiDll name 'lineSetAppPriorityW';
  1923. function lineSetDevConfigA; external TapiDll name 'lineSetDevConfig';
  1924. function lineSetDevConfigW; external TapiDll name 'lineSetDevConfigW';
  1925. function lineSetTollListA; external TapiDll name 'lineSetTollList';
  1926. function lineSetTollListW; external TapiDll name 'lineSetTollListW';
  1927. function lineSetupConferenceA; external TapiDll name 'lineSetupConference';
  1928. function lineSetupConferenceW; external TapiDll name 'lineSetupConferenceW';
  1929. function lineSetupTransferA; external TapiDll name 'lineSetupTransfer';
  1930. function lineSetupTransferW; external TapiDll name 'lineSetupTransferW';
  1931. function lineTranslateAddressA; external TapiDll name 'lineTranslateAddress';
  1932. function lineTranslateAddressW; external TapiDll name 'lineTranslateAddressW';
  1933. function lineTranslateDialogA; external TapiDll name 'lineTranslateDialog';
  1934. function lineTranslateDialogW; external TapiDll name 'lineTranslateDialogW';
  1935. function lineUnparkA; external TapiDll name 'lineUnpark';
  1936. function lineUnparkW; external TapiDll name 'lineUnparkW';
  1937. function phoneConfigDialogA; external TapiDll name 'phoneConfigDialog';
  1938. function phoneConfigDialogW; external TapiDll name 'phoneConfigDialogW';
  1939. function phoneGetButtonInfoA; external TapiDll name 'phoneGetButtonInfo';
  1940. function phoneGetButtonInfoW; external TapiDll name 'phoneGetButtonInfoW';
  1941. function phoneGetDevCapsA; external TapiDll name 'phoneGetDevCaps';
  1942. function phoneGetDevCapsW; external TapiDll name 'phoneGetDevCapsW';
  1943. function phoneGetIconA; external TapiDll name 'phoneGetIcon';
  1944. function phoneGetIconW; external TapiDll name 'phoneGetIconW';
  1945. function phoneGetIDA; external TapiDll name 'phoneGetID';
  1946. function phoneGetIDW; external TapiDll name 'phoneGetIDW';
  1947. function phoneGetStatusA; external TapiDll name 'phoneGetStatus';
  1948. function phoneGetStatusW; external TapiDll name 'phoneGetStatusW';
  1949. {$IFDEF Tapi_Ver20}
  1950. function phoneInitializeExA; external TapiDll name 'phoneInitializeEx';
  1951. function phoneInitializeExW; external TapiDll name 'phoneInitializeExW';
  1952. {$ENDIF}
  1953. function phoneSetButtonInfoA; external TapiDll name 'phoneSetButtonInfo';
  1954. function phoneSetButtonInfoW; external TapiDll name 'phoneSetButtonInfoW';
  1955. function tapiGetLocationInfoA; external TapiDll name 'tapiGetLocationInfo';
  1956. function tapiGetLocationInfoW; external TapiDll name 'tapiGetLocationInfoW';
  1957. function tapiRequestMakeCallA; external TapiDll name 'tapiRequestMakeCall';
  1958. function tapiRequestMakeCallW; external TapiDll name 'tapiRequestMakeCallW';
  1959. function tapiRequestMediaCallA; external TapiDll name 'tapiRequestMediaCall';
  1960. function tapiRequestMediaCallW; external TapiDll name 'tapiRequestMediaCallW';
  1961. {$ENDIF}
  1963. { For some strange reason this routine doesn't work.
  1964.   All Visual C++ samples do not use special macro to convert
  1965.   a TAPI error constant into a constant that FormatMessage will accept,
  1966.   I mean TAPIERROR_FORMATMESSAGE. }
  1968. {
  1969. function TAPIERROR_FORMATMESSAGE (ErrCode : INT) : INT;
  1970. begin
  1971.   if ErrCode > $FFFF0000 then
  1972.      Begin
  1973.      ErrCode := ErrCode shl sizeof (WORD);
  1974.      Result := ErrCode shr sizeof (WORD);
  1975. //    Result:=ErrCode and $FFFF
  1976.      End
  1977.   else if ErrCode > $10000000 then
  1978.     Result:=ErrCode - $90000000 + $F000
  1979.   else
  1980.     Result:=ErrCode - $80000000 + $E000
  1981. end;
  1983. function TapiError (ResultCode : Integer) : Boolean;
  1984. begin
  1985.   Result:=ResultCode < 0;
  1986. end;
  1988. procedure TapiCheck (ResultCode : Integer);
  1989. var
  1990.   S : string;
  1991.   p: PChar;
  1992. begin
  1993.   getmem (p, 10);
  1994.   if TapiError(ResultCode) then
  1995.     begin
  1996.     ResultCode:=TAPIERROR_FORMATMESSAGE(ResultCode);
  1997.     S:=SysErrorMessage(ResultCode);
  1999.       if S = '' then
  2000.         S:='Error ' + IntToStr(ResultCode);
  2001.       raise Exception.Create('TAPI error: ' + S);
  2002.     end;
  2003. end;
  2004. }
  2006. end.