' ########################################################################################
' Microsoft Windows
' File: MimeInfo.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_MimeInfo_PBI)
#DEFINE PBX_MimeInfo_PBI
%EQUATE `MIMEINFO_INC = 1
#INCLUDE ONCE "Legacy/COM/Ole2.inc"
#IF NOT %DEF(%IMimeInfo_INTERFACE_DEFINED)
 %IMimeInfo_INTERFACE_DEFINED = 1
' ########################################################################################
' Interface name = IMimeInfo
' IID = F77459A0-BF9A-11cf-BA4E-00C04FD70816
' Inherited interface = IUnknown
' ########################################################################################
$IID_IMimeInfo = GUID$("{F77459A0-BF9A-11cf-BA4E-00C04FD70816}")
$SID_IMimeInfo = GUID$("{F77459A0-BF9A-11cf-BA4E-00C04FD70816}")
INTERFACE IMimeInfo $IID_IMimeInfo
 INHERIT IUnknown
 ' =====================================================================================
 METHOD GetMimeCLSIDMapping ( ' VTable offset = 12
 BYREF pcTypes AS DWORD
 , BYREF ppszTypes AS ASCIIZ
 , BYREF ppclsID AS GUID
 ) AS LONG
 ' =====================================================================================
END INTERFACE
#ENDIF ' /* __IMimeInfo_INTERFACE_DEFINED__ */
#ENDIF
