annotate win32/comcat.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 * comcat.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 * by Stewart Gordon *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
8 * *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
9 * Placed into public domain *
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
10 \***********************************************************************/
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
11 module win32.comcat;
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 import win32.windows, win32.ole2;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
14 private import win32.basetyps, win32.cguid, win32.objbase, win32.unknwn,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
15 win32.windef, win32.wtypes;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
16
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
17 alias IEnumGUID* LPENUMGUID;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
18
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
19 interface IEnumGUID : IUnknown {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
20 HRESULT Next(ULONG, GUID*, ULONG*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
21 HRESULT Skip(ULONG);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
22 HRESULT Reset();
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
23 HRESULT Clone(LPENUMGUID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
24 }
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
25
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
26 alias GUID CATID;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
27 alias REFGUID REFCATID;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
28 alias GUID_NULL CATID_NULL;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
29 alias IsEqualGUID IsEqualCATID;
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 struct CATEGORYINFO {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
32 CATID catid;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
33 LCID lcid;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
34 OLECHAR[128] szDescription;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
35 }
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
36 alias CATEGORYINFO* LPCATEGORYINFO;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
37
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
38 alias IEnumGUID IEnumCATID;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
39 alias LPENUMGUID LPENUMCATID;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
40 alias IID_IEnumGUID IID_IEnumCATID;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
41
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
42 alias IEnumGUID IEnumCLSID;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
43 alias LPENUMGUID LPENUMCLSID;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
44 alias IID_IEnumGUID IID_IEnumCLSID;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
45
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
46 interface ICatInformation : IUnknown {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
47 HRESULT EnumCategories(LCID, LPENUMCATEGORYINFO*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
48 HRESULT GetCategoryDesc(REFCATID, LCID, PWCHAR*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
49 HRESULT EnumClassesOfCategories(ULONG, CATID*, ULONG, CATID*,
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
50 LPENUMCLSID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
51 HRESULT IsClassOfCategories(REFCLSID, ULONG, CATID*, ULONG, CATID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
52 HRESULT EnumImplCategoriesOfClass(REFCLSID, LPENUMCATID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
53 HRESULT EnumReqCategoriesOfClass(REFCLSID, LPENUMCATID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
54 }
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
55 alias ICatInformation* LPCATINFORMATION;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
56
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
57 interface ICatRegister : IUnknown {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
58 HRESULT RegisterCategories(ULONG, CATEGORYINFO*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
59 HRESULT UnRegisterCategories(ULONG, CATID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
60 HRESULT RegisterClassImplCategories(REFCLSID, ULONG, CATID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
61 HRESULT UnRegisterClassImplCategories(REFCLSID, ULONG, CATID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
62 HRESULT RegisterClassReqCategories(REFCLSID, ULONG, CATID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
63 HRESULT UnRegisterClassReqCategories(REFCLSID, ULONG, CATID*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
64 }
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
65 alias ICatRegister* LPCATREGISTER;
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
66
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
67 interface IEnumCATEGORYINFO : IUnknown {
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
68 HRESULT Next(ULONG, CATEGORYINFO*, ULONG*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
69 HRESULT Skip(ULONG);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
70 HRESULT Reset();
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
71 HRESULT Clone(LPENUMCATEGORYINFO*);
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
72 }
4a9dcbd9e54f -files of 0.13 beta
marton@basel.hu
parents:
diff changeset
73 alias IEnumCATEGORYINFO* LPENUMCATEGORYINFO;