annotate win32/ole2.d @ 1:4a9dcbd9e54f

-files of 0.13 beta -fixes so that it now compiles with the current dmd version
author marton@basel.hu
date Tue, 05 Apr 2011 20:44:01 +0200
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
1 /***********************************************************************\
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
2 * ole2.d *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
3 * *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
4 * Windows API header module *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
5 * *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
6 * Translated from MinGW Windows headers *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
7 * *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
8 * Placed into public domain *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
9 \***********************************************************************/
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
10 module win32.ole2;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
11 pragma(lib, "ole32.lib");
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
12
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
13 public import win32.basetyps, win32.objbase, win32.oleauto, win32.olectlid,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
14 win32.oleidl, win32.unknwn, win32.winerror, win32.uuid;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
15 private import win32.objfwd, win32.objidl, win32.windef, win32.wtypes;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
16 private import win32.winuser; // for LPMSG
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
17
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
18 const E_DRAW = VIEW_E_DRAW;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
19
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
20 const DATA_E_FORMATETC = DV_E_FORMATETC;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
21
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
22 enum {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
23 OLEIVERB_PRIMARY = 0,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
24 OLEIVERB_SHOW = -1,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
25 OLEIVERB_OPEN = -2,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
26 OLEIVERB_HIDE = -3,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
27 OLEIVERB_UIACTIVATE = -4,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
28 OLEIVERB_INPLACEACTIVATE = -5,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
29 OLEIVERB_DISCARDUNDOSTATE = -6
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
30 }
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
31
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
32 const EMBDHLP_INPROC_HANDLER = 0x0000L;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
33 const EMBDHLP_INPROC_SERVER = 0x0001L;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
34 const EMBDHLP_CREATENOW = 0x00000000L;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
35 const EMBDHLP_DELAYCREATE = 0x00010000L;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
36
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
37 align(8):
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
38 struct OLESTREAM {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
39 LPOLESTREAMVTBL lpstbl;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
40 }
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
41 alias OLESTREAM* LPOLESTREAM;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
42
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
43 extern (Windows) {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
44 struct OLESTREAMVTBL {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
45 DWORD function (LPOLESTREAM, void*, DWORD) Get;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
46 DWORD function (LPOLESTREAM, void*, DWORD) Put;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
47 }
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
48 }
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
49 alias OLESTREAMVTBL* LPOLESTREAMVTBL;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
50
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
51 extern (Windows) {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
52 HRESULT CreateDataAdviseHolder(LPDATAADVISEHOLDER*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
53 DWORD OleBuildVersion();
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
54 HRESULT ReadClassStg(LPSTORAGE, CLSID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
55 HRESULT WriteClassStg(LPSTORAGE, REFCLSID);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
56 HRESULT ReadClassStm(LPSTREAM, CLSID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
57 HRESULT WriteClassStm(LPSTREAM, REFCLSID);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
58 HRESULT WriteFmtUserTypeStg(LPSTORAGE, CLIPFORMAT, LPOLESTR);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
59 HRESULT ReadFmtUserTypeStg(LPSTORAGE, CLIPFORMAT*, LPOLESTR*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
60 HRESULT OleInitialize(PVOID);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
61 void OleUninitialize();
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
62 HRESULT OleQueryLinkFromData(LPDATAOBJECT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
63 HRESULT OleQueryCreateFromData(LPDATAOBJECT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
64 HRESULT OleCreate(REFCLSID, REFIID, DWORD, LPFORMATETC, LPOLECLIENTSITE, LPSTORAGE, PVOID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
65 HRESULT OleCreateFromData(LPDATAOBJECT, REFIID, DWORD, LPFORMATETC, LPOLECLIENTSITE, LPSTORAGE, PVOID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
66 HRESULT OleCreateLinkFromData(LPDATAOBJECT, REFIID, DWORD, LPFORMATETC, LPOLECLIENTSITE, LPSTORAGE, PVOID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
67 HRESULT OleCreateStaticFromData(LPDATAOBJECT, REFIID, DWORD, LPFORMATETC, LPOLECLIENTSITE, LPSTORAGE, PVOID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
68 HRESULT OleCreateLink(LPMONIKER, REFIID, DWORD, LPFORMATETC, LPOLECLIENTSITE, LPSTORAGE, PVOID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
69 HRESULT OleCreateLinkToFile(LPCOLESTR, REFIID, DWORD, LPFORMATETC, LPOLECLIENTSITE, LPSTORAGE, PVOID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
70 HRESULT OleCreateFromFile(REFCLSID, LPCOLESTR, REFIID, DWORD, LPFORMATETC, LPOLECLIENTSITE, LPSTORAGE, PVOID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
71 HRESULT OleLoad(LPSTORAGE, REFIID, LPOLECLIENTSITE, PVOID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
72 HRESULT OleSave(LPPERSISTSTORAGE, LPSTORAGE, BOOL);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
73 HRESULT OleLoadFromStream(LPSTREAM, REFIID, PVOID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
74 HRESULT OleSaveToStream(LPPERSISTSTREAM, LPSTREAM);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
75 HRESULT OleSetContainedObject(LPUNKNOWN, BOOL);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
76 HRESULT OleNoteObjectVisible(LPUNKNOWN, BOOL);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
77 HRESULT RegisterDragDrop(HWND, LPDROPTARGET);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
78 HRESULT RevokeDragDrop(HWND);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
79 HRESULT DoDragDrop(LPDATAOBJECT, LPDROPSOURCE, DWORD, PDWORD);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
80 HRESULT OleSetClipboard(LPDATAOBJECT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
81 HRESULT OleGetClipboard(LPDATAOBJECT*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
82 HRESULT OleFlushClipboard();
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
83 HRESULT OleIsCurrentClipboard(LPDATAOBJECT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
84 HOLEMENU OleCreateMenuDescriptor(HMENU, LPOLEMENUGROUPWIDTHS);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
85 HRESULT OleSetMenuDescriptor(HOLEMENU, HWND, HWND, LPOLEINPLACEFRAME, LPOLEINPLACEACTIVEOBJECT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
86 HRESULT OleDestroyMenuDescriptor(HOLEMENU);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
87 HRESULT OleTranslateAccelerator(LPOLEINPLACEFRAME, LPOLEINPLACEFRAMEINFO, LPMSG);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
88 HANDLE OleDuplicateData(HANDLE, CLIPFORMAT, UINT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
89 HRESULT OleDraw(LPUNKNOWN, DWORD, HDC, LPCRECT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
90 HRESULT OleRun(LPUNKNOWN);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
91 BOOL OleIsRunning(LPOLEOBJECT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
92 HRESULT OleLockRunning(LPUNKNOWN, BOOL, BOOL);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
93 void ReleaseStgMedium(LPSTGMEDIUM);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
94 HRESULT CreateOleAdviseHolder(LPOLEADVISEHOLDER*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
95 HRESULT OleCreateDefaultHandler(REFCLSID, LPUNKNOWN, REFIID, PVOID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
96 HRESULT OleCreateEmbeddingHelper(REFCLSID, LPUNKNOWN, DWORD, LPCLASSFACTORY, REFIID, PVOID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
97 BOOL IsAccelerator(HACCEL, int, LPMSG, WORD*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
98 HGLOBAL OleGetIconOfFile(LPOLESTR, BOOL);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
99 HGLOBAL OleGetIconOfClass(REFCLSID, LPOLESTR, BOOL);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
100 HGLOBAL OleMetafilePictFromIconAndLabel(HICON, LPOLESTR, LPOLESTR, UINT);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
101 HRESULT OleRegGetUserType(REFCLSID, DWORD, LPOLESTR*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
102 HRESULT OleRegGetMiscStatus(REFCLSID, DWORD, DWORD*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
103 HRESULT OleRegEnumFormatEtc (REFCLSID, DWORD, LPENUMFORMATETC*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
104 HRESULT OleRegEnumVerbs (REFCLSID, LPENUMOLEVERB*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
105 HRESULT OleConvertOLESTREAMToIStorage(LPOLESTREAM, LPSTORAGE, DVTARGETDEVICE*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
106 HRESULT OleConvertIStorageToOLESTREAM(LPSTORAGE, LPOLESTREAM);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
107 HRESULT GetHGlobalFromILockBytes(LPLOCKBYTES, HGLOBAL*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
108 HRESULT CreateILockBytesOnHGlobal(HGLOBAL, BOOL, LPLOCKBYTES*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
109 HRESULT GetHGlobalFromStream(LPSTREAM, HGLOBAL*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
110 HRESULT CreateStreamOnHGlobal(HGLOBAL, BOOL, LPSTREAM*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
111 HRESULT OleDoAutoConvert(LPSTORAGE, LPCLSID);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
112 HRESULT OleGetAutoConvert(REFCLSID, LPCLSID);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
113 HRESULT OleSetAutoConvert(REFCLSID, REFCLSID);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
114 HRESULT GetConvertStg(LPSTORAGE);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
115 HRESULT SetConvertStg(LPSTORAGE, BOOL);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
116 HRESULT OleConvertIStorageToOLESTREAMEx(LPSTORAGE, CLIPFORMAT, LONG, LONG, DWORD, LPSTGMEDIUM, LPOLESTREAM);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
117 HRESULT OleConvertOLESTREAMToIStorageEx(LPOLESTREAM, LPSTORAGE, CLIPFORMAT*, LONG*, LONG*, DWORD*, LPSTGMEDIUM);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
118 }