source: branch/egtra-gdiplus/unknwn.sbp@ 646

Last change on this file since 646 was 1, checked in by (none), 18 years ago
File size: 1.3 KB
Line 
1' unknwn.sbp
2' 本来はunknwn.idlから生成するのが正当ですが、これは手動で移植したものです。
3
4#ifndef _INC_UNKNWN
5#define _INC_UNKNWN
6
7'-------------------
8' Unknown Interface
9'-------------------
10
11Dim IID_IUnknown = [&H00000000, &H0000, &H0000, [&HC0, &H00, &H00, &H00, &H00, &H00, &H00, &H46]] As IID
12
13Interface IUnknown
14 Function QueryInterface(ByRef riid As IID, ByRef pvObj As Any) As HRESULT
15 Function AddRef() As DWord
16 Function Release() As DWord
17End Interface
18TypeDef LPUNKNOWN = *IUnknown
19
20Dim IID_AsyncIUnknown = [&H000e0000, &H0000, &H0000, [&HC0, &H00, &H00, &H00, &H00, &H00, &H00, &H46]] As IID
21Interface AsyncIUnknown
22 Inherits IUnknown
23
24 Function Begin_QueryInterface(
25 /* [in] */ ByRef riid As IID) As HRESULT
26 Function Finish_QueryInterface(
27 /* [out] */ ByRef ppvObject As Any) As HRESULT
28 Function Begin_AddRef() As HRESULT
29 Function Finish_AddRef() As DWord
30 Function Begin_Release() As HRESULT
31 Function Finish_Release() As DWord
32End Interface
33
34Dim IID_IClassFactory = [&H00000000, &H0000, &H0000, [&HC0, &H00, &H00, &H00, &H00, &H00, &H00, &H46]] As IID
35Interface IClassFactory
36 Inherits IUnknown
37
38 Function CreateInstance(ByVal pUnkOuter As *IUnknown, ByRef riid As IID, ByRef ppvObject As Any) As HRESULT
39 Function LockServer(ByVal fLock As BOOL) As HRESULT
40End Interface
41
42#endif '_INC_UNKNWN
Note: See TracBrowser for help on using the repository browser.