TAPI编程

开发平台：

Delphi

Tapi.par：源码内容

{$EXTERNALSYM linedevstatus_tag}
TLineDevStatus = linedevstatus_tag;
LINEDEVSTATUS = linedevstatus_tag;
{$EXTERNALSYM LINEDEVSTATUS}
PLineExtensionId = ^TLineExtensionId;
lineextensionid_tag = packed record
dwExtensionID0,
dwExtensionID1,
dwExtensionID2,
dwExtensionID3: DWORD;
end;
{$EXTERNALSYM lineextensionid_tag}
TLineExtensionId = lineextensionid_tag;
LINEEXTENSIONID = lineextensionid_tag;
{$EXTERNALSYM LINEEXTENSIONID}
PLineForward = ^TLineForward;
lineforward_tag = packed record
dwForwardMode,
dwCallerAddressSize,
dwCallerAddressOffset,
dwDestCountryCode,
dwDestAddressSize,
dwDestAddressOffset: DWORD;
end;
{$EXTERNALSYM lineforward_tag}
TLineForward = lineforward_tag;
PLineForwardList = ^TLineForwardList;
lineforwardlist_tag = packed record
dwTotalSize,
dwNumEntries: DWORD;
ForwardList: array [0..0] of TLineForward;
end;
{$EXTERNALSYM lineforwardlist_tag}
TLineForwardList = lineforwardlist_tag;
LINEFORWARDLIST = lineforwardlist_tag;
{$EXTERNALSYM LINEFORWARDLIST}
PLineGenerateTone = ^TLineGenerateTone;
linegeneratetone_tag = packed record
dwFrequency,
dwCadenceOn,
dwCadenceOff,
dwVolume: DWORD;
end;
{$EXTERNALSYM linegeneratetone_tag}
TLineGenerateTone = linegeneratetone_tag;
{$IFDEF TAPI20}
{$NODEFINE TTAPIHandleUnion}
TTAPIHandleUnion = packed record
case Longint of
0: (hEvent: THandle);
1: (hCompletionPort: THandle);
end;
PLineInitializeExParams = ^TLineInitializeExParams;
lineinitializeexparams_tag = packed record
dwTotalSize, // TAPI v2.0
dwNeededSize, // TAPI v2.0
dwUsedSize, // TAPI v2.0
dwOptions: DWORD; // TAPI v2.0
Handles: TTAPIHandleUnion;
dwCompletionKey: DWORD; // TAPI v2.0
end;
{$EXTERNALSYM lineinitializeexparams_tag}
TLineInitializeExParams = lineinitializeexparams_tag;
LINEINITIALIZEEXPARAMS = lineinitializeexparams_tag;
{$EXTERNALSYM LINEINITIALIZEEXPARAMS}
{$ENDIF}
PLineLocationEntry = ^TLineLocationEntry;
linelocationentry_tag = packed record
dwPermanentLocationID,
dwLocationNameSize,
dwLocationNameOffset,
dwCountryCode,
dwCityCodeSize,
dwCityCodeOffset,
dwPreferredCardID,
dwLocalAccessCodeSize, // TAPI v1.4
dwLocalAccessCodeOffset, // TAPI v1.4
dwLongDistanceAccessCodeSize, // TAPI v1.4
dwLongDistanceAccessCodeOffset, // TAPI v1.4
dwTollPrefixListSize, // TAPI v1.4
dwTollPrefixListOffset, // TAPI v1.4
dwCountryID, // TAPI v1.4
dwOptions, // TAPI v1.4
dwCancelCallWaitingSize, // TAPI v1.4
dwCancelCallWaitingOffset: DWORD; // TAPI v1.4
end;
{$EXTERNALSYM linelocationentry_tag}
TLineLocationEntry = linelocationentry_tag;
LINELOCATIONENTRY = linelocationentry_tag;
{$EXTERNALSYM LINELOCATIONENTRY}
PLineMediaControlCallState = ^TLineMediaControlCallState;
linemediacontrolcallstate_tag = packed record
dwCallStates,
dwMediaControl: DWORD;
end;
{$EXTERNALSYM linemediacontrolcallstate_tag}
TLineMediaControlCallState = linemediacontrolcallstate_tag;
LINEMEDIACONTROLCALLSTATE = linemediacontrolcallstate_tag;
{$EXTERNALSYM LINEMEDIACONTROLCALLSTATE}
PLineMediaControlDigit = ^TLineMediaControlDigit;
linemediacontroldigit_tag = packed record
dwDigit,
dwDigitModes,
dwMediaControl: DWORD;
end;
{$EXTERNALSYM linemediacontroldigit_tag}
TLineMediaControlDigit = linemediacontroldigit_tag;
LINEMEDIACONTROLDIGIT = linemediacontroldigit_tag;
{$EXTERNALSYM LINEMEDIACONTROLDIGIT}
PLineMediaControlMedia = ^TLineMediaControlMedia;
linemediacontrolmedia_tag = packed record
dwMediaModes,
dwDuration,
dwMediaControl: DWORD;
end;
{$EXTERNALSYM linemediacontrolmedia_tag}
TLineMediaControlMedia = linemediacontrolmedia_tag;
LINEMEDIACONTROLMEDIA = linemediacontrolmedia_tag;
{$EXTERNALSYM LINEMEDIACONTROLMEDIA}
PLineMediaControlTone = ^TLineMediaControlTone;
linemediacontroltone_tag = packed record
dwAppSpecific,
dwDuration,
dwFrequency1,
dwFrequency2,
dwFrequency3,
dwMediaControl: DWORD;
end;
{$EXTERNALSYM linemediacontroltone_tag}
TLineMediaControlTone = linemediacontroltone_tag;
LINEMEDIACONTROLTONE = linemediacontroltone_tag;
{$EXTERNALSYM LINEMEDIACONTROLTONE}
{$IFDEF TAPI20}
PLineMessage = ^TLineMessage;
linemessage_tag = packed record
hDevice, // TAPI v2.0
dwMessageID, // TAPI v2.0
dwCallbackInstance, // TAPI v2.0
dwParam1, // TAPI v2.0
dwParam2, // TAPI v2.0
dwParam3: DWORD; // TAPI v2.0
end;
{$EXTERNALSYM linemessage_tag}
TLineMessage = linemessage_tag;
LINEMESSAGE = linemessage_tag;
{$EXTERNALSYM LINEMESSAGE}
{$ENDIF}
PLineMonitorTone = ^TLineMonitorTone;
linemonitortone_tag = packed record
dwAppSpecific,
dwDuration,
dwFrequency1,
dwFrequency2,
dwFrequency3: DWORD;
end;
{$EXTERNALSYM linemonitortone_tag}
TLineMonitorTone = linemonitortone_tag;
LINEMONITORTONE = linemonitortone_tag;
{$EXTERNALSYM LINEMONITORTONE}
PLineProviderEntry = ^TLineProviderEntry;
lineproviderentry_tag = packed record
dwPermanentProviderID, // TAPI v1.4
dwProviderFilenameSize, // TAPI v1.4
dwProviderFilenameOffset: DWORD; // TAPI v1.4
end;
{$EXTERNALSYM lineproviderentry_tag}
TLineProviderEntry = lineproviderentry_tag;
LINEPROVIDERENTRY = lineproviderentry_tag;
{$EXTERNALSYM LINEPROVIDERENTRY}
PLineProviderList = ^TLineProviderList;
lineproviderlist_tag = packed record
dwTotalSize, // TAPI v1.4
dwNeededSize, // TAPI v1.4
dwUsedSize, // TAPI v1.4
dwNumProviders, // TAPI v1.4
dwProviderListSize, // TAPI v1.4
dwProviderListOffset: DWORD; // TAPI v1.4
end;
{$EXTERNALSYM lineproviderlist_tag}
TLineProviderList = lineproviderlist_tag;
LINEPROVIDERLIST = lineproviderlist_tag;
{$EXTERNALSYM LINEPROVIDERLIST}
{$IFDEF TAPI20}
PLineProxyRequest = ^TLineProxyRequest;
lineproxyrequest_tag = packed record
dwSize, // TAPI v2.0
dwClientMachineNameSize, // TAPI v2.0
dwClientMachineNameOffset, // TAPI v2.0
dwClientUserNameSize, // TAPI v2.0
dwClientUserNameOffset, // TAPI v2.0
dwClientAppAPIVersion, // TAPI v2.0
dwRequestType: DWORD; // TAPI v2.0
case Longint of
0: (SetAgentGroup : record
dwAddressID: DWORD; // TAPI v2.0
GroupList: TLineAgentGroupList; // TAPI v2.0
end;);
1: (SetAgentState : record
dwAddressID, // TAPI v2.0
dwAgentState, // TAPI v2.0
dwNextAgentState: DWORD; // TAPI v2.0
end;);
2: (SetAgentActivity : record
dwAddressID: DWORD; // TAPI v2.0
dwActivityID: DWORD; // TAPI v2.0
end;);
3: (GetAgentCaps : record
dwAddressID: DWORD; // TAPI v2.0
AgentCaps: TLineAgentCaps; // TAPI v2.0
end;);
4: (GetAgentStatus : record
dwAddressID: DWORD; // TAPI v2.0
AgentStatus: TLineAgentStatus; // TAPI v2.0
end;);
5: (AgentSpecific : record
dwAddressID, // TAPI v2.0
dwAgentExtensionIDIndex, // TAPI v2.0
dwSize: DWORD; // TAPI v2.0
Params: array[0..0] of Byte; // TAPI v2.0
end;);
6: (GetAgentActivityList : record
dwAddressID: DWORD; // TAPI v2.0
ActivityList: TLineAgentActivityList; // TAPI v2.0
end;);
7: (GetAgentGroupList : record
dwAddressID: DWORD; // TAPI v2.0
GroupList: TLineAgentGroupList; // TAPI v2.0
end;);
{$IFDEF TAPI22}
8: (CreateAgent: record
hAgent: HAGENT; // TAPI v2.2
dwAgentIDSize, // TAPI v2.2
dwAgentIDOffset, // TAPI v2.2
dwAgentPINSize, // TAPI v2.2
dwAgentPINOffset: DWORD;
end;);
9: (SetAgentStateEx: record
hAgent: HAGENT; // TAPI v2.2
dwAgentState, // TAPI v2.2
dwNextAgentState: DWORD; // TAPI v2.2
end;);
10: (SetAgentMeasurementPeriod: record
hAgent: HAGENT; // TAPI v2.2
dwMeasurementPeriod: DWORD; // TAPI v2.2
end;);
11: (GetAgentInfo: record
hAgent: HAGENT; // TAPI v2.2
AgentInfo: TLineAgentInfo; // TAPI v2.2
end;);
12: (CreateAgentSession: record
hAgentSession: HAGENTSESSIOn; // TAPI v2.2
dwAgentPINSize,
dwAgentPINOffset: DWORD;
hAgent: HAGENT; // TAPI v2.2
GroupID: TGUID; // TAPI v2.2
dwWorkingAddressID: DWORD; // TAPI v2.2
end;);
13: (GetAgentSessionList: record
hAgent: HAGENT; // TAPI v2.2
SessionList: TLineAgentSessionList; // TAPI v2.2
end;);
14: (GetAgentSessionInfo: record
hAgentSession: HAGENTSESSION; // TAPI v2.2
SessionInfo: TLineAgentSessionInfo; // TAPI v2.2
end;);
15: (SetAgentSessionState: record
hAgentSession: HAGENTSESSION; // TAPI v2.2
dwAgentSessionState, // TAPI v2.2
dwNextAgentSessionState: DWORD; // TAPI v2.2
end;);
16: (GetQueueList: record
GroupID: TGUID; // TAPI v2.2
QueueList: TLineQueueList; // TAPI v2.2
end;);
17: (SetQueueMeasurementPeriod: record
dwQueueID, // TAPI v2.2
dwMeasurementPeriod: DWORD; // TAPI v2.2
end;);
18: (GetQueueInfo: record
dwQueueID: DWORD; // TAPI v2.2
QueueInfo: TLineQueueInfo; // TAPI v2.2
end;);
19: (GetGroupList: record
GroupList: TLineAgentGroupList; // TAPI v2.2
end;);
{$ENDIF}
end;
{$EXTERNALSYM lineproxyrequest_tag}
TLineProxyRequest = lineproxyrequest_tag;
LINEPROXYREQUEST = lineproxyrequest_tag;
{$EXTERNALSYM LINEPROXYREQUEST}
{$ENDIF}
PLineReqMakeCall = ^TLineReqMakeCall;
linereqmakecall_tag = packed record
szDestAddress: array[0..TAPIMAXDESTADDRESSSIZE - 1] of Char;
szAppName: array[0..TAPIMAXAPPNAMESIZE - 1] of Char;
szCalledParty: array[0..TAPIMAXCALLEDPARTYSIZE - 1] of Char;
szComment: array[0..TAPIMAXCOMMENTSIZE - 1] of Char;
end;
{$EXTERNALSYM linereqmakecall_tag}
TLineReqMakeCall = linereqmakecall_tag;
LINEREQMAKECALL = linereqmakecall_tag;
{$EXTERNALSYM LINEREQMAKECALL}
{$IFDEF TAPI20}
PLineReqMakeCallW = ^TLineReqMakeCallW;
linereqmakecallW_tag = packed record
szDestAddress: array[0..TAPIMAXDESTADDRESSSIZE - 1] of WideChar;
szAppName: array[0..TAPIMAXAPPNAMESIZE - 1] of WideChar;
szCalledParty: array[0..TAPIMAXCALLEDPARTYSIZE - 1] of WideChar;
szComment: array[0..TAPIMAXCOMMENTSIZE - 1] of WideChar;
end;
{$EXTERNALSYM linereqmakecallW_tag}
TLineReqMakeCallW = linereqmakecallW_tag;
LINEREQMAKECALLW = linereqmakecallW_tag;
{$EXTERNALSYM LINEREQMAKECALL}
{$ENDIF}
PLineReqMediaCall = ^TLineReqMediaCall;
linereqmediacall_tag = packed record
hWnd: HWND;
wRequestID: WPARAM;
szDeviceClass: array[0..TAPIMAXDEVICECLASSSIZE - 1] of Char;
ucDeviceID: array[0..TAPIMAXDEVICEIDSIZE - 1] of Byte;
dwSize,
dwSecure: DWORD;
szDestAddress: array[0..TAPIMAXDESTADDRESSSIZE - 1] of Char;
szAppName: array[0..TAPIMAXAPPNAMESIZE - 1] of Char;
szCalledParty: array[0..TAPIMAXCALLEDPARTYSIZE - 1] of Char;
szComment: array[0..TAPIMAXCOMMENTSIZE - 1] of Char;
end;
{$EXTERNALSYM linereqmediacall_tag}
TLineReqMediaCall = linereqmediacall_tag;
LINEREQMEDIACALL = linereqmediacall_tag;
{$EXTERNALSYM LINEREQMEDIACALL}
{$IFDEF TAPI20}
PLineReqMediaCallW = ^TLineReqMediaCallW;
linereqmediacallW_tag = packed record
hWnd: HWND;
wRequestID: WPARAM;
szDeviceClass: array[0..TAPIMAXDEVICECLASSSIZE - 1] of WideChar;
ucDeviceID: array[0..TAPIMAXDEVICEIDSIZE - 1] of Byte;
dwSize,
dwSecure: DWORD;
szDestAddress: array[0..TAPIMAXDESTADDRESSSIZE - 1] of WideChar;
szAppName: array[0..TAPIMAXAPPNAMESIZE - 1] of WideChar;
szCalledParty: array[0..TAPIMAXCALLEDPARTYSIZE - 1] of WideChar;
szComment: array[0..TAPIMAXCOMMENTSIZE - 1] of WideChar;
end;
{$EXTERNALSYM linereqmediacallW_tag}
TLineReqMediaCallW = linereqmediacallW_tag;
LINEREQMEDIACALLW = linereqmediacallW_tag;
{$EXTERNALSYM LINEREQMEDIACALLW}
{$ENDIF}
PLineTermCaps = ^TLineTermCaps;
linetermcaps_tag = packed record
dwTermDev,
dwTermModes,
dwTermSharing: DWORD;
end;
{$EXTERNALSYM linetermcaps_tag}
TLineTermCaps = linetermcaps_tag;
LINETERMCAPS = linetermcaps_tag;
{$EXTERNALSYM LINETERMCAPS}
PLineTranslateCaps = ^TLineTranslateCaps;
linetranslatecaps_tag = packed record
dwTotalSize,
dwNeededSize,
dwUsedSize,
dwNumLocations,
dwLocationListSize,
dwLocationListOffset,
dwCurrentLocationID,
dwNumCards,
dwCardListSize,
dwCardListOffset,
dwCurrentPreferredCardID: DWORD;
end;
{$EXTERNALSYM linetranslatecaps_tag}
TLineTranslateCaps = linetranslatecaps_tag;
LINETRANSLATECAPS = linetranslatecaps_tag;
{$EXTERNALSYM LINETRANSLATECAPS}
PLineTranslateOutput = ^TLineTranslateOutput;
linetranslateoutput_tag = packed record
dwTotalSize,
dwNeededSize,
dwUsedSize,
dwDialableStringSize,
dwDialableStringOffset,
dwDisplayableStringSize,
dwDisplayableStringOffset,
dwCurrentCountry,
dwDestCountry,
dwTranslateResults: DWORD;
end;
{$EXTERNALSYM linetranslateoutput_tag}
TLineTranslateOutput = linetranslateoutput_tag;
LINETRANSLATEOUTPUT = linetranslateoutput_tag;
{$EXTERNALSYM LINETRANSLATEOUTPUT}
PPhoneButtonInfo = ^TPhoneButtonInfo;
phonebuttoninfo_tag = packed record
dwTotalSize,
dwNeededSize,
dwUsedSize,
dwButtonMode,
dwButtonFunction,
dwButtonTextSize,
dwButtonTextOffset,
dwDevSpecificSize,
dwDevSpecificOffset,
dwButtonState: DWORD; // TAPI v1.4
end;
{$EXTERNALSYM phonebuttoninfo_tag}
TPhoneButtonInfo = phonebuttoninfo_tag;
PHONEBUTTONINFO = phonebuttoninfo_tag;
{$EXTERNALSYM PHONEBUTTONINFO}
PPhoneCaps = ^TPhoneCaps;
phonecaps_tag = packed record
dwTotalSize,
dwNeededSize,
dwUsedSize,
dwProviderInfoSize,
dwProviderInfoOffset,
dwPhoneInfoSize,
dwPhoneInfoOffset,
dwPermanentPhoneID,
dwPhoneNameSize,
dwPhoneNameOffset,
dwStringFormat,
dwPhoneStates,
dwHookSwitchDevs,
dwHandsetHookSwitchModes,
dwSpeakerHookSwitchModes,
dwHeadsetHookSwitchModes,
dwVolumeFlags,
dwGainFlags,
dwDisplayNumRows,
dwDisplayNumColumns,
dwNumRingModes,
dwNumButtonLamps,
dwButtonModesSize,
dwButtonModesOffset,
dwButtonFunctionsSize,
dwButtonFunctionsOffset,
dwLampModesSize,
dwLampModesOffset,
dwNumSetData,
dwSetDataSize,
dwSetDataOffset,
dwNumGetData,
dwGetDataSize,
dwGetDataOffset,
dwDevSpecificSize,
dwDevSpecificOffset: DWORD;
{$IFDEF TAPI20}
dwDeviceClassesSize, // TAPI v2.0
dwDeviceClassesOffset, // TAPI v2.0
dwPhoneFeatures, // TAPI v2.0
dwSettableHandsetHookSwitchModes, // TAPI v2.0
dwSettableSpeakerHookSwitchModes, // TAPI v2.0
dwSettableHeadsetHookSwitchModes, // TAPI v2.0
dwMonitoredHandsetHookSwitchModes, // TAPI v2.0
dwMonitoredSpeakerHookSwitchModes, // TAPI v2.0
dwMonitoredHeadsetHookSwitchModes: DWORD; // TAPI v2.0
{$ENDIF}
{$IFDEF TAPI22}
PermanentPhoneGuid: TGUID; // TAPI v2.2
{$ENDIF}
end;
{$EXTERNALSYM phonecaps_tag}
TPhoneCaps = phonecaps_tag;
PHONECAPS = phonecaps_tag;
{$EXTERNALSYM PHONECAPS}
PPhoneExtensionId = ^TPhoneExtensionId;
phoneextensionid_tag = packed record
dwExtensionID0,
dwExtensionID1,
dwExtensionID2,
dwExtensionID3: DWORD;
end;
{$EXTERNALSYM phoneextensionid_tag}
TPhoneExtensionId = phoneextensionid_tag;
PHONEEXTENSIONID = phoneextensionid_tag;
{$EXTERNALSYM PHONEEXTENSIONID}
{$IFDEF TAPI20}
PPhoneInitializeExParams = ^TPhoneInitializeExParams;
phoneinitializeexparams_tag = packed record
dwTotalSize, // TAPI v2.0
dwNeededSize, // TAPI v2.0
dwUsedSize, // TAPI v2.0
dwOptions: DWORD; // TAPI v2.0
Handles: TTAPIHandleUnion;
dwCompletionKey: DWORD; // TAPI v2.0
end;
{$EXTERNALSYM phoneinitializeexparams_tag}
TPhoneInitializeExParams = phoneinitializeexparams_tag;
PHONEINITIALIZEEXPARAMS = phoneinitializeexparams_tag;
{$EXTERNALSYM PHONEINITIALIZEEXPARAMS}
PPhoneMessage = ^TPhoneMessage;
phonemessage_tag = packed record
hDevice, // TAPI v2.0
dwMessageID, // TAPI v2.0
dwCallbackInstance, // TAPI v2.0
dwParam1, // TAPI v2.0
dwParam2, // TAPI v2.0
dwParam3: DWORD; // TAPI v2.0
end;
{$EXTERNALSYM phonemessage_tag}
TPhoneMessage = phonemessage_tag;
PHONEMESSAGE = phonemessage_tag;
{$EXTERNALSYM PHONEMESSAGE}
{$ENDIF}
PPhoneStatus = ^TPhoneStatus;
phonestatus_tag = packed record
dwTotalSize,
dwNeededSize,
dwUsedSize,
dwStatusFlags,
dwNumOwners,
dwNumMonitors,
dwRingMode,
dwRingVolume,
dwHandsetHookSwitchMode,
dwHandsetVolume,
dwHandsetGain,
dwSpeakerHookSwitchMode,
dwSpeakerVolume,
dwSpeakerGain,
dwHeadsetHookSwitchMode,
dwHeadsetVolume,
dwHeadsetGain,
dwDisplaySize,
dwDisplayOffset,
dwLampModesSize,
dwLampModesOffset,
dwOwnerNameSize,
dwOwnerNameOffset,
dwDevSpecificSize,
dwDevSpecificOffset: DWORD;
{$IFDEF TAPI20}
dwPhoneFeatures: DWORD; // TAPI v2.0
{$ENDIF}
end;
{$EXTERNALSYM phonestatus_tag}
TPhoneStatus = phonestatus_tag;
PHONESTATUS = phonestatus_tag;
{$EXTERNALSYM PHONESTATUS}
PVarString = ^TVarString;
varstring_tag = packed record
dwTotalSize,
dwNeededSize,
dwUsedSize,
dwStringFormat,
dwStringSize,
dwStringOffset: DWORD;
end;
{$EXTERNALSYM varstring_tag}
TVarString = varstring_tag;
VARSTRING = varstring_tag;
{$EXTERNALSYM VARSTRING}
function lineAccept(hCall: HCALL; lpsUserUserInfo: LPCSTR;
dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM lineAccept}
{$IFNDEF TAPI10}
{#BEGIN}
function lineAddProvider{$}(lpszProviderFilename: LPCTSTR; hwndOwner: HWND;
var dwPermanentProviderID: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineAddProvider{$}}
{#END}
{$ELSE}
function lineAddProvider(lpszProviderFilename: LPCSTR; hwndOwner: HWND;
var dwPermanentProviderID: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineAddProvider}
{$IFDEF WIN32}
function lineAddProviderA(lpszProviderFilename: LPCSTR; hwndOwner: HWND;
var dwPermanentProviderID: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineAddProviderA}
function lineAddProviderW(lpszProviderFilename: LPCWSTR; hwndOwner: HWND;
var dwPermanentProviderID: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineAddProviderW}
{$ENDIF}
{$ENDIF}
function lineAddToConference(hConfCall, hConsultCall: HCALL): Longint; stdcall;
{$EXTERNALSYM lineAddToConference}
{$IFDEF TAPI20}
function lineAgentSpecific(hLine: HLINE; dwAddressID: DWORD;
dwAgentExtensionIDIndex: DWORD; lpParams: Pointer;
dwSize: DWORD): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineAgentSpecific}
{$ENDIF}
function lineAnswer(hCall: HCALL; lpsUserUserInfo: LPCSTR;
dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM lineAnswer}
{$IFNDEF TAPI10}
{#BEGIN}
function lineBlindTransfer{$}(hCall: HCALL; lpszDestAddress: LPCTSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineBlindTransfer{$}}
{#END}
{$ELSE}
function lineBlindTransfer(hCall: HCALL; lpszDestAddress: LPCSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineBlindTransfer}
{$IFDEF WIN32}
function lineBlindTransferA(hCall: HCALL; lpszDestAddress: LPCSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineBlindTransferA}
function lineBlindTransferW(hCall: HCALL; lpszDestAddress: LPCWSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineBlindTransferW}
{$ENDIF}
{$ENDIF}
function lineClose(hLine: HLINE): Longint; stdcall;
{$EXTERNALSYM lineClose}
function lineCompleteCall(hCall: HCALL; var dwCompletionID: DWORD;
dwCompletionMode, dwMessageID: DWORD): Longint; stdcall;
{$EXTERNALSYM lineCompleteCall}
function lineCompleteTransfer(hCall, hConsultCall: HCALL; lphConfCall: PHCall;
dwTransferMode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineCompleteTransfer}
{$IFNDEF TAPI10}
{#BEGIN}
function lineConfigDialog{$}(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCTSTR): Longint; stdcall;
{$EXTERNALSYM lineConfigDialog{$}}
{#END}
{$ELSE}
function lineConfigDialog(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCSTR): Longint; stdcall;
{$EXTERNALSYM lineConfigDialog}
{$IFDEF WIN32}
function lineConfigDialogA(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCSTR): Longint; stdcall;
{$EXTERNALSYM lineConfigDialogA}
function lineConfigDialogW(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCWSTR): Longint; stdcall;
{$EXTERNALSYM lineConfigDialogW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineConfigDialogEdit{$}(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCTSTR; lpDeviceConfigIn: Pointer; dwSize: DWORD;
lpDeviceConfigOut: PVarString): Longint; stdcall;
{$EXTERNALSYM lineConfigDialogEdit{$}}
{#END}
{$ELSE}
function lineConfigDialogEdit(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCSTR; lpDeviceConfigIn: Pointer; dwSize: DWORD;
lpDeviceConfigOut: PVarString): Longint; stdcall;
{$EXTERNALSYM lineConfigDialogEdit}
{$IFDEF WIN32}
function lineConfigDialogEditA(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCSTR; lpDeviceConfigIn: Pointer; dwSize: DWORD;
lpDeviceConfigOut: PVarString): Longint; stdcall;
{$EXTERNALSYM lineConfigDialogEditA}
function lineConfigDialogEditW(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCWSTR; lpDeviceConfigIn: Pointer; dwSize: DWORD;
lpDeviceConfigOut: PVarString): Longint; stdcall;
{$EXTERNALSYM lineConfigDialogEditW}
{$ENDIF}
{$ENDIF}
function lineConfigProvider(hwndOwner: HWND;
dwPermanentProviderID: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineConfigProvider}
{$IFDEF TAPI22}
{#BEGIN}
function lineCreateAgent{$}(hLine: HLINE; lpszAgentID, lpszAgentPIN: LPTSTR;
var lphAgent: HAGENT): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineCreateAgent{$}}
{#END} // TAPI22
{#BEGIN}
function lineCreateAgentSession{$}(hLine: HLINE; hAgent: HAGENT;
lpszAgentPIN: LPTSTR; dwWorkingAddressID: DWORD; lpGroupID: PGUID;
var lphAgentSession: HAGENTSESSION): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineCreateAgentSession{$}}
{#END}
{$ENDIF}
function lineDeallocateCall(hCall: HCALL): Longint; stdcall;
{$EXTERNALSYM lineDeallocateCall}
function lineDevSpecific(hLine: HLINE; dwAddressID: DWORD; hCall: HCALL;
lpParams: Pointer; dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM lineDevSpecific}
function lineDevSpecificFeature(hLine: HLINE; dwFeature: DWORD;
lpParams: Pointer; dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM lineDevSpecificFeature}
{$IFNDEF TAPI10}
{#BEGIN}
function lineDial{$}(hCall: HCALL; lpszDestAddress: LPCTSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineDial{$}}
{#END}
{$ELSE}
function lineDial(hCall: HCALL; lpszDestAddress: LPCSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineDial}
{$IFDEF WIN32}
function lineDialA(hCall: HCALL; lpszDestAddress: LPCSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineDialA}
function lineDialW(hCall: HCALL; lpszDestAddress: LPCWSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineDialW}
{$ENDIF}
{$ENDIF}
function lineDrop(hCall: HCALL; lpsUserUserInfo: LPCSTR;
dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM lineDrop}
{$IFNDEF TAPI10}
{#BEGIN}
function lineForward{$}(hLine: HLINE; bAllAddresses, dwAddressID: DWORD;
ForwardList: PLineForwardList; dwNumRingsNoAnswer: DWORD;
lphConsultCall: PHCall; lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineForward{$}}
{#END}
{$ELSE}
function lineForward(hLine: HLINE; bAllAddresses, dwAddressID: DWORD;
ForwardList: PLineForwardList; dwNumRingsNoAnswer: DWORD;
lphConsultCall: PHCall; lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineForward}
{$IFDEF WIN32}
function lineForwardA(hLine: HLINE; bAllAddresses, dwAddressID: DWORD;
ForwardList: PLineForwardList; dwNumRingsNoAnswer: DWORD;
lphConsultCall: PHCall; lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineForwardA}
function lineForwardW(hLine: HLINE; bAllAddresses, dwAddressID: DWORD;
ForwardList: PLineForwardList; dwNumRingsNoAnswer: DWORD;
lphConsultCall: PHCall; lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineForwardW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGatherDigits{$}(hCall: HCALL; dwDigitModes: DWORD;
lpsDigits: LPCTSTR; dwNumDigits: DWORD; lpszTerminationDigits: LPCTSTR;
dwFirstDigitTimeout, dwInterDigitTimeout: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGatherDigits{$}}
{#END}
{$ELSE}
function lineGatherDigits(hCall: HCALL; dwDigitModes: DWORD; lpsDigits: LPCSTR;
dwNumDigits: DWORD; lpszTerminationDigits: LPCSTR; dwFirstDigitTimeout,
dwInterDigitTimeout: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGatherDigits}
{$IFDEF WIN32}
function lineGatherDigitsA(hCall: HCALL; dwDigitModes: DWORD; lpsDigits: LPCSTR;
dwNumDigits: DWORD; lpszTerminationDigits: LPCSTR; dwFirstDigitTimeout,
dwInterDigitTimeout: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGatherDigitsA}
function lineGatherDigitsW(hCall: HCALL; dwDigitModes: DWORD; lpsDigits: LPCWSTR;
dwNumDigits: DWORD; lpszTerminationDigits: LPCWSTR; dwFirstDigitTimeout,
dwInterDigitTimeout: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGatherDigitsW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGenerateDigits{$}(hCall: HCALL; dwDigitMode: DWORD;
lpszDigits: LPCTSTR; dwDuration: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGenerateDigits{$}}
{#END}
{$ELSE}
function lineGenerateDigits(hCall: HCALL; dwDigitMode: DWORD;
lpszDigits: LPCSTR; dwDuration: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGenerateDigits}
{$IFDEF WIN32}
function lineGenerateDigitsA(hCall: HCALL; dwDigitMode: DWORD;
lpszDigits: LPCSTR; dwDuration: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGenerateDigitsA}
function lineGenerateDigitsW(hCall: HCALL; dwDigitMode: DWORD;
lpszDigits: LPCWSTR; dwDuration: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGenerateDigitsW}
{$ENDIF}
{$ENDIF}
function lineGenerateTone(hCall: HCALL; dwToneMode, dwDuration,
dwNumTones: DWORD; Tones: PLineGenerateTone): Longint; stdcall;
{$EXTERNALSYM lineGenerateTone}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetAddressCaps{$}(hLineApp: HLINEAPP; dwDeviceID, dwAddressID,
dwAPIVersion, dwExtVersion: DWORD;
lpAddressCaps: PLineAddressCaps): Longint; stdcall;
{$EXTERNALSYM lineGetAddressCaps{$}}
{#END}
{$ELSE}
function lineGetAddressCaps(hLineApp: HLINEAPP; dwDeviceID, dwAddressID,
dwAPIVersion, dwExtVersion: DWORD;
lpAddressCaps: PLineAddressCaps): Longint; stdcall;
{$EXTERNALSYM lineGetAddressCaps}
{$IFDEF WIN32}
function lineGetAddressCapsA(hLineApp: HLINEAPP; dwDeviceID, dwAddressID,
dwAPIVersion, dwExtVersion: DWORD;
lpAddressCaps: PLineAddressCaps): Longint; stdcall;
{$EXTERNALSYM lineGetAddressCapsA}
function lineGetAddressCapsW(hLineApp: HLINEAPP; dwDeviceID, dwAddressID,
dwAPIVersion, dwExtVersion: DWORD;
lpAddressCaps: PLineAddressCaps): Longint; stdcall;
{$EXTERNALSYM lineGetAddressCapsW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetAddressID{$}(hLine: HLINE; var dwAddressID: DWORD;
dwAddressMode: DWORD; lpsAddress: LPCTSTR; dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGetAddressID{$}}
{#END}
{$ELSE}
function lineGetAddressID(hLine: HLINE; var dwAddressID: DWORD;
dwAddressMode: DWORD; lpsAddress: LPCSTR; dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGetAddressID}
{$IFDEF WIN32}
function lineGetAddressIDA(hLine: HLINE; var dwAddressID: DWORD;
dwAddressMode: DWORD; lpsAddress: LPCSTR; dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGetAddressIDA}
function lineGetAddressIDW(hLine: HLINE; var dwAddressID: DWORD;
dwAddressMode: DWORD; lpsAddress: LPCWSTR; dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGetAddressIDW}
{$ENDIF}
{$ENDIF}
{#BEGIN}
function lineGetAddressStatus{$}(hLine: HLINE; dwAddressID: DWORD;
lpAddressStatus: PLineAddressStatus): Longint; stdcall;
{$EXTERNALSYM lineGetAddressStatus{$}}
{#END}
{$IFDEF TAPI20}
{#BEGIN}
function lineGetAgentActivityList{$}(hLine: HLINE; dwAddressID: DWORD;
lpAgentActivityList: PLineAgentActivityList): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineGetAgentActivityList{$}}
{#END} // TAPI20
{#BEGIN}
function lineGetAgentCaps{$}(hLineApp: HLINEAPP; dwDeviceID, dwAddressID,
dwAppAPIVersion: DWORD; lpAgentCaps: PLineAgentCaps): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineGetAgentCaps{$}}
{#END}
{#BEGIN}
function lineGetAgentGroupList{$}(hLine: HLINE; dwAddressID: DWORD;
lpAgentGroupList: PLineAgentGroupList): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineGetAgentGroupList{$}}
{#END}
{$IFDEF TAPI22}
function lineGetAgentInfo(hLine: HLINE; hAgent: HAGENT;
lpAgentInfo: PLineAgentInfo): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineGetAgentInfo}
function lineGetAgentSessionInfo(hLine: HLINE; hAgentSession: HAGENTSESSION;
lpAgentSessionInfo: PLineAgentSessionInfo): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineGetAgentSessionInfo}
function lineGetAgentSessionList(hLine: HLINE; hAgent: HAGENT;
lpAgentSessionList: PLineAgentSessionList): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineGetAgentSessionList}
{$ENDIF}
{#BEGIN}
function lineGetAgentStatus{$}(hLine: HLINE; dwAddressID: DWORD;
lpAgentStatus: PLineAgentStatus): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineGetAgentStatus{$}}
{#END}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetAppPriority{$}(lpszAppFilename: LPCTSTR; dwMediaMode: DWORD;
lpExtensionID: PLineExtensionID; dwRequestMode: DWORD;
lpExtensionName: PVarString; var dwPriority: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetAppPriority{$}}
{#END}
{$ELSE}
function lineGetAppPriority(lpszAppFilename: LPCSTR; dwMediaMode: DWORD;
lpExtensionID: PLineExtensionID; dwRequestMode: DWORD;
lpExtensionName: PVarString; var dwPriority: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetAppPriority}
{$IFDEF WIN32}
function lineGetAppPriorityA(lpszAppFilename: LPCSTR; dwMediaMode: DWORD;
lpExtensionID: PLineExtensionID; dwRequestMode: DWORD;
lpExtensionName: PVarString; var dwPriority: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetAppPriorityA}
function lineGetAppPriorityW(lpszAppFilename: LPCWSTR; dwMediaMode: DWORD;
lpExtensionID: PLineExtensionID; dwRequestMode: DWORD;
lpExtensionName: PVarString; var dwPriority: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetAppPriorityW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetCallInfo{$}(hCall: HCALL; lpCallInfo: PLineCallInfo): Longint; stdcall;
{$EXTERNALSYM lineGetCallInfo{$}}
{#END}
{$ELSE}
function lineGetCallInfo(hCall: HCALL; lpCallInfo: PLineCallInfo): Longint; stdcall;
{$EXTERNALSYM lineGetCallInfo}
{$IFDEF WIN32}
function lineGetCallInfoA(hCall: HCALL; lpCallInfo: PLineCallInfo): Longint; stdcall;
{$EXTERNALSYM lineGetCallInfoA}
function lineGetCallInfoW(hCall: HCALL; lpCallInfo: PLineCallInfo): Longint; stdcall;
{$EXTERNALSYM lineGetCallInfoW}
{$ENDIF}
{$ENDIF}
function lineGetCallStatus(hCall: HCALL;
lpCallStatus: PLineCallStatus): Longint; stdcall;
{$EXTERNALSYM lineGetCallStatus}
function lineGetConfRelatedCalls(hCall: HCALL;
lpCallList: PLineCallList): Longint; stdcall;
{$EXTERNALSYM lineGetConfRelatedCalls}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetCountry{$}(dwCountryID, dwAPIVersion: DWORD;
lpLineCountryList: PLineCountryList): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetCountry{$}}
{#END}
{$ELSE}
function lineGetCountry(dwCountryID, dwAPIVersion: DWORD;
lpLineCountryList: PLineCountryList): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetCountry}
{$IFDEF WIN32}
function lineGetCountryA(dwCountryID, dwAPIVersion: DWORD;
lpLineCountryList: PLineCountryList): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetCountryA}
function lineGetCountryW(dwCountryID, dwAPIVersion: DWORD;
lpLineCountryList: PLineCountryList): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetCountryW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetDevCaps{$}(hLineApp: HLINEAPP; dwDeviceID, dwAPIVersion,
dwExtVersion: DWORD; lpLineDevCaps: PLineDevCaps): Longint; stdcall;
{$EXTERNALSYM lineGetDevCaps{$}}
{#END}
{$ELSE}
function lineGetDevCaps(hLineApp: HLINEAPP; dwDeviceID, dwAPIVersion,
dwExtVersion: DWORD; lpLineDevCaps: PLineDevCaps): Longint; stdcall;
{$EXTERNALSYM lineGetDevCaps}
{$IFDEF WIN32}
function lineGetDevCapsA(hLineApp: HLINEAPP; dwDeviceID, dwAPIVersion,
dwExtVersion: DWORD; lpLineDevCaps: PLineDevCaps): Longint; stdcall;
{$EXTERNALSYM lineGetDevCapsA}
function lineGetDevCapsW(hLineApp: HLINEAPP; dwDeviceID, dwAPIVersion,
dwExtVersion: DWORD; lpLineDevCaps: PLineDevCaps): Longint; stdcall;
{$EXTERNALSYM lineGetDevCapsW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetDevConfig{$}(dwDeviceID: DWORD; lpDeviceConfig: PVarString;
lpszDeviceClass: LPCTSTR): Longint; stdcall;
{$EXTERNALSYM lineGetDevConfig{$}}
{#END}
{$ELSE}
function lineGetDevConfig(dwDeviceID: DWORD; lpDeviceConfig: PVarString;
lpszDeviceClass: LPCSTR): Longint; stdcall;
{$EXTERNALSYM lineGetDevConfig}
{$IFDEF WIN32}
function lineGetDevConfigA(dwDeviceID: DWORD; lpDeviceConfig: PVarString;
lpszDeviceClass: LPCSTR): Longint; stdcall;
{$EXTERNALSYM lineGetDevConfigW}
function lineGetDevConfigW(dwDeviceID: DWORD; lpDeviceConfig: PVarString;
lpszDeviceClass: LPCWSTR): Longint; stdcall;
{$EXTERNALSYM lineGetDevConfigW}
{$ENDIF}
{$ENDIF}
{$IFDEF TAPI22}
{#BEGIN}
function lineGetGroupList{$}(hLine: HLINE;
lpGroupList: PLineAgentGroupList): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineGetGroupList{$}}
{#END}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetIcon{$}(dwDeviceID: DWORD;
lpszDeviceClass: LPCTSTR; lphIcon: PHICON): Longint; stdcall;
{$EXTERNALSYM lineGetIcon{$}}
{#END}
{$ELSE}
function lineGetIcon(dwDeviceID: DWORD; lpszDeviceClass: LPCSTR;
lphIcon: PHICON): Longint; stdcall;
{$EXTERNALSYM lineGetIcon}
{$IFDEF WIN32}
function lineGetIconA(dwDeviceID: DWORD; lpszDeviceClass: LPCSTR;
lphIcon: PHICON): Longint; stdcall;
{$EXTERNALSYM lineGetIconA}
function lineGetIconW(dwDeviceID: DWORD; lpszDeviceClass: LPCWSTR;
lphIcon: PHICON): Longint; stdcall;
{$EXTERNALSYM lineGetIconW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetID{$}(hLine: HLINE; dwAddressID: DWORD; hCall: HCALL;
dwSelect: DWORD; lpDeviceID: PVarString;
lpszDeviceClass: LPCTSTR): Longint stdcall;
{$EXTERNALSYM lineGetID{$}}
{#END}
{$ELSE}
function lineGetID(hLine: HLINE; dwAddressID: DWORD; hCall: HCALL;
dwSelect: DWORD; lpDeviceID: PVarString;
lpszDeviceClass: LPCSTR): Longint stdcall;
{$EXTERNALSYM lineGetID}
{$IFDEF WIN32}
function lineGetIDA(hLine: HLINE; dwAddressID: DWORD; hCall: HCALL;
dwSelect: DWORD; lpDeviceID: PVarString;
lpszDeviceClass: LPCSTR): Longint stdcall;
{$EXTERNALSYM lineGetIDA}
function lineGetIDW(hLine: HLINE; dwAddressID: DWORD; hCall: HCALL;
dwSelect: DWORD; lpDeviceID: PVarString;
lpszDeviceClass: LPCWSTR): Longint stdcall;
{$EXTERNALSYM lineGetIDW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetLineDevStatus{$}(hLine: HLINE;
lpLineDevStatus: PLineDevStatus): Longint; stdcall;
{$EXTERNALSYM lineGetLineDevStatus{$}}
{#END}
{$ELSE}
function lineGetLineDevStatus(hLine: HLINE;
lpLineDevStatus: PLineDevStatus): Longint; stdcall;
{$EXTERNALSYM lineGetLineDevStatus}
{$IFDEF WIN32}
function lineGetLineDevStatusA(hLine: HLINE;
lpLineDevStatus: PLineDevStatus): Longint; stdcall;
{$EXTERNALSYM lineGetLineDevStatusA}
function lineGetLineDevStatusW(hLine: HLINE;
lpLineDevStatus: PLineDevStatus): Longint; stdcall;
{$EXTERNALSYM lineGetLineDevStatusW}
{$ENDIF}
{$ENDIF}
{$IFDEF TAPI20}
function lineGetMessage(hLineApp: HLINEAPP; var lpMessage: TLineMessage;
dwTimeout: DWORD): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineGetMessage}
{$ENDIF}
function lineGetNewCalls(hLine: HLINE; dwAddressID, dwSelect: DWORD;
lpCallList: PLineCallList): Longint; stdcall;
{$EXTERNALSYM lineGetNewCalls}
function lineGetNumRings(hLine: HLINE; dwAddressID: DWORD;
var dwNumRings: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGetNumRings}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetProviderList{$}(dwAPIVersion: DWORD;
lpProviderList: PLineProviderList): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetProviderList{$}}
{#END}
{$ELSE}
function lineGetProviderList(dwAPIVersion: DWORD;
lpProviderList: PLineProviderList): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetProviderList}
{$IFDEF WIN32}
function lineGetProviderListA(dwAPIVersion: DWORD;
lpProviderList: PLineProviderList): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetProviderListA}
function lineGetProviderListW(dwAPIVersion: DWORD;
lpProviderList: PLineProviderList): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineGetProviderListW}
{$ENDIF}
{$ENDIF}
{$IFDEF TAPI22}
function lineGetProxyStatus(hLineApp: HLINEAPP;
dwDeviceID, dwAppAPIVersion: DWORD;
lpLineProxyReqestList: PLineProxyRequestList): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineGetProxyStatus}
function lineGetQueueInfo(hLine: HLINE; dwQueueID: DWORD;
lpLineQueueInfo: PLineQueueInfo): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineGetQueueInfo}
{#BEGIN}
function lineGetQueueList{$}(hLine: HLINE; lpGroupID: PGUID;
lpQueueList: PLineQueueList): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineGetQueueList{$}}
{#END}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetRequest{$}(hLineApp: HLINEAPP; dwRequestMode: DWORD;
lpRequestBuffer: Pointer): Longint; stdcall;
{$EXTERNALSYM lineGetRequest{$}}
{#END}
{$ELSE}
function lineGetRequest(hLineApp: HLINEAPP; dwRequestMode: DWORD;
lpRequestBuffer: Pointer): Longint; stdcall;
{$EXTERNALSYM lineGetRequest}
{$IFDEF WIN32}
function lineGetRequestA(hLineApp: HLINEAPP; dwRequestMode: DWORD;
lpRequestBuffer: Pointer): Longint; stdcall;
{$EXTERNALSYM lineGetRequestA}
function lineGetRequestW(hLineApp: HLINEAPP; dwRequestMode: DWORD;
lpRequestBuffer: Pointer): Longint; stdcall;
{$EXTERNALSYM lineGetRequestW}
{$ENDIF}
{$ENDIF}
function lineGetStatusMessages(hLine: HLINE; var dwLineStates,
dwAddressStates: DWORD): Longint; stdcall;
{$EXTERNALSYM lineGetStatusMessages}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetTranslateCaps{$}(hLineApp: HLINEAPP; dwAPIVersion: DWORD;
lpTranslateCaps: PLineTranslateCaps): Longint; stdcall;
{$EXTERNALSYM lineGetTranslateCaps{$}}
{#END}
{$ELSE}
function lineGetTranslateCaps(hLineApp: HLINEAPP; dwAPIVersion: DWORD;
lpTranslateCaps: PLineTranslateCaps): Longint; stdcall;
{$EXTERNALSYM lineGetTranslateCaps}
{$IFDEF WIN32}
function lineGetTranslateCapsA(hLineApp: HLINEAPP; dwAPIVersion: DWORD;
lpTranslateCaps: PLineTranslateCaps): Longint; stdcall;
{$EXTERNALSYM lineGetTranslateCapsA}
function lineGetTranslateCapsW(hLineApp: HLINEAPP; dwAPIVersion: DWORD;
lpTranslateCaps: PLineTranslateCaps): Longint; stdcall;
{$EXTERNALSYM lineGetTranslateCapsW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineHandoff{$}(hCall: HCALL; lpszFileName: LPCTSTR;
dwMediaMode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineHandoff{$}}
{#END}
{$ELSE}
function lineHandoff(hCall: HCALL; lpszFileName: LPCSTR;
dwMediaMode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineHandoff}
{$IFDEF WIN32}
function lineHandoffA(hCall: HCALL; lpszFileName: LPCSTR;
dwMediaMode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineHandoffA}
function lineHandoffW(hCall: HCALL; lpszFileName: LPCWSTR;
dwMediaMode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineHandoffW}
{$ENDIF}
{$ENDIF}
function lineHold(hCall: HCALL): Longint; stdcall;
{$EXTERNALSYM lineHold}
function lineInitialize(lphLineApp: PHLineApp; hInstance: HINST;
lpfnCallback: TLineCallback; lpszAppName: LPCSTR;
var dwNumDevs: DWORD): Longint; stdcall;
{$EXTERNALSYM lineInitialize}
{$IFDEF TAPI20}
{#BEGIN}
function lineInitializeEx{$}(lphLineApp: PHLineApp; hInstance: HINST;
lpfnCallback: TLineCallback; lpszAppName: LPCTSTR;
var dwNumDevs, dwAPIVersion: DWORD;
var LineInitializeExParams: TLineInitializeExParams): Longint; stdcall;
{$EXTERNALSYM lineInitializeEx{$}}
{#END}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineMakeCall{$}(hLine: HLINE; lphCall: PHCall; lpszDestAddress: LPCTSTR;
dwCountryCode: DWORD; CallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineMakeCall{$}}
{#END}
{$ELSE}
function lineMakeCall(hLine: HLINE; lphCall: PHCall; lpszDestAddress: LPCSTR;
dwCountryCode: DWORD; CallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineMakeCall}
{$IFDEF WIN32}
function lineMakeCallA(hLine: HLINE; lphCall: PHCall; lpszDestAddress: LPCSTR;
dwCountryCode: DWORD; CallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineMakeCallA}
function lineMakeCallW(hLine: HLINE; lphCall: PHCall; lpszDestAddress: LPCWSTR;
dwCountryCode: DWORD; CallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineMakeCallW}
{$ENDIF}
{$ENDIF}
function lineMonitorDigits(hCall: HCALL; dwDigitModes: DWORD): Longint; stdcall;
{$EXTERNALSYM lineMonitorDigits}
function lineMonitorMedia(hCall: HCALL; dwMediaModes: DWORD): Longint; stdcall;
{$EXTERNALSYM lineMonitorMedia}
function lineMonitorTones(hCall: HCALL; lmtToneList: PLineMonitorTone;
dwNumEntries: DWORD): Longint; stdcall;
{$EXTERNALSYM lineMonitorTones}
function lineNegotiateAPIVersion(hLineApp: HLINEAPP; dwDeviceID, dwAPILowVersion,
dwAPIHighVersion: DWORD; var dwAPIVersion: DWORD;
var lpExtensionID: TLineExtensionID): Longint; stdcall;
{$EXTERNALSYM lineNegotiateAPIVersion}
function lineNegotiateExtVersion(hLineApp: HLINEAPP; dwDeviceID, dwAPIVersion,
dwExtLowVersion, dwExtHighVersion: DWORD;
var dwExtVersion: DWORD): Longint; stdcall;
{$EXTERNALSYM lineNegotiateExtVersion}
{$IFNDEF TAPI10}
{#BEGIN}
function lineOpen{$}(hLineApp: HLINEAPP; dwDeviceID: DWORD; lphLine: PHLine;
dwAPIVersion, dwExtVersion, dwCallbackInstance, dwPrivileges,
dwMediaModes: DWORD; lpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineOpen{$}}
{#END}
{$ELSE}
function lineOpen(hLineApp: HLINEAPP; dwDeviceID: DWORD; lphLine: PHLine;
dwAPIVersion, dwExtVersion, dwCallbackInstance, dwPrivileges,
dwMediaModes: DWORD; lpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineOpen}
{$IFDEF WIN32}
function lineOpenA(hLineApp: HLINEAPP; dwDeviceID: DWORD; lphLine: PHLine;
dwAPIVersion, dwExtVersion, dwCallbackInstance, dwPrivileges,
dwMediaModes: DWORD; lpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineOpenA}
function lineOpenW(hLineApp: HLINEAPP; dwDeviceID: DWORD; lphLine: PHLine;
dwAPIVersion, dwExtVersion, dwCallbackInstance, dwPrivileges,
dwMediaModes: DWORD; lpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineOpenW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function linePark{$}(hCall: HCALL; dwParkMode: DWORD; lpszDirAddress: LPCTSTR;
lpNonDirAddress: PVarString): Longint; stdcall;
{$EXTERNALSYM linePark{$}}
{#END}
{$ELSE}
function linePark(hCall: HCALL; dwParkMode: DWORD; lpszDirAddress: LPCSTR;
lpNonDirAddress: PVarString): Longint; stdcall;
{$EXTERNALSYM linePark}
{$IFDEF WIN32}
function lineParkA(hCall: HCALL; dwParkMode: DWORD; lpszDirAddress: LPCSTR;
lpNonDirAddress: PVarString): Longint; stdcall;
{$EXTERNALSYM lineParkA}
function lineParkW(hCall: HCALL; dwParkMode: DWORD; lpszDirAddress: LPCWSTR;
lpNonDirAddress: PVarString): Longint; stdcall;
{$EXTERNALSYM lineParkW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function linePickup{$}(hLine: HLINE; dwAddressID: DWORD; lphCall: PHCall;
lpszDestAddress: LPCTSTR; lpszGroupID: LPCTSTR): Longint; stdcall;
{$EXTERNALSYM linePickup{$}}
{#END}
{$ELSE}
function linePickup(hLine: HLINE; dwAddressID: DWORD; lphCall: PHCall;
lpszDestAddress: LPCSTR; lpszGroupID: LPCSTR): Longint; stdcall;
{$EXTERNALSYM linePickup}
{$IFDEF WIN32}
function linePickupA(hLine: HLINE; dwAddressID: DWORD; lphCall: PHCall;
lpszDestAddress: LPCSTR; lpszGroupID: LPCSTR): Longint; stdcall;
{$EXTERNALSYM linePickupA}
function linePickupW(hLine: HLINE; dwAddressID: DWORD; lphCall: PHCall;
lpszDestAddress: LPCWSTR; lpszGroupID: LPCWSTR): Longint; stdcall;
{$EXTERNALSYM linePickupW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function linePrepareAddToConference{$}(hConfCall: HCALL; lphConsultCall: PHCall;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM linePrepareAddToConference{$}}
{#END}
{$ELSE}
function linePrepareAddToConference(hConfCall: HCALL; lphConsultCall: PHCall;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM linePrepareAddToConference}
{$IFDEF WIN32}
function linePrepareAddToConferenceA(hConfCall: HCALL; lphConsultCall: PHCall;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM linePrepareAddToConferenceA}
function linePrepareAddToConferenceW(hConfCall: HCALL; lphConsultCall: PHCall;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM linePrepareAddToConferenceW}
{$ENDIF}
{$ENDIF}
{$IFDEF TAPI20}
function lineProxyMessage(hLine: HLINE; hCall: HCALL; dwMsg, dwParam1, dwParam2,
dwParam3: DWORD): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineProxyMessage}
function lineProxyResponse(hLine: HLINE; lpProxyRequest: PLineProxyRequest;
dwResult: DWORD): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineProxyResponse}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineRedirect{$}(hCall: HCALL; lpszDestAddress: LPCTSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineRedirect{$}}
{#END}
{$ELSE}
function lineRedirect(hCall: HCALL; lpszDestAddress: LPCSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineRedirect}
{$IFDEF WIN32}
function lineRedirectA(hCall: HCALL; lpszDestAddress: LPCSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineRedirectA}
function lineRedirectW(hCall: HCALL; lpszDestAddress: LPCWSTR;
dwCountryCode: DWORD): Longint; stdcall;
{$EXTERNALSYM lineRedirectW}
{$ENDIF}
{$ENDIF}
function lineRegisterRequestRecipient(hLineApp: HLINEAPP; dwRegistrationInstance,
dwRequestMode, bEnable: DWORD): Longint; stdcall;
{$EXTERNALSYM lineRegisterRequestRecipient}
function lineReleaseUserUserInfo(hCall: HCALL): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineReleaseUserUserInfo}
function lineRemoveFromConference(hCall: HCALL): Longint; stdcall;
{$EXTERNALSYM lineRemoveFromConference}
function lineRemoveProvider(dwPermanentProviderID: DWORD;
hwndOwner: HWND): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineRemoveProvider}
function lineSecureCall(hCall: HCALL): Longint; stdcall;
{$EXTERNALSYM lineSecureCall}
function lineSendUserUserInfo(hCall: HCALL; lpsUserUserInfo: LPCSTR;
dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSendUserUserInfo}
{$IFDEF TAPI20}
function lineSetAgentActivity(hLine: HLINE; dwAddressID,
dwActivityID: DWORD): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineSetAgentActivity}
function lineSetAgentGroup(hLine: HLINE; dwAddressID: DWORD;
lpAgentGroupList: PLineAgentGroupList): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineSetAgentGroup}
{$IFDEF TAPI22}
function lineSetAgentMeasurementPeriod(hLine: HLINE; hAgent: HAGENT;
dwMeasurementPeriod: DWORD): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineSetAgentMeasurementPeriod}
function lineSetAgentSessionState(hLine: HLINE; hAgentSession: HAGENTSESSION;
dwAgentSessionState, dwNextAgentSessionState: DWORD): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineSetAgentSessionState}
function lineSetAgentStateEx(hLine: HLINE; hAgent: HAGENT; dwAgentState,
dwNextAgentState: DWORD): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineSetAgentStateEx}
{$ENDIF}
function lineSetAgentState(hLine: HLINE; dwAddressID, dwAgentState: DWORD;
dwNextAgentState: DWORD): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineSetAgentState}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineSetAppPriority{$}(lpszAppFilename: LPCTSTR; dwMediaMode: DWORD;
lpExtensionID: PLineExtensionID; dwRequestMode: DWORD;
lpszExtensionName: LPCTSTR; dwPriority: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineSetAppPriority{$}}
{#END}
{$ELSE}
function lineSetAppPriority(lpszAppFilename: LPCSTR; dwMediaMode: DWORD;
lpExtensionID: PLineExtensionID; dwRequestMode: DWORD;
lpszExtensionName: LPCSTR; dwPriority: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineSetAppPriority}
{$IFDEF WIN32}
function lineSetAppPriorityA(lpszAppFilename: LPCSTR; dwMediaMode: DWORD;
lpExtensionID: PLineExtensionID; dwRequestMode: DWORD;
lpszExtensionName: LPCSTR; dwPriority: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineSetAppPriorityA}
function lineSetAppPriorityW(lpszAppFilename: LPCWSTR; dwMediaMode: DWORD;
lpExtensionID: PLineExtensionID; dwRequestMode: DWORD;
lpszExtensionName: LPCWSTR; dwPriority: DWORD): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineSetAppPriorityW}
{$ENDIF}
{$ENDIF}
function lineSetAppSpecific(hCall: HCALL; dwAppSpecific: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetAppSpecific}
{$IFDEF TAPI20}
function lineSetCallData(hCall: HCALL; lpCallData: Pointer;
dwSize: DWORD): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineSetCallData}
{$ENDIF}
function lineSetCallParams(hCall: HCALL; dwBearerMode, dwMinRate,
dwMaxRate: DWORD; ldpDialParams: PLineDialParams): Longint; stdcall;
{$EXTERNALSYM lineSetCallParams}
function lineSetCallPrivilege(hCall: HCALL;
dwCallPrivilege: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetCallPrivilege}
{$IFDEF TAPI20}
function lineSetCallQualityOfService(hCall: HCALL; lpSendingFlowspec: Pointer;
dwSendingFlowspecSize: DWORD; lpReceivingFlowspec: Pointer;
dwReceivingFlowspecSize: DWORD): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineSetCallQualityOfService}
function lineSetCallTreatment(hCall: HCALL;
dwTreatment: DWORD): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineSetCallTreatment}
{$ENDIF}
function lineSetCurrentLocation(hLineApp: HLINEAPP;
dwLocation: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetCurrentLocation}
{$IFNDEF TAPI10}
{#BEGIN}
function lineSetDevConfig{$}(dwDeviceID: DWORD; lpDeviceConfig: Pointer;
dwSize: DWORD; lpszDeviceClass: LPCTSTR): Longint; stdcall;
{$EXTERNALSYM lineSetDevConfig{$}}
{#END}
{$ELSE}
function lineSetDevConfig(dwDeviceID: DWORD; lpDeviceConfig: Pointer;
dwSize: DWORD; lpszDeviceClass: LPCSTR): Longint; stdcall;
{$EXTERNALSYM lineSetDevConfig}
{$IFDEF WIN32}
function lineSetDevConfigA(dwDeviceID: DWORD; lpDeviceConfig: Pointer;
dwSize: DWORD; lpszDeviceClass: LPCSTR): Longint; stdcall;
{$EXTERNALSYM lineSetDevConfigA}
function lineSetDevConfigW(dwDeviceID: DWORD; lpDeviceConfig: Pointer;
dwSize: DWORD; lpszDeviceClass: LPCWSTR): Longint; stdcall;
{$EXTERNALSYM lineSetDevConfigW}
{$ENDIF}
{$ENDIF}
{$IFDEF TAPI20}
function lineSetLineDevStatus(hLine: HLINE; dwStatusToChange,
fStatus: DWORD): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM lineSetLineDevStatus}
{$ENDIF}
function lineSetMediaControl(hLine: HLINE; dwAddressID: DWORD; hCall: HCALL;
dwSelect: DWORD; lmcdDigitList: PLineMediaControlDigit;
dwDigitNumEntries: DWORD; lmcmMediaList: PLineMediaControlMedia;
dwMediaNumEntries: DWORD; lmctToneList: PLineMediaControlTone;
dwToneNumEntries: DWORD; lmccsCallStateList: PLineMediaControlCallState;
dwCallStateNumEntries: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetMediaControl}
function lineSetMediaMode(hCall: HCALL; dwMediaModes: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetMediaMode}
{$IFDEF TAPI22}
function lineSetQueueMeasurementPeriod(hLine: HLINE; dwQueueID,
dwMeasurementPeriod: DWORD): Longint; stdcall; // TAPI v2.2
{$EXTERNALSYM lineSetQueueMeasurementPeriod}
{$ENDIF}
function lineSetNumRings(hLine: HLINE; dwAddressID,
dwNumRings: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetNumRings}
function lineSetStatusMessages(hLine: HLINE; dwLineStates,
dwAddressStates: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetStatusMessages}
function lineSetTerminal(hLine: HLINE; dwAddressID: DWORD; hCall: HCALL;
dwSelect, dwTerminalModes, dwTerminalID, bEnable: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetTerminal}
{$IFNDEF TAPI10}
{#BEGIN}
function lineSetTollList{$}(hLineApp: HLINEAPP; dwDeviceID: DWORD;
lpszAddressIn: LPCTSTR; dwTollListOption: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetTollList{$}}
{#END}
{$ELSE}
function lineSetTollList(hLineApp: HLINEAPP; dwDeviceID: DWORD;
lpszAddressIn: LPCSTR; dwTollListOption: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetTollList}
{$IFDEF WIN32}
function lineSetTollListA(hLineApp: HLINEAPP; dwDeviceID: DWORD;
lpszAddressIn: LPCSTR; dwTollListOption: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetTollListA}
function lineSetTollListW(hLineApp: HLINEAPP; dwDeviceID: DWORD;
lpszAddressIn: LPCWSTR; dwTollListOption: DWORD): Longint; stdcall;
{$EXTERNALSYM lineSetTollListW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineSetupConference{$}(hCall: HCALL; hLine: HLINE; lphConfCall: PHCall;
lphConsultCall: PHCall; dwNumParties: DWORD;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineSetupConference{$}}
{#END}
{$ELSE}
function lineSetupConference(hCall: HCALL; hLine: HLINE; lphConfCall: PHCall;
lphConsultCall: PHCall; dwNumParties: DWORD;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineSetupConference}
{$IFDEF WIN32}
function lineSetupConferenceA(hCall: HCALL; hLine: HLINE; lphConfCall: PHCall;
lphConsultCall: PHCall; dwNumParties: DWORD;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineSetupConferenceA}
function lineSetupConferenceW(hCall: HCALL; hLine: HLINE; lphConfCall: PHCall;
lphConsultCall: PHCall; dwNumParties: DWORD;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineSetupConferenceW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineSetupTransfer{$}(hCall: HCALL; lphConsultCall: PHCall;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineSetupTransfer{$}}
{#END}
{$ELSE}
function lineSetupTransfer(hCall: HCALL; lphConsultCall: PHCall;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineSetupTransfer}
{$IFDEF WIN32}
function lineSetupTransferA(hCall: HCALL; lphConsultCall: PHCall;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineSetupTransferA}
function lineSetupTransferW(hCall: HCALL; lphConsultCall: PHCall;
lcpCallParams: PLineCallParams): Longint; stdcall;
{$EXTERNALSYM lineSetupTransferW}
{$ENDIF}
{$ENDIF}
function lineShutdown(hLineApp: HLINEAPP): Longint; stdcall;
{$EXTERNALSYM lineShutdown}
function lineSwapHold(hActiveCall, hHeldCall: HCALL): Longint; stdcall;
{$EXTERNALSYM lineSwapHold}
{$IFNDEF TAPI10}
{#BEGIN}
function lineTranslateAddress{$}(hLineApp: HLINEAPP; dwDeviceID,
dwAPIVersion: DWORD; lpszAddressIn: LPCTSTR; dwCard, dwTranslateOptions: DWORD;
lpTranslateOutput: PLineTranslateOutput): Longint; stdcall;
{$EXTERNALSYM lineTranslateAddress{$}}
{#END}
{$ELSE}
function lineTranslateAddress(hLineApp: HLINEAPP; dwDeviceID,
dwAPIVersion: DWORD; lpszAddressIn: LPCSTR; dwCard, dwTranslateOptions: DWORD;
lpTranslateOutput: PLineTranslateOutput): Longint; stdcall;
{$EXTERNALSYM lineTranslateAddress}
{$IFDEF WIN32}
function lineTranslateAddressA(hLineApp: HLINEAPP; dwDeviceID,
dwAPIVersion: DWORD; lpszAddressIn: LPCSTR; dwCard, dwTranslateOptions: DWORD;
lpTranslateOutput: PLineTranslateOutput): Longint; stdcall;
{$EXTERNALSYM lineTranslateAddressA}
function lineTranslateAddressW(hLineApp: HLINEAPP; dwDeviceID,
dwAPIVersion: DWORD; lpszAddressIn: LPCWSTR; dwCard, dwTranslateOptions: DWORD;
lpTranslateOutput: PLineTranslateOutput): Longint; stdcall;
{$EXTERNALSYM lineTranslateAddressW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineTranslateDialog{$}(hLineApp: HLINEAPP; dwDeviceID, dwAPIVersion: DWORD;
hwndOwner: HWND; lpszAddressIn: LPCTSTR): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineTranslateDialog{$}}
{#END}
{$ELSE}
function lineTranslateDialog(hLineApp: HLINEAPP; dwDeviceID, dwAPIVersion: DWORD;
hwndOwner: HWND; lpszAddressIn: LPCSTR): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineTranslateDialog}
{$IFDEF WIN32}
function lineTranslateDialogA(hLineApp: HLINEAPP; dwDeviceID, dwAPIVersion: DWORD;
hwndOwner: HWND; lpszAddressIn: LPCSTR): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineTranslateDialogA}
function lineTranslateDialogW(hLineApp: HLINEAPP; dwDeviceID, dwAPIVersion: DWORD;
hwndOwner: HWND; lpszAddressIn: LPCWSTR): Longint; stdcall; // TAPI v1.4
{$EXTERNALSYM lineTranslateDialogW}
{$ENDIF}
{$ENDIF}
function lineUncompleteCall(hLine: HLINE; dwCompletionID: DWORD): Longint; stdcall;
{$EXTERNALSYM lineUncompleteCall}
function lineUnhold(hCall: HCALL): Longint; stdcall;
{$EXTERNALSYM lineUnhold}
{$IFNDEF TAPI10}
{#BEGIN}
function lineUnpark{$}(hLine: HLINE; dwAddressID: DWORD; lphCall: PHCALL;
lpszDestAddress: LPCTSTR): Longint; stdcall;
{$EXTERNALSYM lineUnpark{$}}
{#END}
{$ELSE}
function lineUnpark(hLine: HLINE; dwAddressID: DWORD; lphCall: PHCALL;
lpszDestAddress: LPCSTR): Longint; stdcall;
{$EXTERNALSYM lineUnpark}
{$IFDEF WIN32}
function lineUnparkA(hLine: HLINE; dwAddressID: DWORD; lphCall: PHCALL;
lpszDestAddress: LPCSTR): Longint; stdcall;
{$EXTERNALSYM lineUnparkA}
function lineUnparkW(hLine: HLINE; dwAddressID: DWORD; lphCall: PHCALL;
lpszDestAddress: LPCWSTR): Longint; stdcall;
{$EXTERNALSYM lineUnparkW}
{$ENDIF}
{$ENDIF}
function phoneClose(hPhone: HPHONE): Longint; stdcall;
{$EXTERNALSYM phoneClose}
{$IFNDEF TAPI10}
{#BEGIN}
function phoneConfigDialog{$}(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCTSTR): Longint; stdcall;
{$EXTERNALSYM phoneConfigDialog{$}}
{#END}
{$ELSE}
function phoneConfigDialog(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCSTR): Longint; stdcall;
{$EXTERNALSYM phoneConfigDialog}
{$IFDEF WIN32}
function phoneConfigDialogA(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCSTR): Longint; stdcall;
{$EXTERNALSYM phoneConfigDialogA}
function phoneConfigDialogW(dwDeviceID: DWORD; hwndOwner: HWND;
lpszDeviceClass: LPCWSTR): Longint; stdcall;
{$EXTERNALSYM phoneConfigDialogW}
{$ENDIF}
{$ENDIF}
function phoneDevSpecific(hPhone: HPHONE; lpParams: Pointer;
dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneDevSpecific}
{$IFNDEF TAPI10}
{#BEGIN}
function phoneGetButtonInfo{$}(hPhone: HPHONE; dwButtonLampID: DWORD;
lpButtonInfo: PPhoneButtonInfo): Longint; stdcall;
{$EXTERNALSYM phoneGetButtonInfo{$}}
{#END}
{$ELSE}
function phoneGetButtonInfo(hPhone: HPHONE; dwButtonLampID: DWORD;
lpButtonInfo: PPhoneButtonInfo): Longint; stdcall;
{$EXTERNALSYM phoneGetButtonInfo}
{$IFDEF WIN32}
function phoneGetButtonInfoA(hPhone: HPHONE; dwButtonLampID: DWORD;
lpButtonInfo: PPhoneButtonInfo): Longint; stdcall;
{$EXTERNALSYM phoneGetButtonInfoA}
function phoneGetButtonInfoW(hPhone: HPHONE; dwButtonLampID: DWORD;
lpButtonInfo: PPhoneButtonInfo): Longint; stdcall;
{$EXTERNALSYM phoneGetButtonInfoW}
{$ENDIF}
{$ENDIF}
function phoneGetData(hPhone: HPHONE; dwDataID: DWORD; lpData: Pointer;
dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneGetData}
{$IFNDEF TAPI10}
{#BEGIN}
function phoneGetDevCaps{$}(hPhoneApp: HPHONEAPP; dwDeviceID, dwAPIVersion,
dwExtVersion: DWORD; lpPhoneCaps: PPhoneCaps): Longint; stdcall;
{$EXTERNALSYM phoneGetDevCaps{$}}
{#END}
{$ELSE}
function phoneGetDevCaps(hPhoneApp: HPHONEAPP; dwDeviceID, dwAPIVersion,
dwExtVersion: DWORD; lpPhoneCaps: PPhoneCaps): Longint; stdcall;
{$EXTERNALSYM phoneGetDevCaps}
{$IFDEF WIN32}
function phoneGetDevCapsA(hPhoneApp: HPHONEAPP; dwDeviceID, dwAPIVersion,
dwExtVersion: DWORD; lpPhoneCaps: PPhoneCaps): Longint; stdcall;
{$EXTERNALSYM phoneGetDevCapsA}
function phoneGetDevCapsW(hPhoneApp: HPHONEAPP; dwDeviceID, dwAPIVersion,
dwExtVersion: DWORD; lpPhoneCaps: PPhoneCaps): Longint; stdcall;
{$EXTERNALSYM phoneGetDevCapsW}
{$ENDIF}
{$ENDIF}
function phoneGetDisplay(hPhone: HPHONE; lpDisplay: PVarString): Longint; stdcall;
{$EXTERNALSYM phoneGetDisplay}
function phoneGetGain(hPhone: HPHONE; dwHookSwitchDev: DWORD;
var dwGain: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneGetGain}
function phoneGetHookSwitch(hPhone: HPHONE;
var dwHookSwitchDevs: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneGetHookSwitch}
{$IFNDEF TAPI10}
{#BEGIN}
function phoneGetIcon{$}(dwDeviceID: DWORD; lpszDeviceClass: LPCTSTR;
var hIcon: HIcon): Longint; stdcall;
{$EXTERNALSYM phoneGetIcon{$}}
{#END}
{$ELSE}
function phoneGetIcon(dwDeviceID: DWORD; lpszDeviceClass: LPCSTR;
var hIcon: HIcon): Longint; stdcall;
{$EXTERNALSYM phoneGetIcon}
{$IFDEF WIN32}
function phoneGetIconA(dwDeviceID: DWORD; lpszDeviceClass: LPCSTR;
var hIcon: HIcon): Longint; stdcall;
{$EXTERNALSYM phoneGetIconA}
function phoneGetIconW(dwDeviceID: DWORD; lpszDeviceClass: LPCWSTR;
var hIcon: HIcon): Longint; stdcall;
{$EXTERNALSYM phoneGetIconW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function phoneGetID{$}(hPhone: HPHONE; lpDeviceID: PVarString;
lpszDeviceClass: LPCTSTR): Longint; stdcall;
{$EXTERNALSYM phoneGetID{$}}
{#END}
{$ELSE}
function phoneGetID(hPhone: HPHONE; lpDeviceID: PVarString;
lpszDeviceClass: LPCSTR): Longint; stdcall;
{$EXTERNALSYM phoneGetID}
{$IFDEF WIN32}
function phoneGetIDA(hPhone: HPHONE; lpDeviceID: PVarString;
lpszDeviceClass: LPCSTR): Longint; stdcall;
{$EXTERNALSYM phoneGetIDA}
function phoneGetIDW(hPhone: HPHONE; lpDeviceID: PVarString;
lpszDeviceClass: LPCWSTR): Longint; stdcall;
{$EXTERNALSYM phoneGetIDW}
{$ENDIF}
{$ENDIF}
function phoneGetLamp(hPhone: HPHONE; dwButtonLampID: DWORD;
var dwLampMode: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneGetLamp}
{$IFDEF TAPI20}
function phoneGetMessage(hPhoneApp: HPHONEAPP; var lpMessage: TPhoneMessage;
dwTimeout: DWORD): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM phoneGetMessage}
{$ENDIF}
function phoneGetRing(hPhone: HPHONE; var dwRingMode,
dwVolume: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneGetRing}
{$IFNDEF TAPI10}
{#BEGIN}
function phoneGetStatus{$}(hPhone: HPHONE;
lpPhoneStatus: PPhoneStatus): Longint; stdcall;
{$EXTERNALSYM phoneGetStatus{$}}
{#END}
{$ELSE}
function phoneGetStatus(hPhone: HPHONE;
lpPhoneStatus: PPhoneStatus): Longint; stdcall;
{$EXTERNALSYM phoneGetStatus}
{$IFDEF WIN32}
function phoneGetStatusA(hPhone: HPHONE;
lpPhoneStatus: PPhoneStatus): Longint; stdcall;
{$EXTERNALSYM phoneGetStatusA}
function phoneGetStatusW(hPhone: HPHONE;
lpPhoneStatus: PPhoneStatus): Longint; stdcall;
{$EXTERNALSYM phoneGetStatusW}
{$ENDIF}
{$ENDIF}
function phoneGetStatusMessages(hPhone: HPHONE; var lpdwPhoneStates,
lpdwButtonModes, lpdwButtonStates: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneGetStatusMessages}
function phoneGetVolume(hPhone: HPHONE; dwHookSwitchDev: DWORD;
var dwVolume: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneGetVolume}
function phoneInitialize(var hPhoneApp: HPHONEAPP; hInstance: HINST;
lpfnCallback: TPhoneCallback;lpszAppName: LPCSTR;
var dwNumDevs: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneInitialize}
{$IFDEF TAPI20}
{#BEGIN}
function phoneInitializeEx{$}(var hPhoneApp: HPHONEAPP; hInstance: HINST;
lpfnCallback: TPhoneCallback; lpszFriendlyAppName: LPCTSTR;
var dwNumDevs, dwAPIVersion: DWORD;
var PhoneInitializeExParams: TPhoneInitializeExParams): Longint; stdcall; // TAPI v2.0
{$EXTERNALSYM phoneInitializeEx{$}}
{#END}
{$ENDIF}
function phoneNegotiateAPIVersion(hPhoneApp: HPHONEAPP; dwDeviceID,
dwAPILowVersion, dwAPIHighVersion: DWORD; var dwAPIVersion: DWORD;
var lpExtensionID: TPhoneExtensionID): Longint; stdcall;
{$EXTERNALSYM phoneNegotiateAPIVersion}
function phoneNegotiateExtVersion(hPhoneApp: HPHONEAPP; dwDeviceID,
dwAPIVersion, dwExtLowVersion, dwExtHighVersion: DWORD;
var dwExtVersion: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneNegotiateExtVersion}
function phoneOpen(hPhoneApp: HPHONEAPP; dwDeviceID: DWORD; var hPhone: HPHONE;
dwAPIVersion, dwExtVersion, dwCallbackInstance,
dwPrivilege: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneOpen}
{$IFNDEF TAPI10}
{#BEGIN}
function phoneSetButtonInfo{$}(hPhone: HPHONE; dwButtonLampID: DWORD;
pbiButtonInfo: PPhoneButtonInfo): Longint; stdcall;
{$EXTERNALSYM phoneSetButtonInfo{$}}
{#END}
{$ELSE}
function phoneSetButtonInfo(hPhone: HPHONE; dwButtonLampID: DWORD;
pbiButtonInfo: PPhoneButtonInfo): Longint; stdcall;
{$EXTERNALSYM phoneSetButtonInfo}
{$IFDEF WIN32}
function phoneSetButtonInfoA(hPhone: HPHONE; dwButtonLampID: DWORD;
pbiButtonInfo: PPhoneButtonInfo): Longint; stdcall;
{$EXTERNALSYM phoneSetButtonInfoA}
function phoneSetButtonInfoW(hPhone: HPHONE; dwButtonLampID: DWORD;
pbiButtonInfo: PPhoneButtonInfo): Longint; stdcall;
{$EXTERNALSYM phoneSetButtonInfoW}
{$ENDIF}
{$ENDIF}
function phoneSetData(hPhone: HPHONE; dwDataID: DWORD; lpData: Pointer;
dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneSetData}
function phoneSetDisplay(hPhone: HPHONE; dwRow, dwColumn: DWORD;
lpsDisplay: LPCSTR; dwSize: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneSetDisplay}
function phoneSetGain(hPhone: HPHONE; dwHookSwitchDev: DWORD;
dwGain: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneSetGain}
function phoneSetHookSwitch(hPhone: HPHONE; dwHookSwitchDevs,
dwHookSwitchMode: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneSetHookSwitch}
function phoneSetLamp(hPhone: HPHONE; dwButtonLampID,
dwLampMode: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneSetLamp}
function phoneSetRing(hPhone: HPHONE; dwRingMode,
dwVolume: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneSetRing}
function phoneSetStatusMessages(hPhone: HPHONE; dwPhoneStates, dwButtonModes,
dwButtonStates: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneSetStatusMessages}
function phoneSetVolume(hPhone: HPHONE; dwHookSwitchDev,
dwVolume: DWORD): Longint; stdcall;
{$EXTERNALSYM phoneSetVolume}
function phoneShutdown(hPhoneApp: HPHONEAPP): Longint; stdcall;
{$EXTERNALSYM phoneShutdown}
{$IFNDEF TAPI10}
{#BEGIN}
function tapiGetLocationInfo{$}(lpszCountryCode,
lpszCityCode: LPCTSTR): Longint; stdcall;
{$EXTERNALSYM tapiGetLocationInfo{$}}
{#END}
{$ELSE}
function tapiGetLocationInfo(lpszCountryCode,
lpszCityCode: LPCSTR): Longint; stdcall;
{$EXTERNALSYM tapiGetLocationInfo}
{$IFDEF WIN32}
function tapiGetLocationInfoA(lpszCountryCode,
lpszCityCode: LPCSTR): Longint; stdcall;
{$EXTERNALSYM tapiGetLocationInfoA}
function tapiGetLocationInfoW(lpszCountryCode,
lpszCityCode: LPCWSTR): Longint; stdcall;
{$EXTERNALSYM tapiGetLocationInfoW}
{$ENDIF}
{$ENDIF}
function tapiRequestDrop(hwnd: HWND; wRequestID: WPARAM): Longint; stdcall;
{$EXTERNALSYM tapiRequestDrop}
{$IFNDEF TAPI10}
{#BEGIN}
function tapiRequestMakeCall{$}(lpszDestAddress, lpszAppName, lpszCalledParty,
lpszComment: LPCTSTR): Longint; stdcall;
{$EXTERNALSYM tapiRequestMakeCall{$}}
{#END}
{$ELSE}
function tapiRequestMakeCall(lpszDestAddress, lpszAppName, lpszCalledParty,
lpszComment: LPCSTR): Longint; stdcall;
{$EXTERNALSYM tapiRequestMakeCall}
{$IFDEF WIN32}
function tapiRequestMakeCallA(lpszDestAddress, lpszAppName, lpszCalledParty,
lpszComment: LPCSTR): Longint; stdcall;
{$EXTERNALSYM tapiRequestMakeCallA}
function tapiRequestMakeCallW(lpszDestAddress, lpszAppName, lpszCalledParty,
lpszComment: LPCWSTR): Longint; stdcall;
{$EXTERNALSYM tapiRequestMakeCallW}
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function tapiRequestMediaCall{$}(hwnd: HWND; wRequestID: WPARAM; lpszDeviceClass,
lpDeviceID: LPCTSTR; dwSize, dwSecure: DWORD; lpszDestAddress, lpszAppName,
lpszCalledParty, lpszComment: LPCTSTR): Longint; stdcall;
{$EXTERNALSYM tapiRequestMediaCall{$}}
{#END}
{$ELSE}
function tapiRequestMediaCall(hwnd: HWND; wRequestID: WPARAM; lpszDeviceClass,
lpDeviceID: LPCSTR; dwSize, dwSecure: DWORD; lpszDestAddress, lpszAppName,
lpszCalledParty, lpszComment: LPCSTR): Longint; stdcall;
{$EXTERNALSYM tapiRequestMediaCall}
{$IFDEF WIN32}
function tapiRequestMediaCallA(hwnd: HWND; wRequestID: WPARAM; lpszDeviceClass,
lpDeviceID: LPCSTR; dwSize, dwSecure: DWORD; lpszDestAddress, lpszAppName,
lpszCalledParty, lpszComment: LPCSTR): Longint; stdcall;
{$EXTERNALSYM tapiRequestMediaCallA}
function tapiRequestMediaCallW(hwnd: HWND; wRequestID: WPARAM; lpszDeviceClass,
lpDeviceID: LPCWSTR; dwSize, dwSecure: DWORD; lpszDestAddress, lpszAppName,
lpszCalledParty, lpszComment: LPCWSTR): Longint; stdcall;
{$EXTERNALSYM tapiRequestMediaCallW}
{$ENDIF}
{$ENDIF}
(*
* TAPIERROR_FORMATMESSAGE - macro to convert a TAPI error constant
* into a constant that FormatMessage will accept
*
* TAPIERR : Negative numbers and 0
* Map to : strip off high WORD
* Example: 0xFFFFFFFF (-1) becomes 0x0000FFFF
* LINEERR : Start at 0x80000000
* Map to : strip off 0x80000000 and add 0xE000
* Example: 0x80000004 becomes 0x0000E004
* PHONEERR: Start at 0x90000000
* Map to : strip off 0x90000000 and add 0xF000
* Example: 0x9000000A becomes 0x0000F00A
*
* pseudocode:
*
* if (__ErrCode__ is a TAPIERR)
* strip off high word
*
* else if (__ErrCode__ is a PHONEERR)
* strip off 0x90000000
* add 0xE000
*
* else
* strip off 0x80000000
* add 0xF000
*)
function TapiErrorFormatMessage(ErrCode: DWORD): Longint;
function TAPIERROR_FORMATMESSAGE(ErrCode: DWORD): Longint;
{$EXTERNALSYM TAPIERROR_FORMATMESSAGE}
implementation
const
TapiDll = 'tapi32.dll';
function lineAccept; external TapiDll name 'lineAccept';
{$IFNDEF TAPI10}
{#BEGIN}
function lineAddProvider{$}; external TapiDll name 'lineAddProvider{%}';
{#END}
{$ELSE}
function lineAddProvider; external TapiDll name 'lineAddProvider';
{$IFDEF WIN32}
function lineAddProviderA; external TapiDll name 'lineAddProviderA';
function lineAddProviderW; external TapiDll name 'lineAddProviderW';
{$ENDIF}
{$ENDIF}
function lineAddToConference; external TapiDll name 'lineAddToConference';
{$IFDEF TAPI20}
function lineAgentSpecific; external TapiDll name 'lineAgentSpecific';
{$ENDIF}
function lineAnswer; external TapiDll name 'lineAnswer';
{$IFNDEF TAPI10}
{#BEGIN}
function lineBlindTransfer{$}; external TapiDll name 'lineBlindTransfer{%}';
{#END}
{$ELSE}
function lineBlindTransfer; external TapiDll name 'lineBlindTransfer';
{$IFDEF WIN32}
function lineBlindTransferA; external TapiDll name 'lineBlindTransferA';
function lineBlindTransferW; external TapiDll name 'lineBlindTransferW';
{$ENDIF}
{$ENDIF}
function lineClose; external TapiDll name 'lineClose';
function lineCompleteCall; external TapiDll name 'lineCompleteCall';
function lineCompleteTransfer; external TapiDll name 'lineCompleteTransfer';
{$IFNDEF TAPI10}
{#BEGIN}
function lineConfigDialog{$}; external TapiDll name 'lineConfigDialog{%}';
{#END}
{$ELSE}
function lineConfigDialog; external TapiDll name 'lineConfigDialog';
{$IFDEF WIN32}
function lineConfigDialogA; external TapiDll name 'lineConfigDialogA';
function lineConfigDialogW; external TapiDll name 'lineConfigDialogW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineConfigDialogEdit{$}; external TapiDll name 'lineConfigDialogEdit{%}';
{#END}
{$ELSE}
function lineConfigDialogEdit; external TapiDll name 'lineConfigDialogEdit';
{$IFDEF WIN32}
function lineConfigDialogEditA; external TapiDll name 'lineConfigDialogEditA';
function lineConfigDialogEditW; external TapiDll name 'lineConfigDialogEditW';
{$ENDIF}
{$ENDIF}
function lineConfigProvider; external TapiDll name 'lineConfigProvider';
{$IFDEF TAPI22}
{#BEGIN}
function lineCreateAgent{$}; external TapiDll name 'lineCreateAgent{%}';
{#END}
{#BEGIN}
function lineCreateAgentSession{$}; external TapiDll name 'lineCreateAgentSession{%}';
{#END}
{$ENDIF}
function lineDeallocateCall; external TapiDll name 'lineDeallocateCall';
function lineDevSpecific; external TapiDll name 'lineDevSpecific';
function lineDevSpecificFeature; external TapiDll name 'lineDevSpecificFeature';
{$IFNDEF TAPI10}
{#BEGIN}
function lineDial{$}; external TapiDll name 'lineDial{%}';
{#END}
{$ELSE}
function lineDial; external TapiDll name 'lineDial';
{$IFDEF WIN32}
function lineDialA; external TapiDll name 'lineDialA';
function lineDialW; external TapiDll name 'lineDialW';
{$ENDIF}
{$ENDIF}
function lineDrop; external TapiDll name 'lineDrop';
{$IFNDEF TAPI10}
{#BEGIN}
function lineForward{$}; external TapiDll name 'lineForward{%}';
{#END}
{$ELSE}
function lineForward; external TapiDll name 'lineForward';
{$IFDEF WIN32}
function lineForwardA; external TapiDll name 'lineForwardA';
function lineForwardW; external TapiDll name 'lineForwardW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGatherDigits{$}; external TapiDll name 'lineGatherDigits{%}';
{#END}
{$ELSE}
function lineGatherDigits; external TapiDll name 'lineGatherDigits';
{$IFDEF WIN32}
function lineGatherDigitsA; external TapiDll name 'lineGatherDigitsA';
function lineGatherDigitsW; external TapiDll name 'lineGatherDigitsW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGenerateDigits{$}; external TapiDll name 'lineGenerateDigits{%}';
{#END}
{$ELSE}
function lineGenerateDigits; external TapiDll name 'lineGenerateDigits';
{$IFDEF WIN32}
function lineGenerateDigitsA; external TapiDll name 'lineGenerateDigitsA';
function lineGenerateDigitsW; external TapiDll name 'lineGenerateDigitsW';
{$ENDIF}
{$ENDIF}
function lineGenerateTone; external TapiDll name 'lineGenerateTone';
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetAddressCaps{$}; external TapiDll name 'lineGetAddressCaps{%}';
{#END}
{$ELSE}
function lineGetAddressCaps; external TapiDll name 'lineGetAddressCaps';
{$IFDEF WIN32}
function lineGetAddressCapsA; external TapiDll name 'lineGetAddressCapsA';
function lineGetAddressCapsW; external TapiDll name 'lineGetAddressCapsW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetAddressID{$}; external TapiDll name 'lineGetAddressID{%}';
{#END}
{$ELSE}
function lineGetAddressID; external TapiDll name 'lineGetAddressID';
{$IFDEF WIN32}
function lineGetAddressIDA; external TapiDll name 'lineGetAddressIDA';
function lineGetAddressIDW; external TapiDll name 'lineGetAddressIDW';
{$ENDIF}
{$ENDIF}
{#BEGIN}
function lineGetAddressStatus{$}; external TapiDll name 'lineGetAddressStatus{%}';
{#END}
{$IFDEF TAPI20}
{#BEGIN}
function lineGetAgentActivityList{$}; external TapiDll name 'lineGetAgentActivityList{%}';
{#END}
{#BEGIN}
function lineGetAgentCaps{$}; external TapiDll name 'lineGetAgentCaps{%}';
{#END}
{#BEGIN}
function lineGetAgentGroupList{$}; external TapiDll name 'lineGetAgentGroupList{%}';
{#END}
{$IFDEF TAPI22}
function lineGetAgentInfo; external TapiDll name 'lineGetAgentInfo';
function lineGetAgentSessionInfo; external TapiDll name 'lineGetAgentSessionInfo';
function lineGetAgentSessionList; external TapiDll name 'lineGetAgentSessionList';
{$ENDIF}
{#BEGIN}
function lineGetAgentStatus{$}; external TapiDll name 'lineGetAgentStatus{%}';
{#END}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetAppPriority{$}; external TapiDll name 'lineGetAppPriority{%}';
{#END}
{$ELSE}
function lineGetAppPriority; external TapiDll name 'lineGetAppPriority';
{$IFDEF WIN32}
function lineGetAppPriorityA; external TapiDll name 'lineGetAppPriorityA';
function lineGetAppPriorityW; external TapiDll name 'lineGetAppPriorityW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetCallInfo{$}; external TapiDll name 'lineGetCallInfo{%}';
{#END}
{$ELSE}
function lineGetCallInfo; external TapiDll name 'lineGetCallInfo';
{$IFDEF WIN32}
function lineGetCallInfoA; external TapiDll name 'lineGetCallInfoA';
function lineGetCallInfoW; external TapiDll name 'lineGetCallInfoW';
{$ENDIF}
{$ENDIF}
function lineGetCallStatus; external TapiDll name 'lineGetCallStatus';
function lineGetConfRelatedCalls; external TapiDll name 'lineGetConfRelatedCalls';
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetCountry{$}; external TapiDll name 'lineGetCountry{%}';
{#END}
{$ELSE}
function lineGetCountry; external TapiDll name 'lineGetCountry';
{$IFDEF WIN32}
function lineGetCountryA; external TapiDll name 'lineGetCountryA';
function lineGetCountryW; external TapiDll name 'lineGetCountryW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetDevCaps{$}; external TapiDll name 'lineGetDevCaps{%}';
{#END}
{$ELSE}
function lineGetDevCaps; external TapiDll name 'lineGetDevCaps';
{$IFDEF WIN32}
function lineGetDevCapsA; external TapiDll name 'lineGetDevCapsA';
function lineGetDevCapsW; external TapiDll name 'lineGetDevCapsW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetDevConfig{$}; external TapiDll name 'lineGetDevConfig{%}';
{#END}
{$ELSE}
function lineGetDevConfig; external TapiDll name 'lineGetDevConfig';
{$IFDEF WIN32}
function lineGetDevConfigA; external TapiDll name 'lineGetDevConfigA';
function lineGetDevConfigW; external TapiDll name 'lineGetDevConfigW';
{$ENDIF}
{$ENDIF}
{$IFDEF TAPI22}
{#BEGIN}
function lineGetGroupList{$}; external TapiDll name 'lineGetGroupList{%}';
{#END}
{$ENDIF}
function lineGetNewCalls; external TapiDll name 'lineGetNewCalls';
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetIcon{$}; external TapiDll name 'lineGetIcon{%}';
{#END}
{$ELSE}
function lineGetIcon; external TapiDll name 'lineGetIcon';
{$IFDEF WIN32}
function lineGetIconA; external TapiDll name 'lineGetIconA';
function lineGetIconW; external TapiDll name 'lineGetIconW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetID{$}; external TapiDll name 'lineGetID{%}';
{#END}
{$ELSE}
function lineGetID; external TapiDll name 'lineGetID';
{$IFDEF WIN32}
function lineGetIDA; external TapiDll name 'lineGetIDA';
function lineGetIDW; external TapiDll name 'lineGetIDW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetLineDevStatus{$}; external TapiDll name 'lineGetLineDevStatus{%}';
{#END}
{$ELSE}
function lineGetLineDevStatus; external TapiDll name 'lineGetLineDevStatus';
{$IFDEF WIN32}
function lineGetLineDevStatusA; external TapiDll name 'lineGetLineDevStatusA';
function lineGetLineDevStatusW; external TapiDll name 'lineGetLineDevStatusW';
{$ENDIF}
{$ENDIF}
{$IFDEF TAPI20}
function lineGetMessage; external TapiDll name 'lineGetMessage';
{$ENDIF}
function lineGetNumRings; external TapiDll name 'lineGetNumRings';
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetProviderList{$}; external TapiDll name 'lineGetProviderList{%}';
{#END}
{$ELSE}
function lineGetProviderList; external TapiDll name 'lineGetProviderList';
{$IFDEF WIN32}
function lineGetProviderListA; external TapiDll name 'lineGetProviderListA';
function lineGetProviderListW; external TapiDll name 'lineGetProviderListW';
{$ENDIF}
{$ENDIF}
{$IFDEF TAPI22}
function lineGetProxyStatus; external TapiDll name 'lineGetProxyStatus';
function lineGetQueueInfo; external TapiDll name 'lineGetQueueInfo';
{#BEGIN}
function lineGetQueueList{$}; external TapiDll name 'lineGetQueueList{%}';
{#END}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetRequest{$}; external TapiDll name 'lineGetRequest{%}';
{#END}
{$ELSE}
function lineGetRequest; external TapiDll name 'lineGetRequest';
{$IFDEF WIN32}
function lineGetRequestA; external TapiDll name 'lineGetRequestA';
function lineGetRequestW; external TapiDll name 'lineGetRequestW';
{$ENDIF}
{$ENDIF}
function lineGetStatusMessages; external TapiDll name 'lineGetStatusMessages';
{$IFNDEF TAPI10}
{#BEGIN}
function lineGetTranslateCaps{$}; external TapiDll name 'lineGetTranslateCaps{%}';
{#END}
{$ELSE}
function lineGetTranslateCaps; external TapiDll name 'lineGetTranslateCaps';
{$IFDEF WIN32}
function lineGetTranslateCapsA; external TapiDll name 'lineGetTranslateCapsA';
function lineGetTranslateCapsW; external TapiDll name 'lineGetTranslateCapsW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineHandoff{$}; external TapiDll name 'lineHandoff{%}';
{#END}
{$ELSE}
function lineHandoff; external TapiDll name 'lineHandoff';
{$IFDEF WIN32}
function lineHandoffA; external TapiDll name 'lineHandoffA';
function lineHandoffW; external TapiDll name 'lineHandoffW';
{$ENDIF}
{$ENDIF}
function lineHold; external TapiDll name 'lineHold';
function lineInitialize; external TapiDll name 'lineInitialize';
{$IFDEF TAPI20}
{#BEGIN}
function lineInitializeEx{$}; external TapiDll name 'lineInitializeEx{%}';
{#END}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineMakeCall{$}; external TapiDll name 'lineMakeCall{%}';
{#END}
{$ELSE}
function lineMakeCall; external TapiDll name 'lineMakeCall';
{$IFDEF WIN32}
function lineMakeCallA; external TapiDll name 'lineMakeCallA';
function lineMakeCallW; external TapiDll name 'lineMakeCallW';
{$ENDIF}
{$ENDIF}
function lineMonitorDigits; external TapiDll name 'lineMonitorDigits';
function lineMonitorMedia; external TapiDll name 'lineMonitorMedia';
function lineMonitorTones; external TapiDll name 'lineMonitorTones';
function lineNegotiateAPIVersion; external TapiDll name 'lineNegotiateAPIVersion';
function lineNegotiateExtVersion; external TapiDll name 'lineNegotiateExtVersion';
{$IFNDEF TAPI10}
{#BEGIN}
function lineOpen{$}; external TapiDll name 'lineOpen{%}';
{#END}
{$ELSE}
function lineOpen; external TapiDll name 'lineOpen';
{$IFDEF WIN32}
function lineOpenA; external TapiDll name 'lineOpenA';
function lineOpenW; external TapiDll name 'lineOpenW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function linePark{$}; external TapiDll name 'linePark{%}';
{#END}
{$ELSE}
function linePark; external TapiDll name 'linePark';
{$IFDEF WIN32}
function lineParkA; external TapiDll name 'lineParkA';
function lineParkW; external TapiDll name 'lineParkW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function linePickup{$}; external TapiDll name 'linePickup{%}';
{#END}
{$ELSE}
function linePickup; external TapiDll name 'linePickup';
{$IFDEF WIN32}
function linePickupA; external TapiDll name 'linePickupA';
function linePickupW; external TapiDll name 'linePickupW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function linePrepareAddToConference{$}; external TapiDll name 'linePrepareAddToConference{%}';
{#END}
{$ELSE}
function linePrepareAddToConference; external TapiDll name 'linePrepareAddToConference';
{$IFDEF WIN32}
function linePrepareAddToConferenceA; external TapiDll name 'linePrepareAddToConferenceA';
function linePrepareAddToConferenceW; external TapiDll name 'linePrepareAddToConferenceW';
{$ENDIF}
{$ENDIF}
{$IFDEF TAPI20}
function lineProxyMessage; external TapiDll name 'lineProxyMessage';
function lineProxyResponse; external TapiDll name 'lineProxyResponse';
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineRedirect{$}; external TapiDll name 'lineRedirect{%}';
{#END}
{$ELSE}
function lineRedirect; external TapiDll name 'lineRedirect';
{$IFDEF WIN32}
function lineRedirectA; external TapiDll name 'lineRedirectA';
function lineRedirectW; external TapiDll name 'lineRedirectW';
{$ENDIF}
{$ENDIF}
function lineRegisterRequestRecipient; external TapiDll name 'lineRegisterRequestRecipient';
function lineReleaseUserUserInfo; external TapiDll name 'lineReleaseUserUserInfo';
function lineRemoveFromConference; external TapiDll name 'lineRemoveFromConference';
function lineRemoveProvider; external TapiDll name 'lineRemoveProvider';
function lineSecureCall; external TapiDll name 'lineSecureCall';
function lineSendUserUserInfo; external TapiDll name 'lineSendUserUserInfo';
{$IFDEF TAPI20}
function lineSetAgentActivity; external TapiDll name 'lineSetAgentActivity';
function lineSetAgentGroup; external TapiDll name 'lineSetAgentGroup';
{$IFDEF TAPI22}
function lineSetAgentMeasurementPeriod; external TapiDll name 'lineSetAgentMeasurementPeriod';
function lineSetAgentSessionState; external TapiDll name 'lineSetAgentSessionState';
function lineSetAgentStateEx; external TapiDll name 'lineSetAgentStateEx';
{$ENDIF}
function lineSetAgentState; external TapiDll name 'lineSetAgentState';
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineSetAppPriority{$}; external TapiDll name 'lineSetAppPriority{%}';
{#END}
{$ELSE}
function lineSetAppPriority; external TapiDll name 'lineSetAppPriority';
{$IFDEF WIN32}
function lineSetAppPriorityA; external TapiDll name 'lineSetAppPriorityA';
function lineSetAppPriorityW; external TapiDll name 'lineSetAppPriorityW';
{$ENDIF}
{$ENDIF}
function lineSetAppSpecific; external TapiDll name 'lineSetAppSpecific';
{$IFDEF TAPI20}
function lineSetCallData; external TapiDll name 'lineSetCallData';
{$ENDIF}
function lineSetCallParams; external TapiDll name 'lineSetCallParams';
function lineSetCallPrivilege; external TapiDll name 'lineSetCallPrivilege';
{$IFDEF TAPI20}
function lineSetCallQualityOfService; external TapiDll name 'lineSetCallQualityOfService';
function lineSetCallTreatment; external TapiDll name 'lineSetCallTreatment';
{$ENDIF}
function lineSetCurrentLocation; external TapiDll name 'lineSetCurrentLocation';
{$IFNDEF TAPI10}
{#BEGIN}
function lineSetDevConfig{$}; external TapiDll name 'lineSetDevConfig{%}';
{#END}
{$ELSE}
function lineSetDevConfig; external TapiDll name 'lineSetDevConfig';
{$IFDEF WIN32}
function lineSetDevConfigA; external TapiDll name 'lineSetDevConfigA';
function lineSetDevConfigW; external TapiDll name 'lineSetDevConfigW';
{$ENDIF}
{$ENDIF}
{$IFDEF TAPI20}
function lineSetLineDevStatus; external TapiDll name 'lineSetLineDevStatus';
{$ENDIF}
function lineSetMediaControl; external TapiDll name 'lineSetMediaControl';
function lineSetMediaMode; external TapiDll name 'lineSetMediaMode';
{$IFDEF TAPI22}
function lineSetQueueMeasurementPeriod; external TapiDll name 'lineSetQueueMeasurementPeriod';
{$ENDIF}
function lineSetNumRings; external TapiDll name 'lineSetNumRings';
function lineSetStatusMessages; external TapiDll name 'lineSetStatusMessages';
function lineSetTerminal; external TapiDll name 'lineSetTerminal';
{$IFNDEF TAPI10}
{#BEGIN}
function lineSetTollList{$}; external TapiDll name 'lineSetTollList{%}';
{#END}
{$ELSE}
function lineSetTollList; external TapiDll name 'lineSetTollList';
{$IFDEF WIN32}
function lineSetTollListA; external TapiDll name 'lineSetTollListA';
function lineSetTollListW; external TapiDll name 'lineSetTollListW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineSetupConference{$}; external TapiDll name 'lineSetupConference{%}';
{#END}
{$ELSE}
function lineSetupConference; external TapiDll name 'lineSetupConference';
{$IFDEF WIN32}
function lineSetupConferenceA; external TapiDll name 'lineSetupConferenceA';
function lineSetupConferenceW; external TapiDll name 'lineSetupConferenceW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineSetupTransfer{$}; external TapiDll name 'lineSetupTransfer{%}';
{#END}
{$ELSE}
function lineSetupTransfer; external TapiDll name 'lineSetupTransfer';
{$IFDEF WIN32}
function lineSetupTransferA; external TapiDll name 'lineSetupTransferA';
function lineSetupTransferW; external TapiDll name 'lineSetupTransferW';
{$ENDIF}
{$ENDIF}
function lineShutdown; external TapiDll name 'lineShutdown';
function lineSwapHold; external TapiDll name 'lineSwapHold';
{$IFNDEF TAPI10}
{#BEGIN}
function lineTranslateAddress{$}; external TapiDll name 'lineTranslateAddress{%}';
{#END}
{$ELSE}
function lineTranslateAddress; external TapiDll name 'lineTranslateAddress';
{$IFDEF WIN32}
function lineTranslateAddressA; external TapiDll name 'lineTranslateAddressA';
function lineTranslateAddressW; external TapiDll name 'lineTranslateAddressW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function lineTranslateDialog{$}; external TapiDll name 'lineTranslateDialog{%}';
{#END}
{$ELSE}
function lineTranslateDialog; external TapiDll name 'lineTranslateDialog';
{$IFDEF WIN32}
function lineTranslateDialogA; external TapiDll name 'lineTranslateDialogA';
function lineTranslateDialogW; external TapiDll name 'lineTranslateDialogW';
{$ENDIF}
{$ENDIF}
function lineUncompleteCall; external TapiDll name 'lineUncompleteCall';
function lineUnhold; external TapiDll name 'lineUnhold';
{$IFNDEF TAPI10}
{#BEGIN}
function lineUnpark{$}; external TapiDll name 'lineUnpark{%}';
{#END}
{$ELSE}
function lineUnpark; external TapiDll name 'lineUnpark'
{$IFDEF WIN32}
function lineUnparkA; external TapiDll name 'lineUnparkA'
function lineUnparkW; external TapiDll name 'lineUnparkW'
{$ENDIF}
{$ENDIF}
function phoneClose; external TapiDll name 'phoneClose';
{$IFNDEF TAPI10}
{#BEGIN}
function phoneConfigDialog{$}; external TapiDll name 'phoneConfigDialog{%}';
{#END}
{$ELSE}
function phoneConfigDialog; external TapiDll name 'phoneConfigDialog';
{$IFDEF WIN32}
function phoneConfigDialogA; external TapiDll name 'phoneConfigDialogA';
function phoneConfigDialogW; external TapiDll name 'phoneConfigDialogW';
{$ENDIF}
{$ENDIF}
function phoneDevSpecific; external TapiDll name 'phoneDevSpecific';
{$IFNDEF TAPI10}
{#BEGIN}
function phoneGetButtonInfo{$}; external TapiDll name 'phoneGetButtonInfo{%}';
{#END}
{$ELSE}
function phoneGetButtonInfo; external TapiDll name 'phoneGetButtonInfo';
{$IFDEF WIN32}
function phoneGetButtonInfoA; external TapiDll name 'phoneGetButtonInfoA';
function phoneGetButtonInfoW; external TapiDll name 'phoneGetButtonInfoW';
{$ENDIF}
{$ENDIF}
function phoneGetData; external TapiDll name 'phoneGetData';
{$IFNDEF TAPI10}
{#BEGIN}
function phoneGetDevCaps{$}; external TapiDll name 'phoneGetDevCaps{%}';
{#END}
{$ELSE}
function phoneGetDevCaps; external TapiDll name 'phoneGetDevCaps';
{$IFDEF WIN32}
function phoneGetDevCapsA; external TapiDll name 'phoneGetDevCapsA';
function phoneGetDevCapsW; external TapiDll name 'phoneGetDevCapsW';
{$ENDIF}
{$ENDIF}
function phoneGetDisplay; external TapiDll name 'phoneGetDisplay';
function phoneGetGain; external TapiDll name 'phoneGetGain';
function phoneGetHookSwitch; external TapiDll name 'phoneGetHookSwitch';
{$IFNDEF TAPI10}
{#BEGIN}
function phoneGetIcon{$}; external TapiDll name 'phoneGetIcon{%}';
{#END}
{$ELSE}
function phoneGetIcon; external TapiDll name 'phoneGetIcon';
{$IFDEF WIN32}
function phoneGetIconA; external TapiDll name 'phoneGetIconA';
function phoneGetIconW; external TapiDll name 'phoneGetIconW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function phoneGetID{$}; external TapiDll name 'phoneGetID{%}';
{#END}
{$ELSE}
function phoneGetID; external TapiDll name 'phoneGetID';
{$IFDEF WIN32}
function phoneGetIDA; external TapiDll name 'phoneGetIDA';
function phoneGetIDW; external TapiDll name 'phoneGetIDW';
{$ENDIF}
{$ENDIF}
function phoneGetLamp; external TapiDll name 'phoneGetLamp';
{$IFDEF TAPI20}
function phoneGetMessage; external TapiDll name 'phoneGetMessage';
{$ENDIF}
function phoneGetRing; external TapiDll name 'phoneGetRing';
{$IFNDEF TAPI10}
{#BEGIN}
function phoneGetStatus{$}; external TapiDll name 'phoneGetStatus{%}';
{#END}
{$ELSE}
function phoneGetStatus; external TapiDll name 'phoneGetStatus';
{$IFDEF WIN32}
function phoneGetStatusA; external TapiDll name 'phoneGetStatusA';
function phoneGetStatusW; external TapiDll name 'phoneGetStatusW';
{$ENDIF}
{$ENDIF}
function phoneGetStatusMessages; external TapiDll name 'phoneGetStatusMessages';
function phoneGetVolume; external TapiDll name 'phoneGetVolume';
function phoneInitialize; external TapiDll name 'phoneInitialize';
{$IFDEF TAPI20}
{#BEGIN}
function phoneInitializeEx{$}; external TapiDll name 'phoneInitializeEx{%}';
{#END}
{$ENDIF}
function phoneNegotiateAPIVersion; external TapiDll name 'phoneNegotiateAPIVersion';
function phoneNegotiateExtVersion; external TapiDll name 'phoneNegotiateExtVersion';
function phoneOpen; external TapiDll name 'phoneOpen';
{$IFNDEF TAPI10}
{#BEGIN}
function phoneSetButtonInfo{$}; external TapiDll name 'phoneSetButtonInfo{%}';
{#END}
{$ELSE}
function phoneSetButtonInfo; external TapiDll name 'phoneSetButtonInfo';
{$IFDEF WIN32}
function phoneSetButtonInfoA; external TapiDll name 'phoneSetButtonInfoA';
function phoneSetButtonInfoW; external TapiDll name 'phoneSetButtonInfoW';
{$ENDIF}
{$ENDIF}
function phoneSetData; external TapiDll name 'phoneSetData';
function phoneSetDisplay; external TapiDll name 'phoneSetDisplay';
function phoneSetGain; external TapiDll name 'phoneSetGain';
function phoneSetHookSwitch; external TapiDll name 'phoneSetHookSwitch';
function phoneSetLamp; external TapiDll name 'phoneSetLamp';
function phoneSetRing; external TapiDll name 'phoneSetRing';
function phoneSetStatusMessages; external TapiDll name 'phoneSetStatusMessages';
function phoneSetVolume; external TapiDll name 'phoneSetVolume';
function phoneShutdown; external TapiDll name 'phoneShutdown';
{$IFNDEF TAPI10}
{#BEGIN}
function tapiGetLocationInfo{$}; external TapiDll name 'tapiGetLocationInfo{%}';
{#END}
{$ELSE}
function tapiGetLocationInfo; external TapiDll name 'tapiGetLocationInfo';
{$IFDEF WIN32}
function tapiGetLocationInfoA; external TapiDll name 'tapiGetLocationInfoA';
function tapiGetLocationInfoW; external TapiDll name 'tapiGetLocationInfoW';
{$ENDIF}
{$ENDIF}
function tapiRequestDrop; external TapiDll name 'tapiRequestDrop';
{$IFNDEF TAPI10}
{#BEGIN}
function tapiRequestMakeCall{$}; external TapiDll name 'tapiRequestMakeCall{%}';
{#END}
{$ELSE}
function tapiRequestMakeCall; external TapiDll name 'tapiRequestMakeCall';
{$IFDEF WIN32}
function tapiRequestMakeCallA; external TapiDll name 'tapiRequestMakeCallA';
function tapiRequestMakeCallW; external TapiDll name 'tapiRequestMakeCallW';
{$ENDIF}
{$ENDIF}
{$IFNDEF TAPI10}
{#BEGIN}
function tapiRequestMediaCall{$}; external TapiDll name 'tapiRequestMediaCall{%}';
{#END}
{$ELSE}
function tapiRequestMediaCall; external TapiDll name 'tapiRequestMediaCall';
{$IFDEF WIN32}
function tapiRequestMediaCallA; external TapiDll name 'tapiRequestMediaCallA';
function tapiRequestMediaCallW; external TapiDll name 'tapiRequestMediaCallW';
{$ENDIF}
{$ENDIF}
function TAPIERROR_FORMATMESSAGE(ErrCode: DWORD): Longint;
begin
if ErrCode > $FFFF0000 then
Result := ErrCode and $0000FFFF
else begin
if ErrCode and $10000000 <> 0 then
Result := ErrCode - $90000000 + $0000F000
else
Result := ErrCode - $80000000 + $0000E000;
end;
end;
function TapiErrorFormatMessage(ErrCode: DWORD): Longint;
begin
if ErrCode > $FFFF0000 then
Result := ErrCode and $0000FFFF
else begin
if ErrCode and $10000000 <> 0 then
Result := ErrCode - $90000000 + $0000F000
else
Result := ErrCode - $80000000 + $0000E000;
end;
end;
end.