source: trunk/ab5.0/ablib/src/unknwn.sbp @ 560

Last change on this file since 560 was 497, checked in by イグトランス (egtra), 15 years ago

インクルードガードとその他不要な前処理定義などの削除

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