' ########################################################################################
' Microsoft Windows
' File: DocObjectService.inc
' Copyright (c) 2011 Jos? Roca
' Portions Copyright (c) Microsoft Corporation.
' All Rights Reserved.
' THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER
' EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF
' MERCHANTABILITY AND/OR FITNESS FOR A PARTICULAR PURPOSE.
' ########################################################################################
#IF NOT %DEF(PBX_DocObjectService_PBI)
#DEFINE PBX_DocObjectService_PBI
%EQUATE `DOCOBJECTSERVICE_INC = 1
'/* header files for imported files */
#INCLUDE ONCE "Legacy/COM/ObjIdl.inc"
#INCLUDE ONCE "Legacy/System/MSHTML.inc"
' ########################################################################################
' Interface name = IDocObjectService
' IID = 3050F801-98B5-11CF-BB82-00AA00BDCE0B
' Inherited interface = IUnknown
' ########################################################################################
#IF NOT %DEF(%IDocObjectService_INTERFACE_DEFINED)
 %IDocObjectService_INTERFACE_DEFINED = 1
$IID_IDocObjectService = GUID$("{3050F801-98B5-11CF-BB82-00AA00BDCE0B}")
INTERFACE IDocObjectService $IID_IDocObjectService
 INHERIT IUnknown
 ' =====================================================================================
 METHOD FireBeforeNavigate2 ( ' VTable offset = 12
 BYVAL pDispatch AS IDispatch
 , BYREF lpszUrl AS WSTRINGZ
 , BYVAL dwFlags AS DWORD
 , BYREF lpszFrameName AS WSTRINGZ
 , BYVAL pPostData AS BYTE PTR
 , BYVAL cbPostData AS DWORD
 , BYREF lpszHeaders AS WSTRINGZ
 , BYVAL fPlayNavSound AS LONG
 , BYREF pfCancel AS LONG
 ) AS LONG
 ' =====================================================================================
 METHOD FireNavigateComplete2 ( ' VTable offset = 16
 BYVAL pHTMLWindow2 AS IHTMLWindow2
 , BYVAL dwFlags AS DWORD
 ) AS LONG
 ' =====================================================================================
 METHOD FireDownloadBegin ( ' VTable offset = 20
 ) AS LONG
 ' =====================================================================================
 METHOD FireDownloadComplete ( ' VTable offset = 24
 ) AS LONG
 ' =====================================================================================
 METHOD FireDocumentComplete ( ' VTable offset = 28
 BYVAL pHTMLWindow AS IHTMLWindow2
 , BYVAL dwFlags AS DWORD
 ) AS LONG
 ' =====================================================================================
 METHOD UpdateDesktopComponent ( ' VTable offset = 32
 BYVAL pHTMLWindow AS IHTMLWindow2
 ) AS LONG
 ' =====================================================================================
 METHOD GetPendingUrl ( ' VTable offset = 36
 BYREF pbstrPendingUrl AS WSTRING
 ) AS LONG
 ' =====================================================================================
 METHOD ActiveElementChanged ( ' VTable offset = 40
 BYVAL pHTMLElement AS IHTMLElement
 ) AS LONG
 ' =====================================================================================
 METHOD GetUrlSearchComponent ( ' VTable offset = 44
 BYREF pbstrSearch AS WSTRING
 ) AS LONG
 ' =====================================================================================
 METHOD IsErrorUrl ( ' VTable offset = 48
 BYREF lpszUrlAS AS WSTRINGZ
 , BYREF pfIsError AS LONG
 ) AS LONG
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __IDocObjectService_INTERFACE_DEFINED__ */
#ENDIF
