source: branch/egtra-gdiplus/ole2.ab@ 569

Last change on this file since 569 was 223, checked in by イグトランス (egtra), 18 years ago

Controlがコンパイルできるように修正

File size: 18.0 KB
Line 
1#ifndef __OLE2_AB__
2#define __OLE2_AB__
3
4TypeDef CLIPFORMAT = Word
5
6' 暫定措置
7
8Interface IPersistStorage
9 Inherits IUnknown
10End Interface
11
12Interface IDropTarget
13 Inherits IUnknown
14End Interface
15
16Interface IDropSource
17 Inherits IUnknown
18End Interface
19
20Interface IOleInPlaceFrame
21 Inherits IUnknown
22End Interface
23
24Interface IOleInPlaceActiveObject
25 Inherits IUnknown
26End Interface
27
28Interface IOleAdviseHolder
29 Inherits IUnknown
30End Interface
31
32Interface IEnumOLEVERB
33 Inherits IUnknown
34End Interface
35
36#require <api_winerror.sbp>
37
38#require <objbase.sbp>
39#require <oleauto.ab>
40
41' View OBJECT Error Codes
42
43Const E_DRAW = VIEW_E_DRAW
44
45' IDataObject Error Codes
46Const DATA_E_FORMATETC = DV_E_FORMATETC
47
48' Common stuff gleamed from OLE.2,
49
50/* verbs */
51Const OLEIVERB_PRIMARY = (0)
52Const OLEIVERB_SHOW = (-1)
53Const OLEIVERB_OPEN = (-2)
54Const OLEIVERB_HIDE = (-3)
55Const OLEIVERB_UIACTIVATE = (-4)
56Const OLEIVERB_INPLACEACTIVATE = (-5)
57Const OLEIVERB_DISCARDUNDOSTATE = (-6)
58
59' for OleCreateEmbeddingHelper flags; roles in low word; options in high word
60Const EMBDHLP_INPROC_HANDLER = &h0000
61Const EMBDHLP_INPROC_SERVER = &h0001
62Const EMBDHLP_CREATENOW = &h00000000
63Const EMBDHLP_DELAYCREATE = &h00010000
64
65/* extended create function flags */
66Const OLECREATE_LEAVERUNNING = &h00000001
67
68/* pull in the MIDL generated header */
69
70#require <oleidl.ab>
71
72/****** DV APIs ***********************************************************/
73
74/*
75#if !defined(ISOLATION_AWARE_ENABLED) \
76 || !ISOLATION_AWARE_ENABLED \
77 || !defined(_OBJBASE_H_) \
78 || !defined(CreateDataAdviseHolder)
79WINOLEAPI CreateDataAdviseHolder(OUT LPDATAADVISEHOLDER FAR* ppDAHolder);
80#endif
81*/
82
83/****** OLE API Prototypes ************************************************/
84
85Declare Function OleBuildVersion Lib "ole32.dll" () As DWord
86
87/* helper functions */
88Declare Function ReadClassStg Lib "ole32.dll" (/*IN*/ ByVal pStg As *IStorage, /*OUT*/ ByRef clsid As CLSID) As HRESULT
89Declare Function WriteClassStg Lib "ole32.dll" (/*IN*/ ByVal pStg As *IStorage, /*IN*/ ByRef clsid As CLSID) As HRESULT
90Declare Function ReadClassStm Lib "ole32.dll" (/*IN*/ ByVal pStm As *IStream, /*OUT*/ ByRef clsid As CLSID) As HRESULT
91Declare Function WriteClassStm Lib "ole32.dll" (/*IN*/ ByVal pStm As *IStream, /*IN*/ ByRef clsid As CLSID) As HRESULT
92Declare Function WriteFmtUserTypeStg Lib "ole32.dll" (/*IN*/ ByVal pstg As *IStorage, /*IN*/ ByVal cf As CLIPFORMAT, /*IN*/ ByVal pszUserType As *OLECHAR) As HRESULT
93Declare Function ReadFmtUserTypeStg Lib "ole32.dll" (/*IN*/ ByVal pstg As *IStorage, /*OUT*/ ByRef cf As CLIPFORMAT, /*OUT*/ ByRef rpszUserType As *OLECHAR) As HRESULT
94
95
96/* init/term */
97
98Declare Function OleInitialize Lib "ole32" (pvReserved As VoidPtr) As HRESULT
99Declare Sub OleUninitialize Lib "ole32" ()
100
101
102/* APIs to query whether (Embedded/Linked) object can be created from
103 the data object */
104
105Declare Function OleQueryLinkFromData Lib "ole32" (/*IN*/ ByVal pSrcDataObject As *IDataObject) As HRESULT
106Declare Function OleQueryCreateFromData Lib "ole32.dll" (/*IN*/ ByVal pSrcDataObject As *IDataObject) As HRESULT
107
108
109/* Object creation APIs */
110
111Declare Function OleCreate Lib "ole32.dll" (/*IN*/ ByRef rclsid As CLSID, /*IN*/ ByRef riid As IID, /*IN*/ ByVal renderopt As DWord, _
112 /*IN*/ ByVal pFormatEtc As *FORMATETC, /*IN*/ ByVal pClientSite As *IOleClientSite, _
113 /*IN*/ ByVal pStg As *IStorage, /*OUT*/ ByRef ppvObj As Any) As HRESULT
114
115Declare Function OleCreateEx Lib "ole32.dll" (/*IN*/ ByRef rclsid As CLSID, /*IN*/ ByRef riid As IID, /*IN*/ ByVal dwFlags As DWord,
116 /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal cFormats As DWord, /*IN*/ ByVal rgAdvf As *DWord,
117 /*IN*/ ByVal rgFormatEtc As *FORMATETC, /*IN*/ ByVal pAdviseSink As *IAdviseSink,
118 /*OUT*/ ByVal rgdwConnection As *DWord, /*IN*/ ByVal pClientSite As *IOleClientSite,
119 /*IN*/ ByVal pStg As *IStorage, /*OUT*/ ByRef ppvObj As Any) As HRESULT
120
121Declare Function OleCreateFromData Lib "ole32.dll" (/*IN*/ ByVal pSrcDataObj As *IDataObject, /*IN*/ ByRef riid As IID,
122 /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal pFormatEtc As *FORMATETC,
123 /*IN*/ ByVal pClientSite As *IOleClientSite, /*IN*/ ByVal pStg As *IStorage,
124 /*OUT*/ ByRef ppvObj As Any) As HRESULT
125
126Declare Function OleCreateFromDataEx Lib "ole32.dll" (/*IN*/ ByVal pSrcDataObj As *IDataObject, /*IN*/ ByRef riid As IID,
127 /*IN*/ ByVal dwFlags As DWord, /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal cFormats As DWord, /*IN*/ ByVal rgAdvf As *DWord,
128 /*IN*/ ByVal rgFormatEtc As *FORMATETC, /*IN*/ ByVal pAdviseSink As *IAdviseSink,
129 /*OUT*/ ByVal rgdwConnection As *DWord, /*IN*/ ByVal pClientSite As *IOleClientSite,
130 /*IN*/ ByVal pStg As *IStorage, /*OUT*/ ByRef ppvObj As Any) As HRESULT
131
132Declare Function OleCreateLinkFromData Lib "ole32.dll" (/*IN*/ ByVal pSrcDataObj As *IDataObject, /*IN*/ ByRef riid As IID,
133 /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal pFormatEtc As *FORMATETC,
134 /*IN*/ ByVal pClientSite As *IOleClientSite, /*IN*/ ByVal pStg As *IStorage,
135 /*OUT*/ ByRef ppvObj As Any) As HRESULT
136
137Declare Function OleCreateLinkFromDataEx Lib "ole32.dll" (/*IN*/ ByVal pSrcDataObj As *IDataObject, /*IN*/ ByRef riid As IID,
138 /*IN*/ ByVal dwFlags As DWord, /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal cFormats As DWord, /*IN*/ ByVal rgAdvf As *DWord,
139 /*IN*/ ByVal rgFormatEtc As *FORMATETC, /*IN*/ ByVal pAdviseSink As *IAdviseSink,
140 /*OUT IN*/ ByVal rgdwConnection As *DWord, /*IN*/ ByVal pClientSite As *IOleClientSite,
141 /*IN*/ ByVal pStg As *IStorage, /*OUT*/ ByRef ppvObj As Any) As HRESULT
142
143Declare Function OleCreateStaticFromData Lib "ole32.dll" (/*IN*/ ByVal pSrcDataObj As *IDataObject, /*IN*/ ByRef riid As IID,
144 /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal pFormatEtc As *FORMATETC,
145 /*IN*/ ByVal pClientSite As *IOleClientSite, /*IN*/ ByVal pStg As *IStorage,
146 /*OUT*/ ByRef ppvObj As Any) As HRESULT
147
148
149Declare Function OleCreateLink Lib "ole32.dll" (/*IN*/ ByVal pmkLinkSrc As *IMoniker, /*IN*/ ByRef riid As IID,
150 /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal pFormatEtc As *FORMATETC,
151 /*IN*/ ByVal pClientSite As *IOleClientSite, /*IN*/ ByVal pDataObj As *IDataObject, /*OUT*/ ByRef ppvObj As Any) As HRESULT
152
153Declare Function OleCreateLinkEx Lib "ole32.dll" (/*IN*/ ByVal pmkLinkSrc As *IMoniker, /*IN*/ ByRef riid As IID,
154 /*IN*/ ByVal dwFlags As DWord, /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal cFormats As DWord, /*IN*/ ByVal rgAdvf As *DWord,
155 /*IN*/ ByVal rgFormatEtc As *FORMATETC, /*IN*/ ByVal pAdviseSink As *IAdviseSink,
156 /*OUT*/ ByVal rgdwConnection As *DWord, /*IN*/ ByVal pClientSite As *IOleClientSite,
157 /*IN*/ ByVal pDataObj As *IDataObject, /*OUT*/ ByRef ppvObj As Any) As HRESULT
158
159Declare Function OleCreateLinkToFile Lib "ole32.dll" (/*IN*/ ByVal lpszFileName As LPCOLESTR, /*IN*/ ByRef riid As IID,
160 /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal pFormatEtc As *FORMATETC,
161 /*IN*/ ByVal pClientSite As *IOleClientSite, /*IN*/ ByVal pDataObj As *IDataObject, /*OUT*/ ByRef ppvObj As Any) As HRESULT
162
163Declare Function OleCreateLinkToFileEx Lib "ole32.dll" (/*IN*/ ByVal lpszFileName As LPCOLESTR, /*IN*/ ByRef riid As IID,
164 /*IN*/ ByVal dwFlags As DWord, /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal cFormats As DWord, /*IN*/ ByVal rgAdvf As *DWord,
165 /*IN*/ ByVal rgFormatEtc As *FORMATETC, /*IN*/ ByVal pAdviseSink As *IAdviseSink,
166 /*OUT*/ ByVal rgdwConnection As *DWord, /*IN*/ ByVal pClientSite As *IOleClientSite,
167 /*IN*/ ByVal pDataObj As *IDataObject, /*OUT*/ ByRef ppvObj As Any) As HRESULT
168
169Declare Function OleCreateFromFile Lib "ole32.dll" (/*IN*/ ByRef rclsid As CLSID, /*IN*/ ByVal lpszFileName As LPOLESTR, /*IN*/ ByRef riid As IID,
170 /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal pFormatEtc As *FORMATETC,
171 /*IN*/ ByVal pClientSite As *IOleClientSite, /*IN*/ ByVal pDataObj As *IDataObject, /*OUT*/ ByRef ppvObj As Any) As HRESULT
172
173Declare Function OleCreateFromFileEx Lib "ole32.dll" (/*IN*/ ByRef rclsid As CLSID, /*IN*/ ByVal lpszFileName As LPOLESTR, /*IN*/ ByRef riid As IID,
174 /*IN*/ ByVal dwFlags As DWord, /*IN*/ ByVal renderopt As DWord, /*IN*/ ByVal cFormats As DWord, /*IN*/ ByVal rgAdvf As *DWord,
175 /*IN*/ ByVal rgFormatEtc As *FORMATETC, /*IN*/ ByVal pAdviseSink As *IAdviseSink,
176 /*OUT*/ ByVal rgdwConnection As *DWord, /*IN*/ ByVal pClientSite As *IOleClientSite,
177 /*IN*/ ByVal pDataObj As *IDataObject, /*OUT*/ ByRef ppvObj As Any) As HRESULT
178
179Declare Function OleLoad Lib "ole32.dll" (/*IN*/ ByVal pStg As *IStorage, /*IN*/ ByRef riid As IID, /*IN*/ ByVal pClientSite As *IOleClientSite,
180 /*OUT*/ ByRef ppvObj As Any) As HRESULT
181
182Declare Function OleSave Lib "ole32.dll" (/*IN*/ ByVal pPS As *IPersistStorage, /*IN*/ ByVal pStg As *IStorage, /*IN*/ fSameAsLoad As BOOL) As HRESULT
183
184Declare Function OleLoadFromStream Lib "ole32.dll" ( /*IN*/ ByVal pStm As *IStream, /*IN*/ ByRef iidInterface As IID, /*OUT*/ ByRef ppvObj As Any) As HRESULT
185Declare Function OleSaveToStream Lib "ole32.dll" ( /*IN*/ ByVal pPStm As *IPersistStream, /*IN*/ ByVal pStm As *IStream) As HRESULT
186
187
188Declare Function OleSetContainedObject Lib "ole32.dll" (/*IN*/ ByVal pUnknown As *IUnknown, /*IN*/ ByVal fContained As BOOL) As HRESULT
189Declare Function OleNoteObjectVisible Lib "ole32.dll" (/*IN*/ ByVal pUnknown As *IUnknown, /*IN*/ ByVal fContained As BOOL) As HRESULT
190
191
192/* Drag/Drop APIs */
193
194Declare Function RegisterDragDrop Lib "ole32.dll" (/*IN*/ ByVal hwnd As HWND, /*IN*/ ByVal pDropTarget As *IDropTarget) As HRESULT
195Declare Function RevokeDragDrop Lib "ole32.dll" (/*IN*/ ByVal hwnd As HWND) As HRESULT
196Declare Function DoDragDrop Lib "ole32.dll" (/*IN*/ ByVal pDataObj As *IDataObject, /*IN*/ ByVal pDropSource As *IDropSource,
197 /*IN*/ ByVal dwOKEffects As DWord, /*OUT*/ ByRef dwEffect As DWord) As HRESULT
198
199/* Clipboard APIs */
200
201Declare Function OleSetClipboard Lib "ole32.dll" (/*IN*/ ByVal pDataObj As *IDataObject) As HRESULT
202Declare Function OleGetClipboard Lib "ole32.dll" (/*OUT*/ ByRef pDataObj As *IDataObject) As HRESULT
203Declare Function OleFlushClipboard Lib "ole32.dll" () As HRESULT
204Declare Function OleIsCurrentClipboard Lib "ole32.dll" (/*IN*/ ByVal pDataObj As *IDataObject) As HRESULT
205
206
207/* InPlace Editing APIs */
208
209TypeDef HOLEMENU = HGLOBAL ' oleidl.h
210Type OLEMENUGROUPWIDTHS ' oleidl.h
211 width[ELM(6)] As Long
212End Type
213Type OLEINPLACEFRAMEINFO ' oleidl.h
214 cb As DWord
215 fMDIApp As BOOL
216 hwndFrame As HWND
217 haccel As HACCEL
218 cAccelEntries As DWord
219End Type
220Declare Function OleCreateMenuDescriptor Lib "ole32.dll" (/*IN*/ ByVal hmenuCombined As HMENU,
221 /*IN*/ ByRef MenuWidths As OLEMENUGROUPWIDTHS) As HOLEMENU
222Declare Function OleSetMenuDescriptor Lib "ole32.dll" (/*IN*/ ByVal holemenu As HOLEMENU, /*IN*/ ByVal hwndFrame As HWND,
223 /*IN*/ ByVal hwndActiveObject As HWND,
224 /*IN*/ ByVal pFrame As *IOleInPlaceFrame,
225 /*IN*/ ByVal pActiveObj As *IOleInPlaceActiveObject) As HRESULT
226Declare Function OleDestroyMenuDescriptor Lib "ole32.dll" (/*IN*/ ByVal holemenu As HOLEMENU) As HRESULT
227
228Declare Function OleTranslateAccelerator Lib "ole32.dll" (/*IN*/ ByVal pFrame As *IOleInPlaceFrame,
229 /*IN*/ ByRef FrameInfo As OLEINPLACEFRAMEINFO, /*IN*/ ByRef msg As MSG) As HRESULT
230
231
232/* Helper APIs */
233Declare Function OleDuplicateData Lib "ole32.dll" (/*IN*/ ByVal hSrc As HANDLE, /*IN*/ ByVal cfFormat As CLIPFORMAT,
234 /*IN*/ ByVal uiFlags As DWord) As HANDLE
235
236Declare Function OleDraw Lib "ole32.dll" (/*IN*/ ByVal pUnknown As *IUnknown, /*IN*/ ByVal dwAspect As DWord, /*IN*/ ByVal hdcDraw As HDC,
237 /*IN*/ ByRef rcBounds As RECT) As HRESULT
238
239Declare Function OleRun Lib "ole32.dll" (/*IN*/ ByVal pUnknown As *IUnknown) As HRESULT
240Declare Function OleIsRunning Lib "ole32.dll" (/*IN*/ ByVal pObject As *IOleObject) As BOOL
241Declare Function OleLockRunning Lib "ole32.dll" (/*IN*/ ByVal pUnknown As *IUnknown, /*IN*/ ByVal fLock As BOOL, /*IN*/ ByVal fLastUnlockCloses As BOOL) As HRESULT
242Declare Sub ReleaseStgMedium Lib "ole32.dll" (/*IN*/ ByRef medium As STGMEDIUM)
243Declare Function CreateOleAdviseHolder Lib "ole32.dll" (/*OUT*/ ByRef pOAHolder As *IOleAdviseHolder) As HRESULT
244
245Declare Function OleCreateDefaultHandler Lib "ole32.dll" (/*IN*/ ByRef clsid As CLSID, /*IN*/ ByVal pUnkOuter As *IUnknown,
246 /*IN*/ ByRef riid As IID, /*OUT*/ ByRef pObj As Any) As HRESULT
247
248Declare Function OleCreateEmbeddingHelper Lib "ole32.dll" (/*IN*/ ByRef clsid As CLSID, /*IN*/ ByVal pUnkOuter As *IUnknown,
249 /*IN*/ ByVal flags As DWord, /*IN*/ ByVal pCF As *IClassFactory,
250 /*IN*/ ByRef riid As IID, /*OUT*/ ByRef pObj As Any) As HRESULT
251
252Declare Function IsAccelerator Lib "ole32.dll" (/*IN*/ ByVal hAccel As HACCEL, /*IN*/ ByVal cAccelEntries As Long, /*IN*/ ByRef msg As MSG,
253 /*OUT*/ ByVal pwCmd As *Word) As BOOL
254/* Icon extraction Helper APIs */
255
256Declare Function OleGetIconOfFile Lib "ole32.dll" (/*IN*/ ByVal lpszPath As LPOLESTR, /*IN*/ ByVal fUseFileAsLabel As BOOL) As HGLOBAL
257
258Declare Function OleGetIconOfClass Lib "ole32.dll" (/*IN*/ ByRef rclsid As CLSID, /*IN*/ ByVal lpszLabel As LPOLESTR,
259 /*IN*/ ByVal fUseTypeAsLabel As BOOL) As HGLOBAL
260
261Declare Function OleMetafilePictFromIconAndLabel Lib "ole32.dll" (/*IN*/ ByVal hIcon As HICON, /*IN*/ ByVal lpszLabel As LPOLESTR,
262 /*IN*/ ByVal lpszSourceFile As LPOLESTR, /*IN*/ ByVal iIconIndex As DWord) As HGLOBAL
263
264
265
266/* Registration Database Helper APIs */
267
268Declare Function OleRegGetUserType Lib "ole32.dll" (/*IN*/ ByRef rclsid As CLSID, /*IN*/ ByVal dwFormOfType As DWord,
269 /*OUT*/ ByVal pszUserType As LPOLESTR) As HRESULT
270
271Declare Function OleRegGetMiscStatus Lib "ole32.dll" (/*IN*/ ByRef rclsid As CLSID, /*IN*/ ByVal dwAspect As DWord,
272 /*OUT*/ ByRef dwStatus As DWord) As HRESULT
273
274Declare Function OleRegEnumFormatEtc Lib "ole32.dll" (/*IN*/ ByRef rclsid As CLSID, /*IN*/ ByVal dwDirection As DWord,
275 /*OUT*/ ByRef penum As *IEnumFORMATETC) As HRESULT
276
277Declare Function OleRegEnumVerbs Lib "ole32.dll" (/*IN*/ ByRef rclsid As CLSID, /*OUT*/ ByRef penum As *IEnumOLEVERB) As HRESULT
278
279/* OLE 1.0 conversion APIS */
280
281/***** OLE 1.0 OLESTREAM declarations *************************************/
282
283
284Interface OleStream
285 Function Get(p As VoidPtr, dw As DWord) As DWord
286 Function Put(p As VoidPtr, dw As DWord) As DWord
287End Interface
288TypeDef LPOLESTREAM = *OleStream
289
290
291Declare Function OleConvertOLESTREAMToIStorage Lib "ole32.dll" ( _
292 /*IN*/ ByVal lpolestream As LPOLESTREAM,
293 /*OUT*/ ByVal pstg As *IStorage,
294 /*IN*/ ByRef td As DVTARGETDEVICE) As HRESULT
295
296Declare Function OleConvertIStorageToOLESTREAM Lib "ole32.dll" ( _
297 /*IN*/ ByVal pstg As *IStorage,
298 /*OUT*/ ByVal lpolestream As LPOLESTREAM) As HRESULT
299
300
301/* Storage Utility APIs */
302Declare Function GetHGlobalFromILockBytes Lib "ole32.dll" (/*IN*/ ByVal plkbyt As *ILockBytes, /*OUT*/ ByRef hglobal As HGLOBAL) As HRESULT
303Declare Function CreateILockBytesOnHGlobal Lib "ole32.dll" (/*IN*/ ByVal hGlobal As HGLOBAL, /*IN*/ ByVal fDeleteOnRelease As BOOL,
304 /*OUT*/ ByRef pplkbyt As *ILockBytes) As HRESULT
305
306Declare Function GetHGlobalFromStream Lib "ole32.dll" (/*IN*/ ByVal pstm As *IStream, /*OUT*/ ByRef hglobal As HGLOBAL) As HRESULT
307Declare Function CreateStreamOnHGlobal Lib "ole32.dll" (/*IN*/ ByVal hGlobal As HGLOBAL, /*IN*/ ByVal fDeleteOnRelease As BOOL,
308 /*OUT*/ ByRef pstm As *IStream) As HRESULT
309
310
311/* ConvertTo APIS */
312
313Declare Function OleDoAutoConvert Lib "ole32.dll" (/*IN*/ ByRef pStg As *IStorage, /*OUT*/ ByRef ClsidNew As CLSID) As HRESULT
314Declare Function OleGetAutoConvert Lib "ole32.dll" (/*IN*/ ByRef clsidOld As CLSID, /*OUT*/ ByRef ClsidNew As CLSID) As HRESULT
315Declare Function OleSetAutoConvert Lib "ole32.dll" (/*IN*/ ByRef clsidOld As CLSID, /*IN*/ ByRef ClsidNew As CLSID) As HRESULT
316Declare Function GetConvertStg Lib "ole32.dll" (/*IN*/ ByVal pStg As *IStorage) As HRESULT
317Declare Function SetConvertStg Lib "ole32.dll" (/*IN*/ ByVal pStg As *IStorage, /*IN*/ fConvert As BOOL) As HRESULT
318
319
320Declare Function OleConvertIStorageToOLESTREAMEx Lib "ole32.dll" ( _
321 /*IN*/ ByVal pstg As *IStorage, ' Presentation data to OLESTREAM
322 /*IN*/ ByVal cfFormat As CLIPFORMAT, ' format
323 /*IN*/ ByVal lWidth As Long, ' width
324 /*IN*/ ByVal lHeight As Long, ' height
325 /*IN*/ ByVal dwSize As DWORD, ' size in bytes
326 /*IN*/ ByRef medium As STGMEDIUM, ' bits
327 /*OUT*/ ByVal polestm As LPOLESTREAM) As HRESULT
328
329Declare Function OleConvertOLESTREAMToIStorageEx Lib "ole32.dll" ( _
330 /*IN*/ ByVal polestm As LPOLESTREAM,
331 /*OUT*/ ByVal pstg As *IStorage,' Presentation data from OLESTREAM
332 /*OUT*/ ByRef pcfFormat As CLIPFORMAT, ' format
333 /*OUT*/ ByRef plwWidth As Long, ' width
334 /*OUT*/ ByRef plHeight As Long, ' height
335 /*OUT*/ ByRef pdwSize As DWord, ' size in bytes
336 /*OUT*/ ByRef medium As STGMEDIUM) As HRESULT ' bits
337
338' olectl.h
339Declare Function OleLoadPicture Lib "olepro32" (pStream As *IStream, lSize As Long, fRunmode As BOOL, ByRef riid As IID, ppvObj As VoidPtr) As HRESULT
340
341#endif ' __OLE2_AB__
Note: See TracBrowser for help on using the repository browser.