home *** CD-ROM | disk | FTP | other *** search
/ Solo Programadores 22 / SOLO_22.iso / packages / win32ada / data.z / win32-oleauto.ads < prev    next >
Encoding:
Text File  |  1996-03-15  |  225.1 KB  |  4,300 lines

  1. -- $Source: /home/harp/1/proto/monoBANK/winnt/win32-oleauto.ads,v $ 
  2. -- $Revision: 1.17 $ $Date: 96/03/15 12:55:04 $ $Author: stm $ 
  3. -- See end of file for Copyright (c) information.
  4.  
  5. with Win32.Objbase;
  6. with Win32.Rpcdce;
  7. with Win32.Rpcdcep;
  8. with Win32.Winnt;
  9.  
  10. package Win32.Oleauto is
  11.  
  12.     STDOLE_MAJORVERNUM       : constant := 16#1#;           -- oleauto.h:91
  13.     STDOLE_MINORVERNUM       : constant := 16#0#;           -- oleauto.h:92
  14.     STDOLE_LCID              : constant := 16#0#;           -- oleauto.h:93
  15.     FADF_AUTO                : constant := 16#1#;           -- oleauto.h:303
  16.     FADF_STATIC              : constant := 16#2#;           -- oleauto.h:306
  17.     FADF_EMBEDDED            : constant := 16#4#;           -- oleauto.h:309
  18.     FADF_FIXEDSIZE           : constant := 16#10#;          -- oleauto.h:312
  19.     FADF_BSTR                : constant := 16#100#;         -- oleauto.h:315
  20.     FADF_UNKNOWN             : constant := 16#200#;         -- oleauto.h:318
  21.     FADF_DISPATCH            : constant := 16#400#;         -- oleauto.h:321
  22.     FADF_VARIANT             : constant := 16#800#;         -- oleauto.h:324
  23.     FADF_RESERVED            : constant := 16#f0e8#;        -- oleauto.h:327
  24.     VT_VECTOR                : constant := 16#1000#;        -- oleauto.h:448
  25.     VT_ARRAY                 : constant := 16#2000#;        -- oleauto.h:451
  26.     VT_BYREF                 : constant := 16#4000#;        -- oleauto.h:454
  27.     VT_RESERVED              : constant := 16#8000#;        -- oleauto.h:457
  28.     IMPLTYPEFLAG_FDEFAULT    : constant := 16#1#;           -- oleauto.h:893
  29.     IMPLTYPEFLAG_FSOURCE     : constant := 16#2#;           -- oleauto.h:896
  30.     IMPLTYPEFLAG_FRESTRICTED : constant := 16#4#;           -- oleauto.h:899
  31.     DISPID_UNKNOWN           : constant := -1;              -- oleauto.h:1915
  32.     DISPID_VALUE             : constant := 0;               -- oleauto.h:1919
  33.     DISPID_PROPERTYPUT       : constant := -3;              -- oleauto.h:1925
  34.     DISPID_NEWENUM           : constant := -4;              -- oleauto.h:1929
  35.     DISPID_EVALUATE          : constant := -5;              -- oleauto.h:1933
  36.     DISPID_CONSTRUCTOR       : constant := -6;              -- oleauto.h:1936
  37.     DISPID_DESTRUCTOR        : constant := -7;              -- oleauto.h:1939
  38.     VARIANT_NOVALUEPROP      : constant := 1;               -- oleauto.h:4004
  39.     VAR_TIMEVALUEONLY        : constant := 16#1#;           -- oleauto.h:4027
  40.     VAR_DATEVALUEONLY        : constant := 16#2#;           -- oleauto.h:4028
  41.     MEMBERID_NIL             : constant := -1;              -- oleauto.h:4145
  42.     ID_DEFAULTINST           : constant := -2;              -- oleauto.h:4146
  43.     IDLFLAG_NONE             : constant := 0;               -- oleauto.h:4149
  44.     IDLFLAG_FIN              : constant := 16#1#;           -- oleauto.h:4150
  45.     IDLFLAG_FOUT             : constant := 16#2#;           -- oleauto.h:4151
  46.     IDLFLAG_FLCID            : constant := 16#4#;           -- oleauto.h:4152
  47.     IDLFLAG_FRETVAL          : constant := 16#8#;           -- oleauto.h:4153
  48.     DISPATCH_METHOD          : constant := 16#1#;           -- oleauto.h:4157
  49.     DISPATCH_PROPERTYGET     : constant := 16#2#;           -- oleauto.h:4158
  50.     DISPATCH_PROPERTYPUT     : constant := 16#4#;           -- oleauto.h:4159
  51.     DISPATCH_PROPERTYPUTREF  : constant := 16#8#;           -- oleauto.h:4160
  52.     ACTIVEOBJECT_STRONG      : constant := 16#0#;           -- oleauto.h:4339
  53.     ACTIVEOBJECT_WEAK        : constant := 16#1#;           -- oleauto.h:4340
  54.  
  55.     type DATE is new Win32.DOUBLE;                          -- oleauto.h:330
  56.     type PDATE is access all DATE;
  57.     type VARIANT_BOOL is new Win32.SHORT;                   -- oleauto.h:347
  58.     type PVARIANT_BOOL is access all VARIANT_BOOL;
  59.  
  60.     type VARENUM is (                                       -- oleauto.h:405
  61.         VT_EMPTY,                                           -- oleauto.h:406
  62.         VT_NULL,                                            -- oleauto.h:407
  63.         VT_I2,                                              -- oleauto.h:408
  64.         VT_I4,                                              -- oleauto.h:409
  65.         VT_R4,                                              -- oleauto.h:410
  66.         VT_R8,                                              -- oleauto.h:411
  67.         VT_CY,                                              -- oleauto.h:412
  68.         VT_DATE,                                            -- oleauto.h:413
  69.         VT_BSTR,                                            -- oleauto.h:414
  70.         VT_DISPATCH,                                        -- oleauto.h:415
  71.         VT_ERROR,                                           -- oleauto.h:416
  72.         VT_BOOL,                                            -- oleauto.h:417
  73.         VT_VARIANT,                                         -- oleauto.h:418
  74.         VT_UNKNOWN,                                         -- oleauto.h:419
  75.         VT_I1,                                              -- oleauto.h:420
  76.         VT_UI1,                                             -- oleauto.h:421
  77.         VT_UI2,                                             -- oleauto.h:422
  78.         VT_UI4,                                             -- oleauto.h:423
  79.         VT_I8,                                              -- oleauto.h:424
  80.         VT_UI8,                                             -- oleauto.h:425
  81.         VT_INT,                                             -- oleauto.h:426
  82.         VT_UINT,                                            -- oleauto.h:427
  83.         VT_VOID,                                            -- oleauto.h:428
  84.         VT_HRESULT,                                         -- oleauto.h:429
  85.         VT_PTR,                                             -- oleauto.h:430
  86.         VT_SAFEARRAY,                                       -- oleauto.h:431
  87.         VT_CARRAY,                                          -- oleauto.h:432
  88.         VT_USERDEFINED,                                     -- oleauto.h:433
  89.         VT_LPSTR,                                           -- oleauto.h:434
  90.         VT_LPWSTR,                                          -- oleauto.h:435
  91.         VT_FILETIME,                                        -- oleauto.h:436
  92.         VT_BLOB,                                            -- oleauto.h:437
  93.         VT_STREAM,                                          -- oleauto.h:438
  94.         VT_STORAGE,                                         -- oleauto.h:439
  95.         VT_STREAMED_OBJECT,                                 -- oleauto.h:440
  96.         VT_STORED_OBJECT,                                   -- oleauto.h:441
  97.         VT_BLOB_OBJECT,                                     -- oleauto.h:442
  98.         VT_CF,                                              -- oleauto.h:443
  99.         VT_CLSID                                            -- oleauto.h:445
  100.     );
  101.     for VARENUM use (                                       -- oleauto.h:405
  102.         VT_EMPTY => 0,                                      -- oleauto.h:406
  103.         VT_NULL => 1,                                       -- oleauto.h:407
  104.         VT_I2 => 2,                                         -- oleauto.h:408
  105.         VT_I4 => 3,                                         -- oleauto.h:409
  106.         VT_R4 => 4,                                         -- oleauto.h:410
  107.         VT_R8 => 5,                                         -- oleauto.h:411
  108.         VT_CY => 6,                                         -- oleauto.h:412
  109.         VT_DATE => 7,                                       -- oleauto.h:413
  110.         VT_BSTR => 8,                                       -- oleauto.h:414
  111.         VT_DISPATCH => 9,                                   -- oleauto.h:415
  112.         VT_ERROR => 10,                                     -- oleauto.h:416
  113.         VT_BOOL => 11,                                      -- oleauto.h:417
  114.         VT_VARIANT => 12,                                   -- oleauto.h:418
  115.         VT_UNKNOWN => 13,                                   -- oleauto.h:419
  116.         VT_I1 => 16,                                        -- oleauto.h:420
  117.         VT_UI1 => 17,                                       -- oleauto.h:421
  118.         VT_UI2 => 18,                                       -- oleauto.h:422
  119.         VT_UI4 => 19,                                       -- oleauto.h:423
  120.         VT_I8 => 20,                                        -- oleauto.h:424
  121.         VT_UI8 => 21,                                       -- oleauto.h:425
  122.         VT_INT => 22,                                       -- oleauto.h:426
  123.         VT_UINT => 23,                                      -- oleauto.h:427
  124.         VT_VOID => 24,                                      -- oleauto.h:428
  125.         VT_HRESULT => 25,                                   -- oleauto.h:429
  126.         VT_PTR => 26,                                       -- oleauto.h:430
  127.         VT_SAFEARRAY => 27,                                 -- oleauto.h:431
  128.         VT_CARRAY => 28,                                    -- oleauto.h:432
  129.         VT_USERDEFINED => 29,                               -- oleauto.h:433
  130.         VT_LPSTR => 30,                                     -- oleauto.h:434
  131.         VT_LPWSTR => 31,                                    -- oleauto.h:435
  132.         VT_FILETIME => 64,                                  -- oleauto.h:436
  133.         VT_BLOB => 65,                                      -- oleauto.h:437
  134.         VT_STREAM => 66,                                    -- oleauto.h:438
  135.         VT_STORAGE => 67,                                   -- oleauto.h:439
  136.         VT_STREAMED_OBJECT => 68,                           -- oleauto.h:440
  137.         VT_STORED_OBJECT => 69,                             -- oleauto.h:441
  138.         VT_BLOB_OBJECT => 70,                               -- oleauto.h:442
  139.         VT_CF => 71,                                        -- oleauto.h:443
  140.         VT_CLSID => 72                                      -- oleauto.h:445
  141.     );
  142.     for VARENUM'size use 32;                                -- oleauto.h:405
  143.  
  144.     type VARTYPE is new Win32.USHORT;                       -- oleauto.h:462
  145.     type DISPID is new Win32.LONG;                          -- oleauto.h:611
  146.     type MEMBERID is new Win32.LONG;                        -- oleauto.h:617
  147.     type HREFTYPE is new Win32.DWORD;                       -- oleauto.h:623
  148.     type PROPID is new Win32.ULONG;                         -- oleauto.h:627
  149.  
  150.     type TYPEKIND is (                                      -- oleauto.h:631
  151.         TKIND_ENUM,                                         -- oleauto.h:632
  152.         TKIND_RECORD,                                       -- oleauto.h:633
  153.         TKIND_MODULE,                                       -- oleauto.h:634
  154.         TKIND_INTERFACE,                                    -- oleauto.h:635
  155.         TKIND_DISPATCH,                                     -- oleauto.h:636
  156.         TKIND_COCLASS,                                      -- oleauto.h:637
  157.         TKIND_ALIAS,                                        -- oleauto.h:638
  158.         TKIND_UNION,                                        -- oleauto.h:639
  159.         TKIND_MAX                                           -- oleauto.h:641
  160.     );
  161.     for TYPEKIND'size use 32;                               -- oleauto.h:631
  162.  
  163.     type PTYPEKIND is access TYPEKIND;
  164.  
  165.     type CALLCONV is (                                      -- oleauto.h:815
  166.         CC_CDECL,                                           -- oleauto.h:816
  167.         CC_MSCPASCAL,                                       -- oleauto.h:817
  168.         CC_PASCAL,                                          -- oleauto.h:818
  169.         CC_MACPASCAL,                                       -- oleauto.h:819
  170.         CC_STDCALL,                                         -- oleauto.h:820
  171.         CC_RESERVED,                                        -- oleauto.h:821
  172.         CC_SYSCALL,                                         -- oleauto.h:822
  173.         CC_MPWCDECL,                                        -- oleauto.h:823
  174.         CC_MPWPASCAL,                                       -- oleauto.h:824
  175.         CC_MAX                                              -- oleauto.h:826
  176.     );
  177.     for CALLCONV use (                                      -- oleauto.h:815
  178.         CC_CDECL => 1,                                      -- oleauto.h:816
  179.         CC_MSCPASCAL => 2,                                  -- oleauto.h:817
  180.         CC_PASCAL => 3,                                     -- oleauto.h:818
  181.         CC_MACPASCAL => 4,                                  -- oleauto.h:819
  182.         CC_STDCALL => 5,                                    -- oleauto.h:820
  183.         CC_RESERVED => 6,                                   -- oleauto.h:821
  184.         CC_SYSCALL => 7,                                    -- oleauto.h:822
  185.         CC_MPWCDECL => 8,                                   -- oleauto.h:823
  186.         CC_MPWPASCAL => 9,                                  -- oleauto.h:824
  187.         CC_MAX => 10                                        -- oleauto.h:826
  188.     );
  189.     for CALLCONV'size use 32;                               -- oleauto.h:815
  190.  
  191.     type PCALLCONV is access CALLCONV;
  192.  
  193.     type FUNCKIND is (                                      -- oleauto.h:834
  194.         FUNC_VIRTUAL,                                       -- oleauto.h:835
  195.         FUNC_PUREVIRTUAL,                                   -- oleauto.h:836
  196.         FUNC_NONVIRTUAL,                                    -- oleauto.h:837
  197.         FUNC_STATIC,                                        -- oleauto.h:838
  198.         FUNC_DISPATCH                                       -- oleauto.h:840
  199.     );
  200.     for FUNCKIND'size use 32;                               -- oleauto.h:834
  201.   
  202.     type PFUNCKIND is access FUNCKIND;
  203.  
  204.     type INVOKEKIND is (                                    -- oleauto.h:848
  205.         INVOKE_FUNC,                                        -- oleauto.h:849
  206.         INVOKE_PROPERTYGET,                                 -- oleauto.h:850
  207.         INVOKE_PROPERTYPUT,                                 -- oleauto.h:851
  208.         INVOKE_PROPERTYPUTREF                               -- oleauto.h:853
  209.     );
  210.     for INVOKEKIND use (                                    -- oleauto.h:848
  211.         INVOKE_FUNC => 1,                                   -- oleauto.h:849
  212.         INVOKE_PROPERTYGET => 2,                            -- oleauto.h:850
  213.         INVOKE_PROPERTYPUT => 4,                            -- oleauto.h:851
  214.         INVOKE_PROPERTYPUTREF => 8                          -- oleauto.h:853
  215.     );
  216.     for INVOKEKIND'size use 32;                             -- oleauto.h:848
  217.  
  218.     type PINVOKEKIND is access INVOKEKIND;
  219.  
  220.     type VARKIND is (                                       -- oleauto.h:881
  221.         VAR_PERINSTANCE,                                    -- oleauto.h:882
  222.         VAR_STATIC,                                         -- oleauto.h:883
  223.         VAR_CONST,                                          -- oleauto.h:884
  224.         VAR_DISPATCH                                        -- oleauto.h:886
  225.     );
  226.     for VARKIND'size use 32;                                -- oleauto.h:881
  227.  
  228.     type PVARKIND is access VARKIND;
  229.  
  230.     type TYPEFLAGS is (                                     -- oleauto.h:924
  231.         TYPEFLAG_FAPPOBJECT,                                -- oleauto.h:925
  232.         TYPEFLAG_FCANCREATE,                                -- oleauto.h:926
  233.         TYPEFLAG_FLICENSED,                                 -- oleauto.h:927
  234.         TYPEFLAG_FPREDECLID,                                -- oleauto.h:928
  235.         TYPEFLAG_FHIDDEN,                                   -- oleauto.h:929
  236.         TYPEFLAG_FCONTROL,                                  -- oleauto.h:930
  237.         TYPEFLAG_FDUAL,                                     -- oleauto.h:931
  238.         TYPEFLAG_FNONEXTENSIBLE,                            -- oleauto.h:932
  239.         TYPEFLAG_FOLEAUTOMATION                             -- oleauto.h:934
  240.     );
  241.     for TYPEFLAGS use (                                     -- oleauto.h:924
  242.         TYPEFLAG_FAPPOBJECT => 1,                           -- oleauto.h:925
  243.         TYPEFLAG_FCANCREATE => 2,                           -- oleauto.h:926
  244.         TYPEFLAG_FLICENSED => 4,                            -- oleauto.h:927
  245.         TYPEFLAG_FPREDECLID => 8,                           -- oleauto.h:928
  246.         TYPEFLAG_FHIDDEN => 16,                             -- oleauto.h:929
  247.         TYPEFLAG_FCONTROL => 32,                            -- oleauto.h:930
  248.         TYPEFLAG_FDUAL => 64,                               -- oleauto.h:931
  249.         TYPEFLAG_FNONEXTENSIBLE => 128,                     -- oleauto.h:932
  250.         TYPEFLAG_FOLEAUTOMATION => 256                      -- oleauto.h:934
  251.     );
  252.     for TYPEFLAGS'size use 32;                              -- oleauto.h:924
  253.  
  254.     type FUNCFLAGS is (                                     -- oleauto.h:942
  255.         FUNCFLAG_FRESTRICTED,                               -- oleauto.h:943
  256.         FUNCFLAG_FSOURCE,                                   -- oleauto.h:944
  257.         FUNCFLAG_FBINDABLE,                                 -- oleauto.h:945
  258.         FUNCFLAG_FREQUESTEDIT,                              -- oleauto.h:946
  259.         FUNCFLAG_FDISPLAYBIND,                              -- oleauto.h:947
  260.         FUNCFLAG_FDEFAULTBIND,                              -- oleauto.h:948
  261.         FUNCFLAG_FHIDDEN                                    -- oleauto.h:950
  262.     );
  263.     for FUNCFLAGS use (                                     -- oleauto.h:942
  264.         FUNCFLAG_FRESTRICTED => 1,                          -- oleauto.h:943
  265.         FUNCFLAG_FSOURCE => 2,                              -- oleauto.h:944
  266.         FUNCFLAG_FBINDABLE => 4,                            -- oleauto.h:945
  267.         FUNCFLAG_FREQUESTEDIT => 8,                         -- oleauto.h:946
  268.         FUNCFLAG_FDISPLAYBIND => 16,                        -- oleauto.h:947
  269.         FUNCFLAG_FDEFAULTBIND => 32,                        -- oleauto.h:948
  270.         FUNCFLAG_FHIDDEN => 64                              -- oleauto.h:950
  271.     );
  272.     for FUNCFLAGS'size use 32;                              -- oleauto.h:942
  273.  
  274.     type VARFLAGS is (                                      -- oleauto.h:958
  275.         VARFLAG_FREADONLY,                                  -- oleauto.h:959
  276.         VARFLAG_FSOURCE,                                    -- oleauto.h:960
  277.         VARFLAG_FBINDABLE,                                  -- oleauto.h:961
  278.         VARFLAG_FREQUESTEDIT,                               -- oleauto.h:962
  279.         VARFLAG_FDISPLAYBIND,                               -- oleauto.h:963
  280.         VARFLAG_FDEFAULTBIND,                               -- oleauto.h:964
  281.         VARFLAG_FHIDDEN                                     -- oleauto.h:966
  282.     );
  283.     for VARFLAGS use (                                      -- oleauto.h:958
  284.         VARFLAG_FREADONLY => 1,                             -- oleauto.h:959
  285.         VARFLAG_FSOURCE => 2,                               -- oleauto.h:960
  286.         VARFLAG_FBINDABLE => 4,                             -- oleauto.h:961
  287.         VARFLAG_FREQUESTEDIT => 8,                          -- oleauto.h:962
  288.         VARFLAG_FDISPLAYBIND => 16,                         -- oleauto.h:963
  289.         VARFLAG_FDEFAULTBIND => 32,                         -- oleauto.h:964
  290.         VARFLAG_FHIDDEN => 64                               -- oleauto.h:966
  291.     );
  292.     for VARFLAGS'size use 32;                               -- oleauto.h:958
  293.  
  294.     type DESCKIND is (                                      -- oleauto.h:2307
  295.         DESCKIND_NONE,                                      -- oleauto.h:2308
  296.         DESCKIND_FUNCDESC,                                  -- oleauto.h:2309
  297.         DESCKIND_VARDESC,                                   -- oleauto.h:2310
  298.         DESCKIND_TYPECOMP,                                  -- oleauto.h:2311
  299.         DESCKIND_IMPLICITAPPOBJ,                            -- oleauto.h:2312
  300.         DESCKIND_MAX                                        -- oleauto.h:2314
  301.     );
  302.     for DESCKIND'size use 32;                               -- oleauto.h:2307
  303.  
  304.     type PDESCKIND is access DESCKIND;
  305.  
  306.     type SYSKIND is (                                       -- oleauto.h:3052
  307.         SYS_WIN16,                                          -- oleauto.h:3053
  308.         SYS_WIN32,                                          -- oleauto.h:3054
  309.         SYS_MAC                                             -- oleauto.h:3056
  310.     );
  311.     for SYSKIND'size use 32;                                -- oleauto.h:3052
  312.  
  313.     type PSYSKIND is access SYSKIND;
  314.  
  315.     type LIBFLAGS is (                                      -- oleauto.h:3060
  316.         LIBFLAG_FRESTRICTED,                                -- oleauto.h:3061
  317.         LIBFLAG_FCONTROL,                                   -- oleauto.h:3062
  318.         LIBFLAG_FHIDDEN                                     -- oleauto.h:3064
  319.     );
  320.     for LIBFLAGS use (                                      -- oleauto.h:3060
  321.         LIBFLAG_FRESTRICTED => 1,                           -- oleauto.h:3061
  322.         LIBFLAG_FCONTROL => 2,                              -- oleauto.h:3062
  323.         LIBFLAG_FHIDDEN => 4                                -- oleauto.h:3064
  324.     );
  325.     for LIBFLAGS'size use 32;                               -- oleauto.h:3060
  326.  
  327.     type BSTR is access all Win32.Objbase.OLECHAR;          -- oleauto.h:218
  328.     type LPBSTR is access all BSTR;                         -- oleauto.h:221
  329.  
  330.     type ICreateTypeInfo;                                   -- oleauto.h:114
  331.     type ICreateTypeLib;                                    -- oleauto.h:120
  332.     type IDispatch;                                         -- oleauto.h:126
  333.     type IEnumVARIANT;                                      -- oleauto.h:132
  334.     type ITypeComp;                                         -- oleauto.h:138
  335.     type ITypeInfo;                                         -- oleauto.h:144
  336.     type ITypeLib;                                          -- oleauto.h:150
  337.     type IErrorInfo;                                        -- oleauto.h:156
  338.     type ICreateErrorInfo;                                  -- oleauto.h:162
  339.     type ISupportErrorInfo;                                 -- oleauto.h:168
  340.     type XBSTR;                                             -- oleauto.h:211
  341.     type BLOB;                                              -- oleauto.h:228
  342.     type CLIPDATA;                                          -- oleauto.h:242
  343.     type SAFEARRAYBOUND;                                    -- oleauto.h:255
  344.     type SAFEARRAY;                                         -- oleauto.h:286
  345.     type CY;                                                -- oleauto.h:336
  346.     type union_anonymous4_t;                                -- oleauto.h:582
  347.     type union_anonymous5_t;                                -- oleauto.h:661
  348.     type IDLDESC;                                           -- oleauto.h:692
  349.     type DISPPARAMS;                                        -- oleauto.h:760
  350.     type RemEXCEPINFO;                                      -- oleauto.h:769
  351.     type EXCEPINFO;                                         -- oleauto.h:809
  352.     type union_anonymous6_t;                                -- oleauto.h:910
  353.     type ICreateTypeInfoVtbl;                               -- oleauto.h:1085
  354.     type ICreateTypeLibVtbl;                                -- oleauto.h:1657
  355.     type IDispatchVtbl;                                     -- oleauto.h:1978
  356.     type IEnumVARIANTVtbl;                                  -- oleauto.h:2166
  357.     type BINDPTR;                                           -- oleauto.h:2321
  358.     type ITypeCompVtbl;                                     -- oleauto.h:2360
  359.     type ITypeInfoVtbl;                                     -- oleauto.h:2574
  360.     type TLIBATTR;                                          -- oleauto.h:3074
  361.     type ITypeLibVtbl;                                      -- oleauto.h:3141
  362.     type IErrorInfoVtbl;                                    -- oleauto.h:3443
  363.     type ICreateErrorInfoVtbl;                              -- oleauto.h:3626
  364.     type ISupportErrorInfoVtbl;                             -- oleauto.h:3797
  365.     type PARAMDATA;                                         -- oleauto.h:4259
  366.     type METHODDATA;                                        -- oleauto.h:4264
  367.     type INTERFACEDATA;                                     -- oleauto.h:4275
  368.     type VARIANT;                                           -- oleauto.h:467
  369.     type TYPEDESC;                                          -- oleauto.h:658
  370.     type ELEMDESC;                                          -- oleauto.h:718
  371.     type TYPEATTR;                                          -- oleauto.h:733
  372.     type FUNCDESC;                                          -- oleauto.h:860
  373.     type VARDESC;                                           -- oleauto.h:902
  374.     type ARRAYDESC;                                         -- oleauto.h:659
  375.  
  376.     type LPBLOB is access all BLOB;                         -- oleauto.h:235
  377.     type LPSAFEARRAYBOUND is access all SAFEARRAYBOUND;     -- oleauto.h:262
  378.     type a_TYPEDESC_T is access all TYPEDESC;               -- oleauto.h:658
  379.     type a_ARRAYDESC_T is access all ARRAYDESC;             -- oleauto.h:659
  380.     type LPSAFEARRAY is access all SAFEARRAY;               -- oleauto.h:299
  381.     type PCY is access all CY;                              -- oleauto.h:574
  382.     type PLPSAFEARRAY is access all LPSAFEARRAY;            -- oleauto.h:579
  383.     type LPVARIANT is access all VARIANT;                   -- oleauto.h:593
  384.     subtype LPVARIANTARG is LPVARIANT;                      -- oleauto.h:605
  385.     type LPIDLDESC is access all IDLDESC;                   -- oleauto.h:699
  386.     type LPELEMDESC is access all ELEMDESC;                 -- oleauto.h:725
  387.     type LPTYPEATTR is access all TYPEATTR;                 -- oleauto.h:756
  388.     type LPEXCEPINFO is access all EXCEPINFO;               -- oleauto.h:811
  389.     type LPFUNCDESC is access all FUNCDESC;                 -- oleauto.h:877
  390.     type LPVARDESC is access all VARDESC;                   -- oleauto.h:917
  391.     type LPCREATETYPEINFO is access all ICreateTypeInfo;    -- oleauto.h:987
  392.     type a_ICreateTypeInfoVtbl_t is access all ICreateTypeInfoVtbl;
  393.                                                             -- oleauto.h:1210
  394.     type LPCREATETYPELIB is access all ICreateTypeLib;      -- oleauto.h:1611
  395.     type a_ICreateTypeLibVtbl_t is access all ICreateTypeLibVtbl;
  396.                                                             -- oleauto.h:1717
  397.     type LPDISPATCH is access all IDispatch;                -- oleauto.h:1910
  398.     type a_LPDISPATCH_t is access all LPDISPATCH;           -- oleauto.h:578
  399.     type a_IDispatchVtbl_t is access all IDispatchVtbl;     -- oleauto.h:2025
  400.     type LPENUMVARIANT is access all IEnumVARIANT;          -- oleauto.h:2139
  401.     type a_IEnumVARIANTVtbl_t is access all IEnumVARIANTVtbl;
  402.                                                             -- oleauto.h:2201
  403.     type LPTYPECOMP is access all ITypeComp;                -- oleauto.h:2303
  404.     type LPBINDPTR is access all BINDPTR;                   -- oleauto.h:2332
  405.     type a_ITypeCompVtbl_t is access all ITypeCompVtbl;     -- oleauto.h:2394
  406.     type LPTYPEINFO is access all ITypeInfo;                -- oleauto.h:2473
  407.     type a_ITypeInfoVtbl_t is access all ITypeInfoVtbl;     -- oleauto.h:2698
  408.     type LPTYPELIB is access all ITypeLib;                  -- oleauto.h:3071
  409.     type LPTLIBATTR is access all TLIBATTR;                 -- oleauto.h:3085
  410.     type a_ITypeLibVtbl_t is access all ITypeLibVtbl;       -- oleauto.h:3211
  411.     type LPERRORINFO is access all IErrorInfo;              -- oleauto.h:3414
  412.     type a_IErrorInfoVtbl_t is access all IErrorInfoVtbl;   -- oleauto.h:3481
  413.     type LPCREATEERRORINFO is access all ICreateErrorInfo;  -- oleauto.h:3597
  414.     type a_ICreateErrorInfoVtbl_t is access all ICreateErrorInfoVtbl;
  415.                                                             -- oleauto.h:3664
  416.     type LPSUPPORTERRORINFO is access all ISupportErrorInfo;-- oleauto.h:3780
  417.     type a_ISupportErrorInfoVtbl_t is access all ISupportErrorInfoVtbl;
  418.                                                             -- oleauto.h:3819
  419.     type LPPARAMDATA is access all PARAMDATA;               -- oleauto.h:4262
  420.     type LPMETHODDATA is access all METHODDATA;             -- oleauto.h:4273
  421.     type LPINTERFACEDATA is access all INTERFACEDATA;       -- oleauto.h:4278
  422.  
  423.  
  424.     type af_809_pfnDeferredFillIn is access function (
  425.                 p1: access EXCEPINFO)
  426.                return Win32.Objbase.HRESULT;                -- oleauto.h:809
  427.     pragma Convention(Stdcall, af_809_pfnDeferredFillIn);
  428.  
  429.     type af_1088_QueryInterface is access function (
  430.                 This     : access ICreateTypeInfo;
  431.                 riid     : access Win32.Objbase.IID;
  432.                 ppvObject: access Win32.PVOID)
  433.                return Win32.Objbase.HRESULT;                -- oleauto.h:1088
  434.     pragma Convention(Stdcall, af_1088_QueryInterface);
  435.  
  436.     type af_1093_AddRef is access function (
  437.                 This: access ICreateTypeInfo)
  438.                return Win32.ULONG;                          -- oleauto.h:1093
  439.     pragma Convention(Stdcall, af_1093_AddRef);
  440.  
  441.     type af_1096_Release is access function (
  442.                 This: access ICreateTypeInfo)
  443.                return Win32.ULONG;                          -- oleauto.h:1096
  444.     pragma Convention(Stdcall, af_1096_Release);
  445.  
  446.     type af_1099_SetGuid is access function (
  447.                 This: access ICreateTypeInfo;
  448.                 guid: access Win32.Rpcdce.GUID)
  449.                return Win32.Objbase.HRESULT;                -- oleauto.h:1099
  450.     pragma Convention(Stdcall, af_1099_SetGuid);
  451.  
  452.     type af_1103_SetTypeFlags is access function (
  453.                 This      : access ICreateTypeInfo;
  454.                 uTypeFlags: Win32.UINT)
  455.                return Win32.Objbase.HRESULT;                -- oleauto.h:1103
  456.     pragma Convention(Stdcall, af_1103_SetTypeFlags);
  457.  
  458.     type af_1107_SetDocString is access function (
  459.                 This    : access ICreateTypeInfo;
  460.                 lpstrDoc: Win32.Objbase.LPOLESTR)
  461.                return Win32.Objbase.HRESULT;                -- oleauto.h:1107
  462.     pragma Convention(Stdcall, af_1107_SetDocString);
  463.  
  464.     type af_1111_SetHelpContext is access function (
  465.                 This         : access ICreateTypeInfo;
  466.                 dwHelpContext: Win32.DWORD)
  467.                return Win32.Objbase.HRESULT;                -- oleauto.h:1111
  468.     pragma Convention(Stdcall, af_1111_SetHelpContext);
  469.  
  470.     type af_1115_SetVersion is access function (
  471.                 This        : access ICreateTypeInfo;
  472.                 wMajorVerNum: Win32.WORD;
  473.                 wMinorVerNum: Win32.WORD)
  474.                return Win32.Objbase.HRESULT;                -- oleauto.h:1115
  475.     pragma Convention(Stdcall, af_1115_SetVersion);
  476.  
  477.     type af_1120_AddRefTypeInfo is access function (
  478.                 This     : access ICreateTypeInfo;
  479.                 ptinfo   : access ITypeInfo;
  480.                 phreftype: access HREFTYPE)
  481.                return Win32.Objbase.HRESULT;                -- oleauto.h:1120
  482.     pragma Convention(Stdcall, af_1120_AddRefTypeInfo);
  483.  
  484.     type af_1125_AddFuncDesc is access function (
  485.                 This     : access ICreateTypeInfo;
  486.                 index    : Win32.UINT;
  487.                 pfuncdesc: access FUNCDESC)
  488.                return Win32.Objbase.HRESULT;                -- oleauto.h:1125
  489.     pragma Convention(Stdcall, af_1125_AddFuncDesc);
  490.  
  491.     type af_1130_AddImplType is access function (
  492.                 This    : access ICreateTypeInfo;
  493.                 index   : Win32.UINT;
  494.                 hreftype: Win32.Oleauto.HREFTYPE)
  495.                return Win32.Objbase.HRESULT;                -- oleauto.h:1130
  496.     pragma Convention(Stdcall, af_1130_AddImplType);
  497.  
  498.     type af_1135_SetImplTypeFlags is access function (
  499.                 This         : access ICreateTypeInfo;
  500.                 index        : Win32.UINT;
  501.                 impltypeflags: Win32.INT)
  502.                return Win32.Objbase.HRESULT;                -- oleauto.h:1135
  503.     pragma Convention(Stdcall, af_1135_SetImplTypeFlags);
  504.  
  505.     type af_1140_SetAlignment is access function (
  506.                 This       : access ICreateTypeInfo;
  507.                 cbAlignment: Win32.WORD)
  508.                return Win32.Objbase.HRESULT;                -- oleauto.h:1140
  509.     pragma Convention(Stdcall, af_1140_SetAlignment);
  510.  
  511.     type af_1144_SetSchema is access function (
  512.                 This       : access ICreateTypeInfo;
  513.                 lpstrSchema: Win32.Objbase.LPOLESTR)
  514.                return Win32.Objbase.HRESULT;                -- oleauto.h:1144
  515.     pragma Convention(Stdcall, af_1144_SetSchema);
  516.  
  517.     type af_1148_AddVarDesc is access function (
  518.                 This    : access ICreateTypeInfo;
  519.                 index   : Win32.UINT;
  520.                 pvardesc: access VARDESC)
  521.                return Win32.Objbase.HRESULT;                -- oleauto.h:1148
  522.     pragma Convention(Stdcall, af_1148_AddVarDesc);
  523.  
  524.     type af_1153_SetFuncAndParamNames is access function (
  525.                 This     : access ICreateTypeInfo;
  526.                 index    : Win32.UINT;
  527.                 rgszNames: access Win32.Objbase.LPOLESTR;
  528.                 cNames   : Win32.UINT)
  529.                return Win32.Objbase.HRESULT;                -- oleauto.h:1153
  530.     pragma Convention(Stdcall, af_1153_SetFuncAndParamNames);
  531.  
  532.     type af_1159_SetVarName is access function (
  533.                 This  : access ICreateTypeInfo;
  534.                 index : Win32.UINT;
  535.                 szName: Win32.Objbase.LPOLESTR)
  536.                return Win32.Objbase.HRESULT;                -- oleauto.h:1159
  537.     pragma Convention(Stdcall, af_1159_SetVarName);
  538.  
  539.     type af_1164_SetTypeDescAlias is access function (
  540.                 This       : access ICreateTypeInfo;
  541.                 ptdescAlias: access TYPEDESC)
  542.                return Win32.Objbase.HRESULT;                -- oleauto.h:1164
  543.     pragma Convention(Stdcall, af_1164_SetTypeDescAlias);
  544.  
  545.     type af_1168_DefineFuncAsDllEntry is access function (
  546.                 This      : access ICreateTypeInfo;
  547.                 index     : Win32.UINT;
  548.                 szDllName : Win32.Objbase.LPOLESTR;
  549.                 szProcName: Win32.Objbase.LPOLESTR)
  550.                return Win32.Objbase.HRESULT;                -- oleauto.h:1168
  551.     pragma Convention(Stdcall, af_1168_DefineFuncAsDllEntry);
  552.  
  553.     type af_1174_SetFuncDocString is access function (
  554.                 This       : access ICreateTypeInfo;
  555.                 index      : Win32.UINT;
  556.                 szDocString: Win32.Objbase.LPOLESTR)
  557.                return Win32.Objbase.HRESULT;                -- oleauto.h:1174
  558.     pragma Convention(Stdcall, af_1174_SetFuncDocString);
  559.  
  560.     type af_1179_SetVarDocString is access function (
  561.                 This       : access ICreateTypeInfo;
  562.                 index      : Win32.UINT;
  563.                 szDocString: Win32.Objbase.LPOLESTR)
  564.                return Win32.Objbase.HRESULT;                -- oleauto.h:1179
  565.     pragma Convention(Stdcall, af_1179_SetVarDocString);
  566.  
  567.     type af_1184_SetFuncHelpContext is access function (
  568.                 This         : access ICreateTypeInfo;
  569.                 index        : Win32.UINT;
  570.                 dwHelpContext: Win32.DWORD)
  571.                return Win32.Objbase.HRESULT;                -- oleauto.h:1184
  572.     pragma Convention(Stdcall, af_1184_SetFuncHelpContext);
  573.  
  574.     type af_1189_SetVarHelpContext is access function (
  575.                 This         : access ICreateTypeInfo;
  576.                 index        : Win32.UINT;
  577.                 dwHelpContext: Win32.DWORD)
  578.                return Win32.Objbase.HRESULT;                -- oleauto.h:1189
  579.     pragma Convention(Stdcall, af_1189_SetVarHelpContext);
  580.  
  581.     type af_1194_SetMops is access function (
  582.                 This    : access ICreateTypeInfo;
  583.                 index   : Win32.UINT;
  584.                 bstrMops: BSTR)
  585.                return Win32.Objbase.HRESULT;                -- oleauto.h:1194
  586.     pragma Convention(Stdcall, af_1194_SetMops);
  587.  
  588.     type af_1199_SetTypeIdldesc is access function (
  589.                 This    : access ICreateTypeInfo;
  590.                 pidldesc: access IDLDESC)
  591.                return Win32.Objbase.HRESULT;                -- oleauto.h:1199
  592.     pragma Convention(Stdcall, af_1199_SetTypeIdldesc);
  593.  
  594.     type af_1203_LayOut is access function (
  595.                 This: access ICreateTypeInfo)
  596.                return Win32.Objbase.HRESULT;                -- oleauto.h:1203
  597.     pragma Convention(Stdcall, af_1203_LayOut);
  598.  
  599.     type af_1660_QueryInterface is access function (
  600.                 This     : access ICreateTypeLib;
  601.                 riid     : access Win32.Objbase.IID;
  602.                 ppvObject: access Win32.PVOID)
  603.                return Win32.Objbase.HRESULT;                -- oleauto.h:1660
  604.     pragma Convention(Stdcall, af_1660_QueryInterface);
  605.  
  606.     type af_1665_AddRef is access function (
  607.                 This: access ICreateTypeLib)
  608.                return Win32.ULONG;                          -- oleauto.h:1665
  609.     pragma Convention(Stdcall, af_1665_AddRef);
  610.  
  611.     type af_1668_Release is access function (
  612.                 This: access ICreateTypeLib)
  613.                return Win32.ULONG;                          -- oleauto.h:1668
  614.     pragma Convention(Stdcall, af_1668_Release);
  615.  
  616.     type af_1671_CreateTypeInfo is access function (
  617.                 This       : access ICreateTypeLib;
  618.                 szName     : Win32.Objbase.LPOLESTR;
  619.                 tkind      : TYPEKIND;
  620.                 lplpictinfo: access LPCREATETYPEINFO)
  621.                return Win32.Objbase.HRESULT;                -- oleauto.h:1671
  622.     pragma Convention(Stdcall, af_1671_CreateTypeInfo);
  623.  
  624.     type af_1677_SetName is access function (
  625.                 This  : access ICreateTypeLib;
  626.                 szName: Win32.Objbase.LPOLESTR)
  627.                return Win32.Objbase.HRESULT;                -- oleauto.h:1677
  628.     pragma Convention(Stdcall, af_1677_SetName);
  629.  
  630.     type af_1681_SetVersion is access function (
  631.                 This        : access ICreateTypeLib;
  632.                 wMajorVerNum: Win32.WORD;
  633.                 wMinorVerNum: Win32.WORD)
  634.                return Win32.Objbase.HRESULT;                -- oleauto.h:1681
  635.     pragma Convention(Stdcall, af_1681_SetVersion);
  636.  
  637.     type af_1686_SetGuid is access function (
  638.                 This: access ICreateTypeLib;
  639.                 guid: access Win32.Rpcdce.GUID)
  640.                return Win32.Objbase.HRESULT;                -- oleauto.h:1686
  641.     pragma Convention(Stdcall, af_1686_SetGuid);
  642.  
  643.     type af_1690_SetDocString is access function (
  644.                 This : access ICreateTypeLib;
  645.                 szDoc: Win32.Objbase.LPOLESTR)
  646.                return Win32.Objbase.HRESULT;                -- oleauto.h:1690
  647.     pragma Convention(Stdcall, af_1690_SetDocString);
  648.  
  649.     type af_1694_SetHelpFileName is access function (
  650.                 This          : access ICreateTypeLib;
  651.                 szHelpFileName: Win32.Objbase.LPOLESTR)
  652.                return Win32.Objbase.HRESULT;                -- oleauto.h:1694
  653.     pragma Convention(Stdcall, af_1694_SetHelpFileName);
  654.  
  655.     type af_1698_SetHelpContext is access function (
  656.                 This         : access ICreateTypeLib;
  657.                 dwHelpContext: Win32.DWORD)
  658.                return Win32.Objbase.HRESULT;                -- oleauto.h:1698
  659.     pragma Convention(Stdcall, af_1698_SetHelpContext);
  660.  
  661.     type af_1702_SetLcid is access function (
  662.                 This: access ICreateTypeLib;
  663.                 lcid: Win32.Winnt.LCID)
  664.                return Win32.Objbase.HRESULT;                -- oleauto.h:1702
  665.     pragma Convention(Stdcall, af_1702_SetLcid);
  666.  
  667.     type af_1706_SetLibFlags is access function (
  668.                 This     : access ICreateTypeLib;
  669.                 uLibFlags: Win32.UINT)
  670.                return Win32.Objbase.HRESULT;                -- oleauto.h:1706
  671.     pragma Convention(Stdcall, af_1706_SetLibFlags);
  672.  
  673.     type af_1710_SaveAllChanges is access function (
  674.                 This: access ICreateTypeLib)
  675.                return Win32.Objbase.HRESULT;                -- oleauto.h:1710
  676.     pragma Convention(Stdcall, af_1710_SaveAllChanges);
  677.  
  678.     type af_1981_QueryInterface is access function (
  679.                 This     : access IDispatch;
  680.                 riid     : access Win32.Objbase.IID;
  681.                 ppvObject: access Win32.PVOID)
  682.                return Win32.Objbase.HRESULT;                -- oleauto.h:1981
  683.     pragma Convention(Stdcall, af_1981_QueryInterface);
  684.  
  685.     type af_1986_AddRef is access function (
  686.                 This: access IDispatch)
  687.                return Win32.ULONG;                          -- oleauto.h:1986
  688.     pragma Convention(Stdcall, af_1986_AddRef);
  689.  
  690.     type af_1989_Release is access function (
  691.                 This: access IDispatch)
  692.                return Win32.ULONG;                          -- oleauto.h:1989
  693.     pragma Convention(Stdcall, af_1989_Release);
  694.  
  695.     type af_1992_GetTypeInfoCount is access function (
  696.                 This   : access IDispatch;
  697.                 pctinfo: access Win32.UINT)
  698.                return Win32.Objbase.HRESULT;                -- oleauto.h:1992
  699.     pragma Convention(Stdcall, af_1992_GetTypeInfoCount);
  700.  
  701.     type af_1996_GetTypeInfo is access function (
  702.                 This   : access IDispatch;
  703.                 itinfo : Win32.UINT;
  704.                 lcid   : Win32.Winnt.LCID;
  705.                 pptinfo: access LPTYPEINFO)
  706.                return Win32.Objbase.HRESULT;                -- oleauto.h:1996
  707.     pragma Convention(Stdcall, af_1996_GetTypeInfo);
  708.  
  709.     type af_2002_GetIDsOfNames is access function (
  710.                 This     : access IDispatch;
  711.                 riid     : access Win32.Objbase.IID;
  712.                 rgszNames: access Win32.Objbase.LPOLESTR;
  713.                 cNames   : Win32.UINT;
  714.                 lcid     : Win32.Winnt.LCID;
  715.                 rgdispid : access DISPID)
  716.                return Win32.Objbase.HRESULT;                -- oleauto.h:2002
  717.     pragma Convention(Stdcall, af_2002_GetIDsOfNames);
  718.  
  719.     type af_2010_Invoke is access function (
  720.                 This        : access IDispatch;
  721.                 dispidMember: DISPID;
  722.                 riid        : access Win32.Objbase.IID;
  723.                 lcid        : Win32.Winnt.LCID;
  724.                 wFlags      : Win32.WORD;
  725.                 pdispparams : access DISPPARAMS;
  726.                 pvarResult  : access VARIANT;
  727.                 pexcepinfo  : access EXCEPINFO;
  728.                 puArgErr    : access Win32.UINT)
  729.                return Win32.Objbase.HRESULT;                -- oleauto.h:2010
  730.     pragma Convention(Stdcall, af_2010_Invoke);
  731.  
  732.     type af_2169_QueryInterface is access function (
  733.                 This     : access IEnumVARIANT;
  734.                 riid     : access Win32.Objbase.IID;
  735.                 ppvObject: access Win32.PVOID)
  736.                return Win32.Objbase.HRESULT;                -- oleauto.h:2169
  737.     pragma Convention(Stdcall, af_2169_QueryInterface);
  738.  
  739.     type af_2174_AddRef is access function (
  740.                 This: access IEnumVARIANT)
  741.                return Win32.ULONG;                          -- oleauto.h:2174
  742.     pragma Convention(Stdcall, af_2174_AddRef);
  743.  
  744.     type af_2177_Release is access function (
  745.                 This: access IEnumVARIANT)
  746.                return Win32.ULONG;                          -- oleauto.h:2177
  747.     pragma Convention(Stdcall, af_2177_Release);
  748.  
  749.     type af_2180_Next is access function (
  750.                 This        : access IEnumVARIANT;
  751.                 celt        : Win32.ULONG;
  752.                 rgvar       : access VARIANT;
  753.                 pceltFetched: access Win32.ULONG)
  754.                return Win32.Objbase.HRESULT;                -- oleauto.h:2180
  755.     pragma Convention(Stdcall, af_2180_Next);
  756.  
  757.     type af_2186_Skip is access function (
  758.                 This: access IEnumVARIANT;
  759.                 celt: Win32.ULONG)
  760.                return Win32.Objbase.HRESULT;                -- oleauto.h:2186
  761.     pragma Convention(Stdcall, af_2186_Skip);
  762.  
  763.     type af_2190_Reset is access function (
  764.                 This: access IEnumVARIANT)
  765.                return Win32.Objbase.HRESULT;                -- oleauto.h:2190
  766.     pragma Convention(Stdcall, af_2190_Reset);
  767.  
  768.     type af_2193_Clone is access function (
  769.                 This  : access IEnumVARIANT;
  770.                 ppenum: access LPENUMVARIANT)
  771.                return Win32.Objbase.HRESULT;                -- oleauto.h:2193
  772.     pragma Convention(Stdcall, af_2193_Clone);
  773.  
  774.     type af_2363_QueryInterface is access function (
  775.                 This     : access ITypeComp;
  776.                 riid     : access Win32.Objbase.IID;
  777.                 ppvObject: access Win32.PVOID)
  778.                return Win32.Objbase.HRESULT;                -- oleauto.h:2363
  779.     pragma Convention(Stdcall, af_2363_QueryInterface);
  780.  
  781.     type af_2368_AddRef is access function (
  782.                 This: access ITypeComp)
  783.                return Win32.ULONG;                          -- oleauto.h:2368
  784.     pragma Convention(Stdcall, af_2368_AddRef);
  785.  
  786.     type af_2371_Release is access function (
  787.                 This: access ITypeComp)
  788.                return Win32.ULONG;                          -- oleauto.h:2371
  789.     pragma Convention(Stdcall, af_2371_Release);
  790.  
  791.     type af_2374_Bind is access function (
  792.                 This     : access ITypeComp;
  793.                 szName   : Win32.Objbase.LPOLESTR;
  794.                 lHashVal : Win32.ULONG;
  795.                 fFlags   : Win32.WORD;
  796.                 pptinfo  : access LPTYPEINFO;
  797.                 pdesckind: access DESCKIND;
  798.                 pbindptr : access BINDPTR)
  799.                return Win32.Objbase.HRESULT;                -- oleauto.h:2374
  800.     pragma Convention(Stdcall, af_2374_Bind);
  801.  
  802.     type af_2383_BindType is access function (
  803.                 This    : access ITypeComp;
  804.                 szName  : Win32.Objbase.LPOLESTR;
  805.                 lHashVal: Win32.ULONG;
  806.                 pptinfo : access LPTYPEINFO;
  807.                 pptcomp : access LPTYPECOMP)
  808.                return Win32.Objbase.HRESULT;                -- oleauto.h:2383
  809.     pragma Convention(Stdcall, af_2383_BindType);
  810.  
  811.     type af_2577_QueryInterface is access function (
  812.                 This     : access ITypeInfo;
  813.                 riid     : access Win32.Objbase.IID;
  814.                 ppvObject: access Win32.PVOID)
  815.                return Win32.Objbase.HRESULT;                -- oleauto.h:2577
  816.     pragma Convention(Stdcall, af_2577_QueryInterface);
  817.  
  818.     type af_2582_AddRef is access function (
  819.                 This: access ITypeInfo)
  820.                return Win32.ULONG;                          -- oleauto.h:2582
  821.     pragma Convention(Stdcall, af_2582_AddRef);
  822.  
  823.     type af_2585_Release is access function (
  824.                 This: access ITypeInfo)
  825.                return Win32.ULONG;                          -- oleauto.h:2585
  826.     pragma Convention(Stdcall, af_2585_Release);
  827.  
  828.     type af_2588_GetTypeAttr is access function (
  829.                 This      : access ITypeInfo;
  830.                 pptypeattr: access LPTYPEATTR)
  831.                return Win32.Objbase.HRESULT;                -- oleauto.h:2588
  832.     pragma Convention(Stdcall, af_2588_GetTypeAttr);
  833.  
  834.     type af_2592_GetTypeComp is access function (
  835.                 This   : access ITypeInfo;
  836.                 pptcomp: access LPTYPECOMP)
  837.                return Win32.Objbase.HRESULT;                -- oleauto.h:2592
  838.     pragma Convention(Stdcall, af_2592_GetTypeComp);
  839.  
  840.     type af_2596_GetFuncDesc is access function (
  841.                 This       : access ITypeInfo;
  842.                 index      : Win32.UINT;
  843.                 pppfuncdesc: access FUNCDESC)
  844.                return Win32.Objbase.HRESULT;                -- oleauto.h:2596
  845.     pragma Convention(Stdcall, af_2596_GetFuncDesc);
  846.  
  847.     type af_2601_GetVarDesc is access function (
  848.                 This     : access ITypeInfo;
  849.                 index    : Win32.UINT;
  850.                 ppvardesc: access LPVARDESC)
  851.                return Win32.Objbase.HRESULT;                -- oleauto.h:2601
  852.     pragma Convention(Stdcall, af_2601_GetVarDesc);
  853.  
  854.     type af_2606_GetNames is access function (
  855.                 This       : access ITypeInfo;
  856.                 memid      : MEMBERID;
  857.                 rgbstrNames: access BSTR;
  858.                 cMaxNames  : Win32.UINT;
  859.                 pcNames    : access Win32.UINT)
  860.                return Win32.Objbase.HRESULT;                -- oleauto.h:2606
  861.     pragma Convention(Stdcall, af_2606_GetNames);
  862.  
  863.     type af_2613_GetRefTypeOfImplType is access function (
  864.                 This     : access ITypeInfo;
  865.                 index    : Win32.UINT;
  866.                 hpreftype: access HREFTYPE)
  867.                return Win32.Objbase.HRESULT;                -- oleauto.h:2613
  868.     pragma Convention(Stdcall, af_2613_GetRefTypeOfImplType);
  869.  
  870.     type af_2618_GetImplTypeFlags is access function (
  871.                 This          : access ITypeInfo;
  872.                 index         : Win32.UINT;
  873.                 pimpltypeflags: access Win32.INT)
  874.                return Win32.Objbase.HRESULT;                -- oleauto.h:2618
  875.     pragma Convention(Stdcall, af_2618_GetImplTypeFlags);
  876.  
  877.     type af_2623_GetIDsOfNames is access function (
  878.                 This       : access ITypeInfo;
  879.                 rglpszNames: access Win32.PWSTR;
  880.                 cNames     : Win32.UINT;
  881.                 rgmemid    : access MEMBERID)
  882.                return Win32.Objbase.HRESULT;                -- oleauto.h:2623
  883.     pragma Convention(Stdcall, af_2623_GetIDsOfNames);
  884.  
  885.     type af_2629_Invoke is access function (
  886.                 This       : access ITypeInfo;
  887.                 pvInstance : Win32.PVOID;
  888.                 memid      : MEMBERID;
  889.                 wFlags     : Win32.WORD;
  890.                 pdispparams: access DISPPARAMS;
  891.                 pvarResult : access VARIANT;
  892.                 pexcepinfo : access EXCEPINFO;
  893.                 puArgErr   : access Win32.UINT)
  894.                return Win32.Objbase.HRESULT;                -- oleauto.h:2629
  895.     pragma Convention(Stdcall, af_2629_Invoke);
  896.  
  897.     type af_2639_GetDocumentation is access function (
  898.                 This          : access ITypeInfo;
  899.                 memid         : MEMBERID;
  900.                 pbstrName     : access BSTR;
  901.                 pbstrDocString: access BSTR;
  902.                 pdwHelpContext: access Win32.DWORD;
  903.                 pbstrHelpFile : access BSTR)
  904.                return Win32.Objbase.HRESULT;                -- oleauto.h:2639
  905.     pragma Convention(Stdcall, af_2639_GetDocumentation);
  906.  
  907.     type af_2647_GetDllEntry is access function (
  908.                 This        : access ITypeInfo;
  909.                 memid       : MEMBERID;
  910.                 invkind     : INVOKEKIND;
  911.                 pbstrDllName: access BSTR;
  912.                 pbstrName   : access BSTR;
  913.                 pwOrdinal   : access Win32.WORD)
  914.                return Win32.Objbase.HRESULT;                -- oleauto.h:2647
  915.     pragma Convention(Stdcall, af_2647_GetDllEntry);
  916.  
  917.     type af_2655_GetRefTypeInfo is access function (
  918.                 This    : access ITypeInfo;
  919.                 hreftype: Win32.Oleauto.HREFTYPE;
  920.                 pptinfo : access LPTYPEINFO)
  921.                return Win32.Objbase.HRESULT;                -- oleauto.h:2655
  922.     pragma Convention(Stdcall, af_2655_GetRefTypeInfo);
  923.  
  924.     type af_2660_AddressOfMember is access function (
  925.                 This   : access ITypeInfo;
  926.                 memid  : MEMBERID;
  927.                 invkind: INVOKEKIND;
  928.                 ppv    : access Win32.PVOID)
  929.                return Win32.Objbase.HRESULT;                -- oleauto.h:2660
  930.     pragma Convention(Stdcall, af_2660_AddressOfMember);
  931.  
  932.     type af_2666_CreateInstance is access function (
  933.                 This     : access ITypeInfo;
  934.                 puncOuter: access Win32.Objbase.IUnknown;
  935.                 riid     : access Win32.Objbase.IID;
  936.                 ppvObj   : access Win32.PVOID)
  937.                return Win32.Objbase.HRESULT;                -- oleauto.h:2666
  938.     pragma Convention(Stdcall, af_2666_CreateInstance);
  939.  
  940.     type af_2672_GetMops is access function (
  941.                 This     : access ITypeInfo;
  942.                 memid    : MEMBERID;
  943.                 pbstrMops: access BSTR)
  944.                return Win32.Objbase.HRESULT;                -- oleauto.h:2672
  945.     pragma Convention(Stdcall, af_2672_GetMops);
  946.  
  947.     type af_2677_GetContainingTypeLib is access function (
  948.                 This  : access ITypeInfo;
  949.                 pptlib: access LPTYPELIB;
  950.                 pindex: access Win32.UINT)
  951.                return Win32.Objbase.HRESULT;                -- oleauto.h:2677
  952.     pragma Convention(Stdcall, af_2677_GetContainingTypeLib);
  953.  
  954.     type ap_2682_ReleaseTypeAttr is access procedure (
  955.                 This     : access ITypeInfo;
  956.                 ptypeattr: access TYPEATTR);                -- oleauto.h:2682
  957.     pragma Convention(Stdcall, ap_2682_ReleaseTypeAttr);
  958.  
  959.     type ap_2686_ReleaseFuncDesc is access procedure (
  960.                 This     : access ITypeInfo;
  961.                 pfuncdesc: access FUNCDESC);                -- oleauto.h:2686
  962.     pragma Convention(Stdcall, ap_2686_ReleaseFuncDesc);
  963.  
  964.     type ap_2690_ReleaseVarDesc is access procedure (
  965.                 This    : access ITypeInfo;
  966.                 pvardesc: access VARDESC);                  -- oleauto.h:2690
  967.     pragma Convention(Stdcall, ap_2690_ReleaseVarDesc);
  968.  
  969.     type af_3144_QueryInterface is access function (
  970.                 This     : access ITypeLib;
  971.                 riid     : access Win32.Objbase.IID;
  972.                 ppvObject: access Win32.PVOID)
  973.                return Win32.Objbase.HRESULT;                -- oleauto.h:3144
  974.     pragma Convention(Stdcall, af_3144_QueryInterface);
  975.  
  976.     type af_3149_AddRef is access function (
  977.                 This: access ITypeLib)
  978.                return Win32.ULONG;                          -- oleauto.h:3149
  979.     pragma Convention(Stdcall, af_3149_AddRef);
  980.  
  981.     type af_3152_Release is access function (
  982.                 This: access ITypeLib)
  983.                return Win32.ULONG;                          -- oleauto.h:3152
  984.     pragma Convention(Stdcall, af_3152_Release);
  985.  
  986.     type af_3155_GetTypeInfoCount is access function (
  987.                 This: access ITypeLib)
  988.                return Win32.UINT;                           -- oleauto.h:3155
  989.     pragma Convention(Stdcall, af_3155_GetTypeInfoCount);
  990.  
  991.     type af_3158_GetTypeInfo is access function (
  992.                 This    : access ITypeLib;
  993.                 index   : Win32.UINT;
  994.                 ppitinfo: access LPTYPEINFO)
  995.                return Win32.Objbase.HRESULT;                -- oleauto.h:3158
  996.     pragma Convention(Stdcall, af_3158_GetTypeInfo);
  997.  
  998.     type af_3163_GetTypeInfoType is access function (
  999.                 This  : access ITypeLib;
  1000.                 index : Win32.UINT;
  1001.                 ptkind: access TYPEKIND)
  1002.                return Win32.Objbase.HRESULT;                -- oleauto.h:3163
  1003.     pragma Convention(Stdcall, af_3163_GetTypeInfoType);
  1004.  
  1005.     type af_3168_GetTypeInfoOfGuid is access function (
  1006.                 This   : access ITypeLib;
  1007.                 guid   : access Win32.Rpcdce.GUID;
  1008.                 pptinfo: access LPTYPEINFO)
  1009.                return Win32.Objbase.HRESULT;                -- oleauto.h:3168
  1010.     pragma Convention(Stdcall, af_3168_GetTypeInfoOfGuid);
  1011.  
  1012.     type af_3173_GetLibAttr is access function (
  1013.                 This      : access ITypeLib;
  1014.                 pptlibattr: access LPTLIBATTR)
  1015.                return Win32.Objbase.HRESULT;                -- oleauto.h:3173
  1016.     pragma Convention(Stdcall, af_3173_GetLibAttr);
  1017.  
  1018.     type af_3177_GetTypeComp is access function (
  1019.                 This   : access ITypeLib;
  1020.                 pptcomp: access LPTYPECOMP)
  1021.                return Win32.Objbase.HRESULT;                -- oleauto.h:3177
  1022.     pragma Convention(Stdcall, af_3177_GetTypeComp);
  1023.  
  1024.     type af_3181_GetDocumentation is access function (
  1025.                 This          : access ITypeLib;
  1026.                 index         : Win32.INT;
  1027.                 pbstrName     : access BSTR;
  1028.                 pbstrDocString: access BSTR;
  1029.                 pdwHelpContext: access Win32.DWORD;
  1030.                 pbstrHelpFile : access BSTR)
  1031.                return Win32.Objbase.HRESULT;                -- oleauto.h:3181
  1032.     pragma Convention(Stdcall, af_3181_GetDocumentation);
  1033.  
  1034.     type af_3189_IsName is access function (
  1035.                 This     : access ITypeLib;
  1036.                 szNameBuf: Win32.Objbase.LPOLESTR;
  1037.                 lHashVal : Win32.ULONG;
  1038.                 pfName   : access Win32.BOOL)
  1039.                return Win32.Objbase.HRESULT;                -- oleauto.h:3189
  1040.     pragma Convention(Stdcall, af_3189_IsName);
  1041.  
  1042.     type af_3195_FindName is access function (
  1043.                 This     : access ITypeLib;
  1044.                 szNameBuf: Win32.Objbase.LPOLESTR;
  1045.                 lHashVal : Win32.ULONG;
  1046.                 rgptinfo : access LPTYPEINFO;
  1047.                 rgmemid  : access MEMBERID;
  1048.                 pcFound  : access Win32.USHORT)
  1049.                return Win32.Objbase.HRESULT;                -- oleauto.h:3195
  1050.     pragma Convention(Stdcall, af_3195_FindName);
  1051.  
  1052.     type ap_3203_ReleaseTLibAttr is access procedure (
  1053.                 This     : access ITypeLib;
  1054.                 ptlibattr: access TLIBATTR);                -- oleauto.h:3203
  1055.     pragma Convention(Stdcall, ap_3203_ReleaseTLibAttr);
  1056.  
  1057.     type af_3446_QueryInterface is access function (
  1058.                 This     : access IErrorInfo;
  1059.                 riid     : access Win32.Objbase.IID;
  1060.                 ppvObject: access Win32.PVOID)
  1061.                return Win32.Objbase.HRESULT;                -- oleauto.h:3446
  1062.     pragma Convention(Stdcall, af_3446_QueryInterface);
  1063.  
  1064.     type af_3451_AddRef is access function (
  1065.                 This: access IErrorInfo)
  1066.                return Win32.ULONG;                          -- oleauto.h:3451
  1067.     pragma Convention(Stdcall, af_3451_AddRef);
  1068.  
  1069.     type af_3454_Release is access function (
  1070.                 This: access IErrorInfo)
  1071.                return Win32.ULONG;                          -- oleauto.h:3454
  1072.     pragma Convention(Stdcall, af_3454_Release);
  1073.  
  1074.     type af_3457_GetGUID is access function (
  1075.                 This : access IErrorInfo;
  1076.                 pguid: access Win32.Rpcdce.GUID)
  1077.                return Win32.Objbase.HRESULT;                -- oleauto.h:3457
  1078.     pragma Convention(Stdcall, af_3457_GetGUID);
  1079.  
  1080.     type af_3461_GetSource is access function (
  1081.                 This       : access IErrorInfo;
  1082.                 pbstrSource: access BSTR)
  1083.                return Win32.Objbase.HRESULT;                -- oleauto.h:3461
  1084.     pragma Convention(Stdcall, af_3461_GetSource);
  1085.  
  1086.     type af_3465_GetDescription is access function (
  1087.                 This            : access IErrorInfo;
  1088.                 pbstrDescription: access BSTR)
  1089.                return Win32.Objbase.HRESULT;                -- oleauto.h:3465
  1090.     pragma Convention(Stdcall, af_3465_GetDescription);
  1091.  
  1092.     type af_3469_GetHelpFile is access function (
  1093.                 This         : access IErrorInfo;
  1094.                 pbstrHelpFile: access BSTR)
  1095.                return Win32.Objbase.HRESULT;                -- oleauto.h:3469
  1096.     pragma Convention(Stdcall, af_3469_GetHelpFile);
  1097.  
  1098.     type af_3473_GetHelpContext is access function (
  1099.                 This          : access IErrorInfo;
  1100.                 pdwHelpContext: access Win32.DWORD)
  1101.                return Win32.Objbase.HRESULT;                -- oleauto.h:3473
  1102.     pragma Convention(Stdcall, af_3473_GetHelpContext);
  1103.  
  1104.     type af_3629_QueryInterface is access function (
  1105.                 This     : access ICreateErrorInfo;
  1106.                 riid     : access Win32.Objbase.IID;
  1107.                 ppvObject: access Win32.PVOID)
  1108.                return Win32.Objbase.HRESULT;                -- oleauto.h:3629
  1109.     pragma Convention(Stdcall, af_3629_QueryInterface);
  1110.  
  1111.     type af_3634_AddRef is access function (
  1112.                 This: access ICreateErrorInfo)
  1113.                return Win32.ULONG;                          -- oleauto.h:3634
  1114.     pragma Convention(Stdcall, af_3634_AddRef);
  1115.  
  1116.     type af_3637_Release is access function (
  1117.                 This: access ICreateErrorInfo)
  1118.                return Win32.ULONG;                          -- oleauto.h:3637
  1119.     pragma Convention(Stdcall, af_3637_Release);
  1120.  
  1121.     type af_3640_SetGUID is access function (
  1122.                 This : access ICreateErrorInfo;
  1123.                 rguid: access Win32.Rpcdce.GUID)
  1124.                return Win32.Objbase.HRESULT;                -- oleauto.h:3640
  1125.     pragma Convention(Stdcall, af_3640_SetGUID);
  1126.  
  1127.     type af_3644_SetSource is access function (
  1128.                 This    : access ICreateErrorInfo;
  1129.                 szSource: Win32.Objbase.LPOLESTR)
  1130.                return Win32.Objbase.HRESULT;                -- oleauto.h:3644
  1131.     pragma Convention(Stdcall, af_3644_SetSource);
  1132.  
  1133.     type af_3648_SetDescription is access function (
  1134.                 This         : access ICreateErrorInfo;
  1135.                 szDescription: Win32.Objbase.LPOLESTR)
  1136.                return Win32.Objbase.HRESULT;                -- oleauto.h:3648
  1137.     pragma Convention(Stdcall, af_3648_SetDescription);
  1138.  
  1139.     type af_3652_SetHelpFile is access function (
  1140.                 This      : access ICreateErrorInfo;
  1141.                 szHelpFile: Win32.Objbase.LPOLESTR)
  1142.                return Win32.Objbase.HRESULT;                -- oleauto.h:3652
  1143.     pragma Convention(Stdcall, af_3652_SetHelpFile);
  1144.  
  1145.     type af_3656_SetHelpContext is access function (
  1146.                 This         : access ICreateErrorInfo;
  1147.                 dwHelpContext: Win32.DWORD)
  1148.                return Win32.Objbase.HRESULT;                -- oleauto.h:3656
  1149.     pragma Convention(Stdcall, af_3656_SetHelpContext);
  1150.  
  1151.     type af_3800_QueryInterface is access function (
  1152.                 This     : access ISupportErrorInfo;
  1153.                 riid     : access Win32.Objbase.IID;
  1154.                 ppvObject: access Win32.PVOID)
  1155.                return Win32.Objbase.HRESULT;                -- oleauto.h:3800
  1156.     pragma Convention(Stdcall, af_3800_QueryInterface);
  1157.  
  1158.     type af_3805_AddRef is access function (
  1159.                 This: access ISupportErrorInfo)
  1160.                return Win32.ULONG;                          -- oleauto.h:3805
  1161.     pragma Convention(Stdcall, af_3805_AddRef);
  1162.  
  1163.     type af_3808_Release is access function (
  1164.                 This: access ISupportErrorInfo)
  1165.                return Win32.ULONG;                          -- oleauto.h:3808
  1166.     pragma Convention(Stdcall, af_3808_Release);
  1167.  
  1168.     type af_3811_InterfaceSupportsErrorInfo is access function (
  1169.                 This: access ISupportErrorInfo;
  1170.                 riid: access Win32.Objbase.IID)
  1171.                return Win32.Objbase.HRESULT;                -- oleauto.h:3811
  1172.     pragma Convention(Stdcall, af_3811_InterfaceSupportsErrorInfo);
  1173.  
  1174.     type ICreateTypeInfo is                                 -- oleauto.h:114
  1175.         record
  1176.             lpVtbl: a_ICreateTypeInfoVtbl_t;                -- oleauto.h:1210
  1177.         end record;
  1178.  
  1179.     type ICreateTypeLib is                                  -- oleauto.h:120
  1180.         record
  1181.             lpVtbl: a_ICreateTypeLibVtbl_t;                 -- oleauto.h:1717
  1182.         end record;
  1183.  
  1184.     type IDispatch is                                       -- oleauto.h:126
  1185.         record
  1186.             lpVtbl: a_IDispatchVtbl_t;                      -- oleauto.h:2025
  1187.         end record;
  1188.  
  1189.     type IEnumVARIANT is                                    -- oleauto.h:132
  1190.         record
  1191.             lpVtbl: a_IEnumVARIANTVtbl_t;                   -- oleauto.h:2201
  1192.         end record;
  1193.  
  1194.     type ITypeComp is                                       -- oleauto.h:138
  1195.         record
  1196.             lpVtbl: a_ITypeCompVtbl_t;                      -- oleauto.h:2394
  1197.         end record;
  1198.  
  1199.     type ITypeInfo is                                       -- oleauto.h:144
  1200.         record
  1201.             lpVtbl: a_ITypeInfoVtbl_t;                      -- oleauto.h:2698
  1202.         end record;
  1203.  
  1204.     type ITypeLib is                                        -- oleauto.h:150
  1205.         record
  1206.             lpVtbl: a_ITypeLibVtbl_t;                       -- oleauto.h:3211
  1207.         end record;
  1208.  
  1209.     type IErrorInfo is                                      -- oleauto.h:156
  1210.         record
  1211.             lpVtbl: a_IErrorInfoVtbl_t;                     -- oleauto.h:3481
  1212.         end record;
  1213.  
  1214.     type ICreateErrorInfo is                                -- oleauto.h:162
  1215.         record
  1216.             lpVtbl: a_ICreateErrorInfoVtbl_t;               -- oleauto.h:3664
  1217.         end record;
  1218.  
  1219.     type ISupportErrorInfo is                               -- oleauto.h:168
  1220.         record
  1221.             lpVtbl: a_ISupportErrorInfoVtbl_t;              -- oleauto.h:3819
  1222.         end record;
  1223.  
  1224.     type OLECHAR_Array is array (Natural range <>) of Win32.Objbase.OLECHAR;
  1225.     type XBSTR is                                           -- oleauto.h:211
  1226.         record
  1227.             cbSize    : Win32.ULONG;                        -- oleauto.h:213
  1228.             rgBstrData: OLECHAR_Array(0..Win32.ANYSIZE_ARRAY);
  1229.                                                             -- oleauto.h:214
  1230.         end record;
  1231.  
  1232.     type BLOB is                                            -- oleauto.h:228
  1233.         record
  1234.             cbSize   : Win32.ULONG;                         -- oleauto.h:230
  1235.             pBlobData: Win32.PBYTE;                         -- oleauto.h:231
  1236.         end record;
  1237.  
  1238.     type CLIPDATA is                                        -- oleauto.h:242
  1239.         record
  1240.             cbSize   : Win32.ULONG;                         -- oleauto.h:244
  1241.             ulClipFmt: Win32.LONG;                          -- oleauto.h:245
  1242.             pClipData: Win32.PBYTE;                         -- oleauto.h:246
  1243.         end record;
  1244.  
  1245.     type SAFEARRAYBOUND is                                  -- oleauto.h:255
  1246.         record
  1247.             cElements: Win32.ULONG;                         -- oleauto.h:257
  1248.             lLbound  : Win32.LONG;                          -- oleauto.h:258
  1249.         end record;
  1250.  
  1251.     type SAFEARRAYBOUND_Array is                            -- oleauto.h:298
  1252.         array(integer range 0..Win32.ANYSIZE_Array)
  1253.         of aliased SAFEARRAYBOUND;
  1254.  
  1255.     type SAFEARRAY is                                       -- oleauto.h:286
  1256.         record
  1257.             cDims     : Win32.USHORT;                       -- oleauto.h:287
  1258.             fFeatures : Win32.USHORT;                       -- oleauto.h:288
  1259.             cbElements: Win32.ULONG;                        -- oleauto.h:290
  1260.             cLocks    : Win32.ULONG;                        -- oleauto.h:291
  1261.             pvData    : Win32.PBYTE;                        -- oleauto.h:297
  1262.             rgsabound : SAFEARRAYBOUND_Array;               -- oleauto.h:298
  1263.         end record;
  1264.  
  1265.     type CY is                                              -- oleauto.h:336
  1266.         record
  1267.             Lo: Win32.ULONG;                                -- oleauto.h:338
  1268.             Hi: Win32.LONG;                                 -- oleauto.h:339
  1269.         end record;
  1270.  
  1271.     subtype CURRENCY is CY;                                 -- oleauto.h:344
  1272.  
  1273.     type union_anonymous4_t_kind is (                       -- oleauto.h:582
  1274.         bVal_kind,
  1275.         iVal_kind,
  1276.         lVal_kind,
  1277.         fltVal_kind,
  1278.         dblVal_kind,
  1279.         bool_kind,
  1280.         scode_kind,
  1281.         cyVal_kind,
  1282.         date_kind,
  1283.         bstrVal_kind,
  1284.         punkVal_kind,
  1285.         pdispVal_kind,
  1286.         parray_kind,
  1287.         pbVal_kind,
  1288.         piVal_kind,
  1289.         plVal_kind,
  1290.         pfltVal_kind,
  1291.         pdblVal_kind,
  1292.         pbool_kind,
  1293.         pscode_kind,
  1294.         pcyVal_kind,
  1295.         pdate_kind,
  1296.         pbstrVal_kind,
  1297.         ppunkVal_kind,
  1298.         ppdispVal_kind,
  1299.         pparray_kind,
  1300.         pvarVal_kind,
  1301.         byref_kind
  1302.     );
  1303.  
  1304.     type a_a_IUnknown is access all Win32.Objbase.LPUNKNOWN;
  1305.  
  1306.     type union_anonymous4_t (Which: union_anonymous4_t_kind := cyVal_kind) is
  1307.                                                             -- oleauto.h:582
  1308.         record
  1309.             case Which is
  1310.                 when bVal_kind =>
  1311.                     bVal: Win32.UCHAR;                      -- oleauto.h:554
  1312.                 when iVal_kind =>
  1313.                     iVal: Win32.SHORT;                      -- oleauto.h:555
  1314.                 when lVal_kind =>
  1315.                     lVal: Win32.LONG;                       -- oleauto.h:556
  1316.                 when fltVal_kind =>
  1317.                     fltVal: Win32.FLOAT;                    -- oleauto.h:557
  1318.                 when dblVal_kind =>
  1319.                     dblVal: Win32.DOUBLE;                   -- oleauto.h:558
  1320.                 when bool_kind =>
  1321.                     bool: VARIANT_BOOL;                     -- oleauto.h:559
  1322.                 when scode_kind =>
  1323.                     scode: Win32.Objbase.SCODE;             -- oleauto.h:560
  1324.                 when cyVal_kind =>
  1325.                     cyVal: CY;                              -- oleauto.h:561
  1326.                 when date_kind =>
  1327.                     date: Win32.Oleauto.DATE;               -- oleauto.h:562
  1328.                 when bstrVal_kind =>
  1329.                     bstrVal: BSTR;                          -- oleauto.h:563
  1330.                 when punkVal_kind =>
  1331.                     punkVal: Win32.Objbase.LPUNKNOWN;       -- oleauto.h:564
  1332.                 when pdispVal_kind =>
  1333.                     pdispVal: LPDISPATCH;                   -- oleauto.h:565
  1334.                 when parray_kind =>
  1335.                     parray: LPSAFEARRAY;                    -- oleauto.h:566
  1336.                 when pbVal_kind =>
  1337.                     pbVal: Win32.PUCHAR;                    -- oleauto.h:567
  1338.                 when piVal_kind =>
  1339.                     piVal: Win32.PSHORT;                    -- oleauto.h:568
  1340.                 when plVal_kind =>
  1341.                     plVal: Win32.PLONG;                     -- oleauto.h:569
  1342.                 when pfltVal_kind =>
  1343.                     pfltVal: Win32.PFLOAT;                  -- oleauto.h:570
  1344.                 when pdblVal_kind =>
  1345.                     pdblVal: Win32.PDOUBLE;                 -- oleauto.h:571
  1346.                 when pbool_kind =>
  1347.                     pbool: PVARIANT_BOOL;                   -- oleauto.h:572
  1348.                 when pscode_kind =>
  1349.                     pscode: Win32.Objbase.PSCODE;           -- oleauto.h:573
  1350.                 when pcyVal_kind =>
  1351.                     pcyVal: PCY;                            -- oleauto.h:574
  1352.                 when pdate_kind =>
  1353.                     pdate: Win32.Oleauto.PDATE;             -- oleauto.h:575
  1354.                 when pbstrVal_kind =>
  1355.                     pbstrVal: LPBSTR;                       -- oleauto.h:576
  1356.                 when ppunkVal_kind =>
  1357.                     ppunkVal: a_a_IUnknown;                 -- oleauto.h:577
  1358.                 when ppdispVal_kind =>
  1359.                     ppdispVal: a_LPDISPATCH_t;              -- oleauto.h:578
  1360.                 when pparray_kind =>
  1361.                     pparray: PLPSAFEARRAY;                  -- oleauto.h:579
  1362.                 when pvarVal_kind =>
  1363.                     pvarVal: LPVARIANT;
  1364.                                                             -- oleauto.h:580
  1365.                 when byref_kind =>
  1366.                     byref: Win32.PVOID;                     -- oleauto.h:581
  1367.             end case;
  1368.         end record;
  1369.  
  1370.     pragma Convention(C, union_anonymous4_t);
  1371.     pragma Unchecked_Union(union_anonymous4_t);
  1372.  
  1373.     type union_anonymous5_t_kind is (                       -- oleauto.h:661
  1374.         lptdesc_kind,
  1375.         lpadesc_kind,
  1376.         hreftype_kind
  1377.     );
  1378.  
  1379.     type union_anonymous5_t (Which: union_anonymous5_t_kind := lptdesc_kind) is
  1380.                                                             -- oleauto.h:661
  1381.         record
  1382.             case Which is
  1383.                 when lptdesc_kind =>
  1384.                     lptdesc: a_TYPEDESC_t;                  -- oleauto.h:658
  1385.                 when lpadesc_kind =>
  1386.                     lpadesc: a_ARRAYDESC_t;                 -- oleauto.h:659
  1387.                 when hreftype_kind =>
  1388.                     hreftype: Win32.Oleauto.HREFTYPE;       -- oleauto.h:660
  1389.             end case;
  1390.         end record;
  1391.  
  1392.     pragma Convention(C, union_anonymous5_t);
  1393.     pragma Unchecked_Union(union_anonymous5_t);
  1394.  
  1395.     type IDLDESC is                                         -- oleauto.h:692
  1396.         record
  1397.             dwReserved: Win32.ULONG;                        -- oleauto.h:694
  1398.             wIDLFlags : Win32.USHORT;                       -- oleauto.h:695
  1399.         end record;
  1400.  
  1401.     type PDISPID is access all Win32.Oleauto.DISPID;       -- oleauto.h:763
  1402.  
  1403.     type DISPPARAMS is                                      -- oleauto.h:760
  1404.         record
  1405.             rgvarg           : LPVARIANT;                   -- oleauto.h:762
  1406.             rgdispidNamedArgs: PDISPID;                     -- oleauto.h:763
  1407.             cArgs            : Win32.UINT;                  -- oleauto.h:764
  1408.             cNamedArgs       : Win32.UINT;                  -- oleauto.h:765
  1409.         end record;
  1410.  
  1411.     type RemEXCEPINFO is                                    -- oleauto.h:769
  1412.         record
  1413.             wCode        : Win32.WORD;                      -- oleauto.h:771
  1414.             wReserved    : Win32.WORD;                      -- oleauto.h:772
  1415.             dwHelpContext: Win32.DWORD;                     -- oleauto.h:773
  1416.             scode        : Win32.DWORD;                     -- oleauto.h:774
  1417.             cSource      : Win32.DWORD;                     -- oleauto.h:775
  1418.             cDescription : Win32.DWORD;                     -- oleauto.h:776
  1419.             cHelpFile    : Win32.DWORD;                     -- oleauto.h:777
  1420.             strings      : OLECHAR_Array(0..Win32.ANYSIZE_ARRAY);
  1421.                                                             -- oleauto.h:778
  1422.         end record;
  1423.  
  1424.     type EXCEPINFO is                                       -- oleauto.h:809
  1425.         record
  1426.             wCode            : Win32.WORD;                  -- oleauto.h:802
  1427.             wReserved        : Win32.WORD;                  -- oleauto.h:803
  1428.             bstrSource       : BSTR;                        -- oleauto.h:804
  1429.             bstrDescription  : BSTR;                        -- oleauto.h:805
  1430.             bstrHelpFile     : BSTR;                        -- oleauto.h:806
  1431.             dwHelpContext    : Win32.DWORD;                 -- oleauto.h:807
  1432.             pvReserved       : Win32.PVOID;                 -- oleauto.h:808
  1433.             pfnDeferredFillIn: af_809_pfnDeferredFillIn;    -- oleauto.h:809
  1434.             scode            : Win32.Objbase.SCODE;         -- oleauto.h:810
  1435.         end record;
  1436.  
  1437.     type union_anonymous6_t_kind is (                       -- oleauto.h:910
  1438.         oInst_kind,
  1439.         lpvarValue_kind
  1440.     );
  1441.  
  1442.     type union_anonymous6_t (Which: union_anonymous6_t_kind := oInst_kind) is
  1443.                                                             -- oleauto.h:910
  1444.         record
  1445.             case Which is
  1446.                 when oInst_kind =>
  1447.                     oInst: Win32.ULONG;                     -- oleauto.h:908
  1448.                 when lpvarValue_kind =>
  1449.                     lpvarValue: LPVARIANT;   
  1450.                                                             -- oleauto.h:909
  1451.             end case;
  1452.         end record;
  1453.  
  1454.     pragma Convention(C, union_anonymous6_t);
  1455.     pragma Unchecked_Union(union_anonymous6_t);
  1456.  
  1457.     type ICreateTypeInfoVtbl is                             -- oleauto.h:1085
  1458.         record
  1459.             QueryInterface      : af_1088_QueryInterface;   -- oleauto.h:1088
  1460.             AddRef              : af_1093_AddRef;           -- oleauto.h:1093
  1461.             Release             : af_1096_Release;          -- oleauto.h:1096
  1462.             SetGuid             : af_1099_SetGuid;          -- oleauto.h:1099
  1463.             SetTypeFlags        : af_1103_SetTypeFlags;     -- oleauto.h:1103
  1464.             SetDocString        : af_1107_SetDocString;     -- oleauto.h:1107
  1465.             SetHelpContext      : af_1111_SetHelpContext;   -- oleauto.h:1111
  1466.             SetVersion          : af_1115_SetVersion;       -- oleauto.h:1115
  1467.             AddRefTypeInfo      : af_1120_AddRefTypeInfo;   -- oleauto.h:1120
  1468.             AddFuncDesc         : af_1125_AddFuncDesc;      -- oleauto.h:1125
  1469.             AddImplType         : af_1130_AddImplType;      -- oleauto.h:1130
  1470.             SetImplTypeFlags    : af_1135_SetImplTypeFlags; -- oleauto.h:1135
  1471.             SetAlignment        : af_1140_SetAlignment;     -- oleauto.h:1140
  1472.             SetSchema           : af_1144_SetSchema;        -- oleauto.h:1144
  1473.             AddVarDesc          : af_1148_AddVarDesc;       -- oleauto.h:1148
  1474.             SetFuncAndParamNames: af_1153_SetFuncAndParamNames;
  1475.                                                             -- oleauto.h:1153
  1476.             SetVarName          : af_1159_SetVarName;       -- oleauto.h:1159
  1477.             SetTypeDescAlias    : af_1164_SetTypeDescAlias; -- oleauto.h:1164
  1478.             DefineFuncAsDllEntry: af_1168_DefineFuncAsDllEntry;
  1479.                                                             -- oleauto.h:1168
  1480.             SetFuncDocString    : af_1174_SetFuncDocString; -- oleauto.h:1174
  1481.             SetVarDocString     : af_1179_SetVarDocString;  -- oleauto.h:1179
  1482.             SetFuncHelpContext  : af_1184_SetFuncHelpContext;
  1483.                                                             -- oleauto.h:1184
  1484.             SetVarHelpContext   : af_1189_SetVarHelpContext;-- oleauto.h:1189
  1485.             SetMops             : af_1194_SetMops;          -- oleauto.h:1194
  1486.             SetTypeIdldesc      : af_1199_SetTypeIdldesc;   -- oleauto.h:1199
  1487.             LayOut              : af_1203_LayOut;           -- oleauto.h:1203
  1488.         end record;
  1489.  
  1490.     type ICreateTypeLibVtbl is                              -- oleauto.h:1657
  1491.         record
  1492.             QueryInterface : af_1660_QueryInterface;        -- oleauto.h:1660
  1493.             AddRef         : af_1665_AddRef;                -- oleauto.h:1665
  1494.             Release        : af_1668_Release;               -- oleauto.h:1668
  1495.             CreateTypeInfo : af_1671_CreateTypeInfo;        -- oleauto.h:1671
  1496.             SetName        : af_1677_SetName;               -- oleauto.h:1677
  1497.             SetVersion     : af_1681_SetVersion;            -- oleauto.h:1681
  1498.             SetGuid        : af_1686_SetGuid;               -- oleauto.h:1686
  1499.             SetDocString   : af_1690_SetDocString;          -- oleauto.h:1690
  1500.             SetHelpFileName: af_1694_SetHelpFileName;       -- oleauto.h:1694
  1501.             SetHelpContext : af_1698_SetHelpContext;        -- oleauto.h:1698
  1502.             SetLcid        : af_1702_SetLcid;               -- oleauto.h:1702
  1503.             SetLibFlags    : af_1706_SetLibFlags;           -- oleauto.h:1706
  1504.             SaveAllChanges : af_1710_SaveAllChanges;        -- oleauto.h:1710
  1505.         end record;
  1506.  
  1507.     type IDispatchVtbl is                                   -- oleauto.h:1978
  1508.         record
  1509.             QueryInterface  : af_1981_QueryInterface;       -- oleauto.h:1981
  1510.             AddRef          : af_1986_AddRef;               -- oleauto.h:1986
  1511.             Release         : af_1989_Release;              -- oleauto.h:1989
  1512.             GetTypeInfoCount: af_1992_GetTypeInfoCount;     -- oleauto.h:1992
  1513.             GetTypeInfo     : af_1996_GetTypeInfo;          -- oleauto.h:1996
  1514.             GetIDsOfNames   : af_2002_GetIDsOfNames;        -- oleauto.h:2002
  1515.             Invoke          : af_2010_Invoke;               -- oleauto.h:2010
  1516.         end record;
  1517.  
  1518.     type IEnumVARIANTVtbl is                                -- oleauto.h:2166
  1519.         record
  1520.             QueryInterface: af_2169_QueryInterface;         -- oleauto.h:2169
  1521.             AddRef        : af_2174_AddRef;                 -- oleauto.h:2174
  1522.             Release       : af_2177_Release;                -- oleauto.h:2177
  1523.             Next          : af_2180_Next;                   -- oleauto.h:2180
  1524.             Skip          : af_2186_Skip;                   -- oleauto.h:2186
  1525.             Reset         : af_2190_Reset;                  -- oleauto.h:2190
  1526.             Clone         : af_2193_Clone;                  -- oleauto.h:2193
  1527.         end record;
  1528.  
  1529.     type BINDPTR_kind is (                                  -- oleauto.h:2321
  1530.         lpfuncdesc_kind,
  1531.         lpvardesc_kind,
  1532.         lptcomp_kind
  1533.     );
  1534.  
  1535.     type BINDPTR (Which: BINDPTR_kind := lpfuncdesc_kind) is-- oleauto.h:2321
  1536.         record
  1537.             case Which is
  1538.                 when lpfuncdesc_kind =>
  1539.                     lpfuncdesc: Win32.Oleauto.LPFUNCDESC;   -- oleauto.h:2323
  1540.                 when lpvardesc_kind =>
  1541.                     lpvardesc: Win32.Oleauto.LPVARDESC;     -- oleauto.h:2324
  1542.                 when lptcomp_kind =>
  1543.                     lptcomp: LPTYPECOMP;                    -- oleauto.h:2325
  1544.             end case;
  1545.         end record;
  1546.  
  1547.     pragma Convention(C, BINDPTR);
  1548.     pragma Unchecked_Union(BINDPTR);
  1549.  
  1550.     type ITypeCompVtbl is                                   -- oleauto.h:2360
  1551.         record
  1552.             QueryInterface: af_2363_QueryInterface;         -- oleauto.h:2363
  1553.             AddRef        : af_2368_AddRef;                 -- oleauto.h:2368
  1554.             Release       : af_2371_Release;                -- oleauto.h:2371
  1555.             Bind          : af_2374_Bind;                   -- oleauto.h:2374
  1556.             BindType      : af_2383_BindType;               -- oleauto.h:2383
  1557.         end record;
  1558.  
  1559.     type ITypeInfoVtbl is                                   -- oleauto.h:2574
  1560.         record
  1561.             QueryInterface      : af_2577_QueryInterface;   -- oleauto.h:2577
  1562.             AddRef              : af_2582_AddRef;           -- oleauto.h:2582
  1563.             Release             : af_2585_Release;          -- oleauto.h:2585
  1564.             GetTypeAttr         : af_2588_GetTypeAttr;      -- oleauto.h:2588
  1565.             GetTypeComp         : af_2592_GetTypeComp;      -- oleauto.h:2592
  1566.             GetFuncDesc         : af_2596_GetFuncDesc;      -- oleauto.h:2596
  1567.             GetVarDesc          : af_2601_GetVarDesc;       -- oleauto.h:2601
  1568.             GetNames            : af_2606_GetNames;         -- oleauto.h:2606
  1569.             GetRefTypeOfImplType: af_2613_GetRefTypeOfImplType;
  1570.                                                             -- oleauto.h:2613
  1571.             GetImplTypeFlags    : af_2618_GetImplTypeFlags; -- oleauto.h:2618
  1572.             GetIDsOfNames       : af_2623_GetIDsOfNames;    -- oleauto.h:2623
  1573.             Invoke              : af_2629_Invoke;           -- oleauto.h:2629
  1574.             GetDocumentation    : af_2639_GetDocumentation; -- oleauto.h:2639
  1575.             GetDllEntry         : af_2647_GetDllEntry;      -- oleauto.h:2647
  1576.             GetRefTypeInfo      : af_2655_GetRefTypeInfo;   -- oleauto.h:2655
  1577.             AddressOfMember     : af_2660_AddressOfMember;  -- oleauto.h:2660
  1578.             CreateInstance      : af_2666_CreateInstance;   -- oleauto.h:2666
  1579.             GetMops             : af_2672_GetMops;          -- oleauto.h:2672
  1580.             GetContainingTypeLib: af_2677_GetContainingTypeLib;
  1581.                                                             -- oleauto.h:2677
  1582.             ReleaseTypeAttr     : ap_2682_ReleaseTypeAttr;  -- oleauto.h:2682
  1583.             ReleaseFuncDesc     : ap_2686_ReleaseFuncDesc;  -- oleauto.h:2686
  1584.             ReleaseVarDesc      : ap_2690_ReleaseVarDesc;   -- oleauto.h:2690
  1585.         end record;
  1586.  
  1587.     type TLIBATTR is                                        -- oleauto.h:3074
  1588.         record
  1589.             guid        : Win32.Rpcdce.GUID;                -- oleauto.h:3076
  1590.             lcid        : Win32.Winnt.LCID;                 -- oleauto.h:3077
  1591.             syskind     : Win32.Oleauto.SYSKIND;            -- oleauto.h:3078
  1592.             wMajorVerNum: Win32.WORD;                       -- oleauto.h:3079
  1593.             wMinorVerNum: Win32.WORD;                       -- oleauto.h:3080
  1594.             wLibFlags   : Win32.WORD;                       -- oleauto.h:3081
  1595.         end record;
  1596.  
  1597.     type ITypeLibVtbl is                                    -- oleauto.h:3141
  1598.         record
  1599.             QueryInterface   : af_3144_QueryInterface;      -- oleauto.h:3144
  1600.             AddRef           : af_3149_AddRef;              -- oleauto.h:3149
  1601.             Release          : af_3152_Release;             -- oleauto.h:3152
  1602.             GetTypeInfoCount : af_3155_GetTypeInfoCount;    -- oleauto.h:3155
  1603.             GetTypeInfo      : af_3158_GetTypeInfo;         -- oleauto.h:3158
  1604.             GetTypeInfoType  : af_3163_GetTypeInfoType;     -- oleauto.h:3163
  1605.             GetTypeInfoOfGuid: af_3168_GetTypeInfoOfGuid;   -- oleauto.h:3168
  1606.             GetLibAttr       : af_3173_GetLibAttr;          -- oleauto.h:3173
  1607.             GetTypeComp      : af_3177_GetTypeComp;         -- oleauto.h:3177
  1608.             GetDocumentation : af_3181_GetDocumentation;    -- oleauto.h:3181
  1609.             IsName           : af_3189_IsName;              -- oleauto.h:3189
  1610.             FindName         : af_3195_FindName;            -- oleauto.h:3195
  1611.             ReleaseTLibAttr  : ap_3203_ReleaseTLibAttr;     -- oleauto.h:3203
  1612.         end record;
  1613.  
  1614.     type IErrorInfoVtbl is                                  -- oleauto.h:3443
  1615.         record
  1616.             QueryInterface: af_3446_QueryInterface;         -- oleauto.h:3446
  1617.             AddRef        : af_3451_AddRef;                 -- oleauto.h:3451
  1618.             Release       : af_3454_Release;                -- oleauto.h:3454
  1619.             GetGUID       : af_3457_GetGUID;                -- oleauto.h:3457
  1620.             GetSource     : af_3461_GetSource;              -- oleauto.h:3461
  1621.             GetDescription: af_3465_GetDescription;         -- oleauto.h:3465
  1622.             GetHelpFile   : af_3469_GetHelpFile;            -- oleauto.h:3469
  1623.             GetHelpContext: af_3473_GetHelpContext;         -- oleauto.h:3473
  1624.         end record;
  1625.  
  1626.     type ICreateErrorInfoVtbl is                            -- oleauto.h:3626
  1627.         record
  1628.             QueryInterface: af_3629_QueryInterface;         -- oleauto.h:3629
  1629.             AddRef        : af_3634_AddRef;                 -- oleauto.h:3634
  1630.             Release       : af_3637_Release;                -- oleauto.h:3637
  1631.             SetGUID       : af_3640_SetGUID;                -- oleauto.h:3640
  1632.             SetSource     : af_3644_SetSource;              -- oleauto.h:3644
  1633.             SetDescription: af_3648_SetDescription;         -- oleauto.h:3648
  1634.             SetHelpFile   : af_3652_SetHelpFile;            -- oleauto.h:3652
  1635.             SetHelpContext: af_3656_SetHelpContext;         -- oleauto.h:3656
  1636.         end record;
  1637.  
  1638.     type ISupportErrorInfoVtbl is                           -- oleauto.h:3797
  1639.         record
  1640.             QueryInterface            : af_3800_QueryInterface;
  1641.                                                             -- oleauto.h:3800
  1642.             AddRef                    : af_3805_AddRef;     -- oleauto.h:3805
  1643.             Release                   : af_3808_Release;    -- oleauto.h:3808
  1644.             InterfaceSupportsErrorInfo: af_3811_InterfaceSupportsErrorInfo;
  1645.                                                             -- oleauto.h:3811
  1646.         end record;
  1647.  
  1648.     type PARAMDATA is                                       -- oleauto.h:4259
  1649.         record
  1650.             szName: Win32.PWSTR;                            -- oleauto.h:4260
  1651.             vt    : VARTYPE;                                -- oleauto.h:4261
  1652.         end record;
  1653.  
  1654.     type METHODDATA is                                      -- oleauto.h:4264
  1655.         record
  1656.             szName  : Win32.PWSTR;                          -- oleauto.h:4265
  1657.             ppdata  : LPPARAMDATA;                          -- oleauto.h:4266
  1658.             dispid  : Win32.Oleauto.DISPID;                 -- oleauto.h:4267
  1659.             iMeth   : Win32.UINT;                           -- oleauto.h:4268
  1660.             cc      : CALLCONV;                             -- oleauto.h:4269
  1661.             cArgs   : Win32.UINT;                           -- oleauto.h:4270
  1662.             wFlags  : Win32.WORD;                           -- oleauto.h:4271
  1663.             vtReturn: VARTYPE;                              -- oleauto.h:4272
  1664.         end record;
  1665.  
  1666.     type INTERFACEDATA is                                   -- oleauto.h:4275
  1667.         record
  1668.             pmethdata: LPMETHODDATA;                        -- oleauto.h:4276
  1669.             cMembers : Win32.UINT;                          -- oleauto.h:4277
  1670.         end record;
  1671.  
  1672.     type VARIANT is                                         -- oleauto.h:467
  1673.         record
  1674.             vt        : VARTYPE;                            -- oleauto.h:548
  1675.             wReserved1: Win32.WORD;                         -- oleauto.h:549
  1676.             wReserved2: Win32.WORD;                         -- oleauto.h:550
  1677.             wReserved3: Win32.WORD;                         -- oleauto.h:551
  1678.             u         : union_anonymous4_t;                 -- oleauto.h:584
  1679.         end record;
  1680.  
  1681.     subtype VARIANTARG is VARIANT;                          -- oleauto.h:599
  1682.  
  1683.     type TYPEDESC is                                        -- oleauto.h:658
  1684.         record
  1685.             typedesc_u: union_anonymous5_t;                 -- oleauto.h:661
  1686.             vt        : VARTYPE;                            -- oleauto.h:662
  1687.         end record;
  1688.  
  1689.     type ELEMDESC is                                        -- oleauto.h:718
  1690.         record
  1691.             tdesc  : TYPEDESC;                              -- oleauto.h:720
  1692.             idldesc: Win32.Oleauto.IDLDESC;                 -- oleauto.h:721
  1693.         end record;
  1694.  
  1695.     type TYPEATTR is                                        -- oleauto.h:733
  1696.         record
  1697.             guid            : Win32.Rpcdce.GUID;            -- oleauto.h:735
  1698.             lcid            : Win32.Winnt.LCID;             -- oleauto.h:736
  1699.             dwReserved      : Win32.DWORD;                  -- oleauto.h:737
  1700.             memidConstructor: MEMBERID;                     -- oleauto.h:738
  1701.             memidDestructor : MEMBERID;                     -- oleauto.h:739
  1702.             lpstrSchema     : Win32.Objbase.LPOLESTR;       -- oleauto.h:740
  1703.             cbSizeInstance  : Win32.ULONG;                  -- oleauto.h:741
  1704.             typekind        : Win32.Oleauto.TYPEKIND;       -- oleauto.h:742
  1705.             cFuncs          : Win32.WORD;                   -- oleauto.h:743
  1706.             cVars           : Win32.WORD;                   -- oleauto.h:744
  1707.             cImplTypes      : Win32.WORD;                   -- oleauto.h:745
  1708.             cbSizeVft       : Win32.WORD;                   -- oleauto.h:746
  1709.             cbAlignment     : Win32.WORD;                   -- oleauto.h:747
  1710.             wTypeFlags      : Win32.WORD;                   -- oleauto.h:748
  1711.             wMajorVerNum    : Win32.WORD;                   -- oleauto.h:749
  1712.             wMinorVerNum    : Win32.WORD;                   -- oleauto.h:750
  1713.             tdescAlias      : TYPEDESC;                     -- oleauto.h:751
  1714.             idldescType     : IDLDESC;                      -- oleauto.h:752
  1715.         end record;
  1716.  
  1717.     type FUNCDESC is                                        -- oleauto.h:860
  1718.         record
  1719.             memid            : MEMBERID;                    -- oleauto.h:862
  1720.             lprgscode        : Win32.Objbase.PSCODE;        -- oleauto.h:863
  1721.             lprgelemdescParam: LPELEMDESC;                  -- oleauto.h:864
  1722.             funckind         : Win32.Oleauto.FUNCKIND;      -- oleauto.h:865
  1723.             invkind          : INVOKEKIND;                  -- oleauto.h:866
  1724.             callconv         : Win32.Oleauto.CALLCONV;      -- oleauto.h:867
  1725.             cParams          : Win32.SHORT;                 -- oleauto.h:868
  1726.             cParamsOpt       : Win32.SHORT;                 -- oleauto.h:869
  1727.             oVft             : Win32.SHORT;                 -- oleauto.h:870
  1728.             cScodes          : Win32.SHORT;                 -- oleauto.h:871
  1729.             elemdescFunc     : ELEMDESC;                    -- oleauto.h:872
  1730.             wFuncFlags       : Win32.WORD;                  -- oleauto.h:873
  1731.         end record;
  1732.  
  1733.     type VARDESC is                                         -- oleauto.h:902
  1734.         record
  1735.             memid      : MEMBERID;                          -- oleauto.h:904
  1736.             lpstrSchema: Win32.Objbase.LPOLESTR;            -- oleauto.h:905
  1737.             vardesc_u  : union_anonymous6_t;                -- oleauto.h:910
  1738.             elemdescVar: ELEMDESC;                          -- oleauto.h:911
  1739.             wVarFlags  : Win32.WORD;                        -- oleauto.h:912
  1740.             varkind    : Win32.Oleauto.VARKIND;             -- oleauto.h:913
  1741.         end record;
  1742.  
  1743.     type ARRAYDESC is                                       -- oleauto.h:659
  1744.         record
  1745.             tdescElem: TYPEDESC;                            -- oleauto.h:680
  1746.             cDims    : Win32.USHORT;                        -- oleauto.h:681
  1747.             rgbounds : SAFEARRAYBOUND_Array;                -- oleauto.h:682
  1748.         end record;
  1749.  
  1750.     RemVariant_v0_1_c_ifspec: Win32.Rpcdce.RPC_IF_HANDLE;   -- oleauto.h:971
  1751.     RemVariant_v0_1_s_ifspec: Win32.Rpcdce.RPC_IF_HANDLE;   -- oleauto.h:972
  1752.     IID_ICreateTypeInfo     : Win32.Objbase.IID;            -- oleauto.h:990
  1753.     IID_ICreateTypeLib      : Win32.Objbase.IID;            -- oleauto.h:1614
  1754.     IID_IDispatch           : Win32.Objbase.IID;            -- oleauto.h:1942
  1755.     IID_IEnumVARIANT        : Win32.Objbase.IID;            -- oleauto.h:2142
  1756.     IID_ITypeComp           : Win32.Objbase.IID;            -- oleauto.h:2335
  1757.     IID_ITypeInfo           : Win32.Objbase.IID;            -- oleauto.h:2476
  1758.     IID_ITypeLib            : Win32.Objbase.IID;            -- oleauto.h:3088
  1759.     IID_IErrorInfo          : Win32.Objbase.IID;            -- oleauto.h:3417
  1760.     IID_ICreateErrorInfo    : Win32.Objbase.IID;            -- oleauto.h:3600
  1761.     IID_ISupportErrorInfo   : Win32.Objbase.IID;            -- oleauto.h:3783
  1762.  
  1763.     type PPLONG is access Win32.PLONG;
  1764.  
  1765.     procedure TYPEKIND_to_xmit(pEnum : in  PTYPEKIND; 
  1766.                                ppLong: out Win32.Oleauto.PPLONG);   
  1767.                                                 -- oleauto.h:643
  1768.  
  1769.     procedure TYPEKIND_from_xmit(pLong: in  Win32.PLONG;
  1770.                                  pEnum: out PTYPEKIND);     -- oleauto.h:644
  1771.  
  1772.     procedure CALLCONV_to_xmit(pEnum : in  PCALLCONV; 
  1773.                                ppLong: out Win32.Oleauto.PPLONG);   
  1774.                                                 -- oleauto.h:828
  1775.  
  1776.     procedure CALLCONV_from_xmit(pLong: in  Win32.PLONG;
  1777.                                  pEnum: out PCALLCONV);     -- oleauto.h:829
  1778.  
  1779.     procedure FUNCKIND_to_xmit(pEnum : in  PFUNCKIND; 
  1780.                                ppLong: out Win32.Oleauto.PPLONG);   
  1781.                                                 -- oleauto.h:842
  1782.  
  1783.     procedure FUNCKIND_from_xmit(pLong: in  Win32.PLONG;
  1784.                                  pEnum: out PFUNCKIND);     -- oleauto.h:843
  1785.  
  1786.     procedure INVOKEKIND_to_xmit(pEnum : in  PINVOKEKIND; 
  1787.                                  ppLong: out Win32.Oleauto.PPLONG); 
  1788.                                             -- oleauto.h:855
  1789.  
  1790.     procedure INVOKEKIND_from_xmit(pLong: in  Win32.PLONG;
  1791.                                    pEnum: out PINVOKEKIND); -- oleauto.h:856
  1792.  
  1793.     procedure VARKIND_to_xmit(pEnum : in  PVARKIND; 
  1794.                               ppLong: out Win32.Oleauto.PPLONG);    
  1795.                                                 -- oleauto.h:888
  1796.  
  1797.     procedure VARKIND_from_xmit(pLong: in  Win32.PLONG;
  1798.                                 pEnum: out PVARKIND);       -- oleauto.h:889
  1799.  
  1800.     procedure DESCKIND_to_xmit(pEnum : in  PDESCKIND; 
  1801.                               ppLong: out Win32.Oleauto.PPLONG);    
  1802.                                                 -- oleauto.h:2316
  1803.  
  1804.     procedure DESCKIND_from_xmit(pLong: in  Win32.PLONG;
  1805.                                 pEnum: out PDESCKIND);      -- oleauto.h:2317
  1806.  
  1807.     procedure SYSKIND_to_xmit(pEnum : in  PSYSKIND; 
  1808.                               ppLong: out Win32.Oleauto.PPLONG);    
  1809.                                                 -- oleauto.h:3066
  1810.  
  1811.     procedure SYSKIND_from_xmit(pLong: in  Win32.PLONG;
  1812.                                 pEnum: out PSYSKIND);       -- oleauto.h:3067
  1813.  
  1814.     function ICreateTypeInfo_SetGuid_Proxy(
  1815.                 This: access ICreateTypeInfo;
  1816.                 guid: access Win32.Objbase.IID)
  1817.                return Win32.Objbase.HRESULT;                -- oleauto.h:1304
  1818.  
  1819.     procedure ICreateTypeInfo_SetGuid_Stub(
  1820.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1821.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1822.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1823.                 pdwStubPhase     : access Win32.DWORD);
  1824.                                                             -- oleauto.h:1309
  1825.  
  1826.     function ICreateTypeInfo_SetTypeFlags_Proxy(
  1827.                 This      : access ICreateTypeInfo;
  1828.                 uTypeFlags: Win32.UINT)
  1829.                return Win32.Objbase.HRESULT;                -- oleauto.h:1316
  1830.  
  1831.     procedure ICreateTypeInfo_SetTypeFlags_Stub(
  1832.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1833.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1834.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1835.                 pdwStubPhase     : access Win32.DWORD);
  1836.                                                             -- oleauto.h:1321
  1837.  
  1838.     function ICreateTypeInfo_SetDocString_Proxy(
  1839.                 This    : access ICreateTypeInfo;
  1840.                 lpstrDoc: Win32.Objbase.LPOLESTR)
  1841.                return Win32.Objbase.HRESULT;                -- oleauto.h:1328
  1842.  
  1843.     procedure ICreateTypeInfo_SetDocString_Stub(
  1844.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1845.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1846.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1847.                 pdwStubPhase     : access Win32.DWORD);
  1848.                                                             -- oleauto.h:1333
  1849.  
  1850.     function ICreateTypeInfo_SetHelpContext_Proxy(
  1851.                 This         : access ICreateTypeInfo;
  1852.                 dwHelpContext: Win32.DWORD)
  1853.                return Win32.Objbase.HRESULT;                -- oleauto.h:1340
  1854.  
  1855.     procedure ICreateTypeInfo_SetHelpContext_Stub(
  1856.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1857.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1858.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1859.                 pdwStubPhase     : access Win32.DWORD);
  1860.                                                             -- oleauto.h:1345
  1861.  
  1862.     function ICreateTypeInfo_SetVersion_Proxy(
  1863.                 This        : access ICreateTypeInfo;
  1864.                 wMajorVerNum: Win32.WORD;
  1865.                 wMinorVerNum: Win32.WORD)
  1866.                return Win32.Objbase.HRESULT;                -- oleauto.h:1352
  1867.  
  1868.     procedure ICreateTypeInfo_SetVersion_Stub(
  1869.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1870.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1871.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1872.                 pdwStubPhase     : access Win32.DWORD);
  1873.                                                             -- oleauto.h:1358
  1874.  
  1875.     function ICreateTypeInfo_AddRefTypeInfo_Proxy(
  1876.                 This     : access ICreateTypeInfo;
  1877.                 ptinfo   : access ICreateTypeInfo;
  1878.                 phreftype: access HREFTYPE)
  1879.                return Win32.Objbase.HRESULT;                -- oleauto.h:1365
  1880.  
  1881.     procedure ICreateTypeInfo_AddRefTypeInfo_Stub(
  1882.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1883.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1884.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1885.                 pdwStubPhase     : access Win32.DWORD);
  1886.                                                             -- oleauto.h:1371
  1887.  
  1888.     function ICreateTypeInfo_AddFuncDesc_Proxy(
  1889.                 This     : access ICreateTypeInfo;
  1890.                 index    : Win32.UINT;
  1891.                 pfuncdesc: access FUNCDESC)
  1892.                return Win32.Objbase.HRESULT;                -- oleauto.h:1378
  1893.  
  1894.     procedure ICreateTypeInfo_AddFuncDesc_Stub(
  1895.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1896.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1897.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1898.                 pdwStubPhase     : access Win32.DWORD);
  1899.                                                             -- oleauto.h:1384
  1900.  
  1901.     function ICreateTypeInfo_AddImplType_Proxy(
  1902.                 This    : access ICreateTypeInfo;
  1903.                 index   : Win32.UINT;
  1904.                 hreftype: Win32.Oleauto.HREFTYPE)
  1905.                return Win32.Objbase.HRESULT;                -- oleauto.h:1391
  1906.  
  1907.     procedure ICreateTypeInfo_AddImplType_Stub(
  1908.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1909.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1910.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1911.                 pdwStubPhase     : access Win32.DWORD);
  1912.                                                             -- oleauto.h:1397
  1913.  
  1914.     function ICreateTypeInfo_SetImplTypeFlags_Proxy(
  1915.                 This         : access ICreateTypeInfo;
  1916.                 index        : Win32.UINT;
  1917.                 impltypeflags: Win32.INT)
  1918.                return Win32.Objbase.HRESULT;                -- oleauto.h:1404
  1919.  
  1920.     procedure ICreateTypeInfo_SetImplTypeFlags_Stub(
  1921.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1922.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1923.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1924.                 pdwStubPhase     : access Win32.DWORD);
  1925.                                                             -- oleauto.h:1410
  1926.  
  1927.     function ICreateTypeInfo_SetAlignment_Proxy(
  1928.                 This       : access ICreateTypeInfo;
  1929.                 cbAlignment: Win32.WORD)
  1930.                return Win32.Objbase.HRESULT;                -- oleauto.h:1417
  1931.  
  1932.     procedure ICreateTypeInfo_SetAlignment_Stub(
  1933.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1934.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1935.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1936.                 pdwStubPhase     : access Win32.DWORD);
  1937.                                                             -- oleauto.h:1422
  1938.  
  1939.     function ICreateTypeInfo_SetSchema_Proxy(
  1940.                 This       : access ICreateTypeInfo;
  1941.                 lpstrSchema: Win32.Objbase.LPOLESTR)
  1942.                return Win32.Objbase.HRESULT;                -- oleauto.h:1429
  1943.  
  1944.     procedure ICreateTypeInfo_SetSchema_Stub(
  1945.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1946.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1947.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1948.                 pdwStubPhase     : access Win32.DWORD);
  1949.                                                             -- oleauto.h:1434
  1950.  
  1951.     function ICreateTypeInfo_AddVarDesc_Proxy(
  1952.                 This    : access ICreateTypeInfo;
  1953.                 index   : Win32.UINT;
  1954.                 pvardesc: access VARDESC)
  1955.                return Win32.Objbase.HRESULT;                -- oleauto.h:1441
  1956.  
  1957.     procedure ICreateTypeInfo_AddVarDesc_Stub(
  1958.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1959.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1960.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1961.                 pdwStubPhase     : access Win32.DWORD);
  1962.                                                             -- oleauto.h:1447
  1963.  
  1964.     function ICreateTypeInfo_SetFuncAndParamNames_Proxy(
  1965.                 This     : access ICreateTypeInfo;
  1966.                 index    : Win32.UINT;
  1967.                 rgszNames: access Win32.Objbase.LPOLESTR;
  1968.                 cNames   : Win32.UINT)
  1969.                return Win32.Objbase.HRESULT;                -- oleauto.h:1454
  1970.  
  1971.     procedure ICreateTypeInfo_SetFuncAndParamNames_Stub(
  1972.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1973.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1974.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1975.                 pdwStubPhase     : access Win32.DWORD);
  1976.                                                             -- oleauto.h:1461
  1977.  
  1978.     function ICreateTypeInfo_SetVarName_Proxy(
  1979.                 This  : access ICreateTypeInfo;
  1980.                 index : Win32.UINT;
  1981.                 szName: Win32.Objbase.LPOLESTR)
  1982.                return Win32.Objbase.HRESULT;                -- oleauto.h:1468
  1983.  
  1984.     procedure ICreateTypeInfo_SetVarName_Stub(
  1985.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1986.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1987.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  1988.                 pdwStubPhase     : access Win32.DWORD);
  1989.                                                             -- oleauto.h:1474
  1990.  
  1991.     function ICreateTypeInfo_SetTypeDescAlias_Proxy(
  1992.                 This       : access ICreateTypeInfo;
  1993.                 ptdescAlias: access TYPEDESC)
  1994.                return Win32.Objbase.HRESULT;                -- oleauto.h:1481
  1995.  
  1996.     procedure ICreateTypeInfo_SetTypeDescAlias_Stub(
  1997.                 This             : access Win32.Objbase.IRpcStubBuffer;
  1998.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  1999.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2000.                 pdwStubPhase     : access Win32.DWORD);
  2001.                                                             -- oleauto.h:1486
  2002.  
  2003.     function ICreateTypeInfo_DefineFuncAsDllEntry_Proxy(
  2004.                 This      : access ICreateTypeInfo;
  2005.                 index     : Win32.UINT;
  2006.                 szDllName : Win32.Objbase.LPOLESTR;
  2007.                 szProcName: Win32.Objbase.LPOLESTR)
  2008.                return Win32.Objbase.HRESULT;                -- oleauto.h:1493
  2009.  
  2010.     procedure ICreateTypeInfo_DefineFuncAsDllEntry_Stub(
  2011.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2012.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2013.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2014.                 pdwStubPhase     : access Win32.DWORD);
  2015.                                                             -- oleauto.h:1500
  2016.  
  2017.     function ICreateTypeInfo_SetFuncDocString_Proxy(
  2018.                 This       : access ICreateTypeInfo;
  2019.                 index      : Win32.UINT;
  2020.                 szDocString: Win32.Objbase.LPOLESTR)
  2021.                return Win32.Objbase.HRESULT;                -- oleauto.h:1507
  2022.  
  2023.     procedure ICreateTypeInfo_SetFuncDocString_Stub(
  2024.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2025.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2026.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2027.                 pdwStubPhase     : access Win32.DWORD);
  2028.                                                             -- oleauto.h:1513
  2029.  
  2030.     function ICreateTypeInfo_SetVarDocString_Proxy(
  2031.                 This       : access ICreateTypeInfo;
  2032.                 index      : Win32.UINT;
  2033.                 szDocString: Win32.Objbase.LPOLESTR)
  2034.                return Win32.Objbase.HRESULT;                -- oleauto.h:1520
  2035.  
  2036.     procedure ICreateTypeInfo_SetVarDocString_Stub(
  2037.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2038.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2039.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2040.                 pdwStubPhase     : access Win32.DWORD);
  2041.                                                             -- oleauto.h:1526
  2042.  
  2043.     function ICreateTypeInfo_SetFuncHelpContext_Proxy(
  2044.                 This         : access ICreateTypeInfo;
  2045.                 index        : Win32.UINT;
  2046.                 dwHelpContext: Win32.DWORD)
  2047.                return Win32.Objbase.HRESULT;                -- oleauto.h:1533
  2048.  
  2049.     procedure ICreateTypeInfo_SetFuncHelpContext_Stub(
  2050.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2051.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2052.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2053.                 pdwStubPhase     : access Win32.DWORD);
  2054.                                                             -- oleauto.h:1539
  2055.  
  2056.     function ICreateTypeInfo_SetVarHelpContext_Proxy(
  2057.                 This         : access ICreateTypeInfo;
  2058.                 index        : Win32.UINT;
  2059.                 dwHelpContext: Win32.DWORD)
  2060.                return Win32.Objbase.HRESULT;                -- oleauto.h:1546
  2061.  
  2062.     procedure ICreateTypeInfo_SetVarHelpContext_Stub(
  2063.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2064.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2065.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2066.                 pdwStubPhase     : access Win32.DWORD);
  2067.                                                             -- oleauto.h:1552
  2068.  
  2069.     function ICreateTypeInfo_SetMops_Proxy(
  2070.                 This    : access ICreateTypeInfo;
  2071.                 index   : Win32.UINT;
  2072.                 bstrMops: BSTR)
  2073.                return Win32.Objbase.HRESULT;                -- oleauto.h:1559
  2074.  
  2075.     procedure ICreateTypeInfo_SetMops_Stub(
  2076.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2077.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2078.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2079.                 pdwStubPhase     : access Win32.DWORD);
  2080.                                                             -- oleauto.h:1565
  2081.  
  2082.     function ICreateTypeInfo_SetTypeIdldesc_Proxy(
  2083.                 This    : access ICreateTypeInfo;
  2084.                 pidldesc: access IDLDESC)
  2085.                return Win32.Objbase.HRESULT;                -- oleauto.h:1572
  2086.  
  2087.     procedure ICreateTypeInfo_SetTypeIdldesc_Stub(
  2088.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2089.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2090.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2091.                 pdwStubPhase     : access Win32.DWORD);
  2092.                                                             -- oleauto.h:1577
  2093.  
  2094.     function ICreateTypeInfo_LayOut_Proxy(
  2095.                 This: access ICreateTypeInfo)
  2096.                return Win32.Objbase.HRESULT;                -- oleauto.h:1584
  2097.  
  2098.     procedure ICreateTypeInfo_LayOut_Stub(
  2099.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2100.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2101.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2102.                 pdwStubPhase     : access Win32.DWORD);
  2103.                                                             -- oleauto.h:1588
  2104.  
  2105.     function ICreateTypeLib_CreateTypeInfo_Proxy(
  2106.                 This       : access ICreateTypeLib;
  2107.                 szName     : Win32.Objbase.LPOLESTR;
  2108.                 tkind      : TYPEKIND;
  2109.                 lplpictinfo: access LPCREATETYPEINFO)
  2110.                return Win32.Objbase.HRESULT;                -- oleauto.h:1772
  2111.  
  2112.     procedure ICreateTypeLib_CreateTypeInfo_Stub(
  2113.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2114.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2115.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2116.                 pdwStubPhase     : access Win32.DWORD);
  2117.                                                             -- oleauto.h:1779
  2118.  
  2119.     function ICreateTypeLib_SetName_Proxy(
  2120.                 This  : access ICreateTypeLib;
  2121.                 szName: Win32.Objbase.LPOLESTR)
  2122.                return Win32.Objbase.HRESULT;                -- oleauto.h:1786
  2123.  
  2124.     procedure ICreateTypeLib_SetName_Stub(
  2125.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2126.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2127.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2128.                 pdwStubPhase     : access Win32.DWORD);
  2129.                                                             -- oleauto.h:1791
  2130.  
  2131.     function ICreateTypeLib_SetVersion_Proxy(
  2132.                 This        : access ICreateTypeLib;
  2133.                 wMajorVerNum: Win32.WORD;
  2134.                 wMinorVerNum: Win32.WORD)
  2135.                return Win32.Objbase.HRESULT;                -- oleauto.h:1798
  2136.  
  2137.     procedure ICreateTypeLib_SetVersion_Stub(
  2138.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2139.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2140.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2141.                 pdwStubPhase     : access Win32.DWORD);
  2142.                                                             -- oleauto.h:1804
  2143.  
  2144.     function ICreateTypeLib_SetGuid_Proxy(
  2145.                 This: access ICreateTypeLib;
  2146.                 guid: access Win32.Objbase.IID)
  2147.                return Win32.Objbase.HRESULT;                -- oleauto.h:1811
  2148.  
  2149.     procedure ICreateTypeLib_SetGuid_Stub(
  2150.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2151.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2152.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2153.                 pdwStubPhase     : access Win32.DWORD);
  2154.                                                             -- oleauto.h:1816
  2155.  
  2156.     function ICreateTypeLib_SetDocString_Proxy(
  2157.                 This : access ICreateTypeLib;
  2158.                 szDoc: Win32.Objbase.LPOLESTR)
  2159.                return Win32.Objbase.HRESULT;                -- oleauto.h:1823
  2160.  
  2161.     procedure ICreateTypeLib_SetDocString_Stub(
  2162.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2163.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2164.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2165.                 pdwStubPhase     : access Win32.DWORD);
  2166.                                                             -- oleauto.h:1828
  2167.  
  2168.     function ICreateTypeLib_SetHelpFileName_Proxy(
  2169.                 This          : access ICreateTypeLib;
  2170.                 szHelpFileName: Win32.Objbase.LPOLESTR)
  2171.                return Win32.Objbase.HRESULT;                -- oleauto.h:1835
  2172.  
  2173.     procedure ICreateTypeLib_SetHelpFileName_Stub(
  2174.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2175.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2176.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2177.                 pdwStubPhase     : access Win32.DWORD);
  2178.                                                             -- oleauto.h:1840
  2179.  
  2180.     function ICreateTypeLib_SetHelpContext_Proxy(
  2181.                 This         : access ICreateTypeLib;
  2182.                 dwHelpContext: Win32.DWORD)
  2183.                return Win32.Objbase.HRESULT;                -- oleauto.h:1847
  2184.  
  2185.     procedure ICreateTypeLib_SetHelpContext_Stub(
  2186.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2187.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2188.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2189.                 pdwStubPhase     : access Win32.DWORD);
  2190.                                                             -- oleauto.h:1852
  2191.  
  2192.     function ICreateTypeLib_SetLcid_Proxy(
  2193.                 This: access ICreateTypeLib;
  2194.                 lcid: Win32.Winnt.LCID)
  2195.                return Win32.Objbase.HRESULT;                -- oleauto.h:1859
  2196.  
  2197.     procedure ICreateTypeLib_SetLcid_Stub(
  2198.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2199.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2200.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2201.                 pdwStubPhase     : access Win32.DWORD);
  2202.                                                             -- oleauto.h:1864
  2203.  
  2204.     function ICreateTypeLib_SetLibFlags_Proxy(
  2205.                 This     : access ICreateTypeLib;
  2206.                 uLibFlags: Win32.UINT)
  2207.                return Win32.Objbase.HRESULT;                -- oleauto.h:1871
  2208.  
  2209.     procedure ICreateTypeLib_SetLibFlags_Stub(
  2210.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2211.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2212.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2213.                 pdwStubPhase     : access Win32.DWORD);
  2214.                                                             -- oleauto.h:1876
  2215.  
  2216.     function ICreateTypeLib_SaveAllChanges_Proxy(
  2217.                 This: access ICreateTypeLib)
  2218.                return Win32.Objbase.HRESULT;                -- oleauto.h:1883
  2219.  
  2220.     procedure ICreateTypeLib_SaveAllChanges_Stub(
  2221.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2222.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2223.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2224.                 pdwStubPhase     : access Win32.DWORD);
  2225.                                                             -- oleauto.h:1887
  2226.  
  2227.     function IDispatch_GetTypeInfoCount_Proxy(
  2228.                 This   : access IDispatch;
  2229.                 pctinfo: access Win32.UINT)
  2230.                return Win32.Objbase.HRESULT;                -- oleauto.h:2062
  2231.  
  2232.     procedure IDispatch_GetTypeInfoCount_Stub(
  2233.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2234.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2235.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2236.                 pdwStubPhase     : access Win32.DWORD);
  2237.                                                             -- oleauto.h:2067
  2238.  
  2239.     function IDispatch_GetTypeInfo_Proxy(
  2240.                 This   : access IDispatch;
  2241.                 itinfo : Win32.UINT;
  2242.                 lcid   : Win32.Winnt.LCID;
  2243.                 pptinfo: access LPTYPEINFO)
  2244.                return Win32.Objbase.HRESULT;                -- oleauto.h:2074
  2245.  
  2246.     procedure IDispatch_GetTypeInfo_Stub(
  2247.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2248.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2249.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2250.                 pdwStubPhase     : access Win32.DWORD);
  2251.                                                             -- oleauto.h:2081
  2252.  
  2253.     function IDispatch_GetIDsOfNames_Proxy(
  2254.                 This     : access IDispatch;
  2255.                 riid     : access Win32.Objbase.IID;
  2256.                 rgszNames: access Win32.Objbase.LPOLESTR;
  2257.                 cNames   : Win32.UINT;
  2258.                 lcid     : Win32.Winnt.LCID;
  2259.                 rgdispid : access DISPID)
  2260.                return Win32.Objbase.HRESULT;                -- oleauto.h:2088
  2261.  
  2262.     procedure IDispatch_GetIDsOfNames_Stub(
  2263.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2264.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2265.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2266.                 pdwStubPhase     : access Win32.DWORD);
  2267.                                                             -- oleauto.h:2097
  2268.  
  2269.     function IDispatch_Invoke_Proxy(
  2270.                 This        : access IDispatch;
  2271.                 dispidMember: DISPID;
  2272.                 riid        : access Win32.Objbase.IID;
  2273.                 lcid        : Win32.Winnt.LCID;
  2274.                 wFlags      : Win32.WORD;
  2275.                 pdispparams : access DISPPARAMS;
  2276.                 pvarResult  : access VARIANT;
  2277.                 pexcepinfo  : access EXCEPINFO;
  2278.                 puArgErr    : access Win32.UINT)
  2279.                return Win32.Objbase.HRESULT;                -- oleauto.h:2104
  2280.  
  2281.     procedure IDispatch_Invoke_Stub(
  2282.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2283.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2284.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2285.                 pdwStubPhase     : access Win32.DWORD);
  2286.                                                             -- oleauto.h:2116
  2287.  
  2288.     function IEnumVARIANT_Next_Proxy(
  2289.                 This        : access IEnumVARIANT;
  2290.                 celt        : Win32.ULONG;
  2291.                 rgvar       : access VARIANT;
  2292.                 pceltFetched: access Win32.ULONG)
  2293.                return Win32.Objbase.HRESULT;                -- oleauto.h:2238
  2294.  
  2295.     procedure IEnumVARIANT_Next_Stub(
  2296.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2297.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2298.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2299.                 pdwStubPhase     : access Win32.DWORD);
  2300.                                                             -- oleauto.h:2245
  2301.  
  2302.     function IEnumVARIANT_Skip_Proxy(
  2303.                 This: access IEnumVARIANT;
  2304.                 celt: Win32.ULONG)
  2305.                return Win32.Objbase.HRESULT;                -- oleauto.h:2252
  2306.  
  2307.     procedure IEnumVARIANT_Skip_Stub(
  2308.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2309.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2310.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2311.                 pdwStubPhase     : access Win32.DWORD);
  2312.                                                             -- oleauto.h:2257
  2313.  
  2314.     function IEnumVARIANT_Reset_Proxy(
  2315.                 This: access IEnumVARIANT)
  2316.                return Win32.Objbase.HRESULT;                -- oleauto.h:2264
  2317.  
  2318.     procedure IEnumVARIANT_Reset_Stub(
  2319.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2320.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2321.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2322.                 pdwStubPhase     : access Win32.DWORD);
  2323.                                                             -- oleauto.h:2268
  2324.  
  2325.     function IEnumVARIANT_Clone_Proxy(
  2326.                 This  : access IEnumVARIANT;
  2327.                 ppenum: access LPENUMVARIANT)
  2328.                return Win32.Objbase.HRESULT;                -- oleauto.h:2275
  2329.  
  2330.     procedure IEnumVARIANT_Clone_Stub(
  2331.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2332.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2333.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2334.                 pdwStubPhase     : access Win32.DWORD);
  2335.                                                             -- oleauto.h:2280
  2336.  
  2337.     function ITypeComp_Bind_Proxy(
  2338.                 This     : access ITypeComp;
  2339.                 szName   : Win32.Objbase.LPOLESTR;
  2340.                 lHashVal : Win32.ULONG;
  2341.                 fFlags   : Win32.WORD;
  2342.                 pptinfo  : access LPTYPEINFO;
  2343.                 pdesckind: access DESCKIND;
  2344.                 pbindptr : access BINDPTR)
  2345.                return Win32.Objbase.HRESULT;                -- oleauto.h:2425
  2346.  
  2347.     procedure ITypeComp_Bind_Stub(
  2348.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2349.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2350.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2351.                 pdwStubPhase     : access Win32.DWORD);
  2352.                                                             -- oleauto.h:2435
  2353.  
  2354.     function ITypeComp_BindType_Proxy(
  2355.                 This    : access ITypeComp;
  2356.                 szName  : Win32.Objbase.LPOLESTR;
  2357.                 lHashVal: Win32.ULONG;
  2358.                 pptinfo : access LPTYPEINFO;
  2359.                 pptcomp : access LPTYPECOMP)
  2360.                return Win32.Objbase.HRESULT;                -- oleauto.h:2442
  2361.  
  2362.     procedure ITypeComp_BindType_Stub(
  2363.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2364.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2365.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2366.                 pdwStubPhase     : access Win32.DWORD);
  2367.                                                             -- oleauto.h:2450
  2368.  
  2369.     function ITypeInfo_GetTypeAttr_Proxy(
  2370.                 This      : access ITypeInfo;
  2371.                 pptypeattr: access LPTYPEATTR)
  2372.                return Win32.Objbase.HRESULT;                -- oleauto.h:2780
  2373.  
  2374.     procedure ITypeInfo_GetTypeAttr_Stub(
  2375.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2376.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2377.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2378.                 pdwStubPhase     : access Win32.DWORD);
  2379.                                                             -- oleauto.h:2785
  2380.  
  2381.     function ITypeInfo_GetTypeComp_Proxy(
  2382.                 This   : access ITypeInfo;
  2383.                 pptcomp: access LPTYPECOMP)
  2384.                return Win32.Objbase.HRESULT;                -- oleauto.h:2792
  2385.  
  2386.     procedure ITypeInfo_GetTypeComp_Stub(
  2387.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2388.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2389.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2390.                 pdwStubPhase     : access Win32.DWORD);
  2391.                                                             -- oleauto.h:2797
  2392.  
  2393.     function ITypeInfo_GetFuncDesc_Proxy(
  2394.                 This       : access ITypeInfo;
  2395.                 index      : Win32.UINT;
  2396.                 pppfuncdesc: access LPFUNCDESC)
  2397.                return Win32.Objbase.HRESULT;                -- oleauto.h:2804
  2398.  
  2399.     procedure ITypeInfo_GetFuncDesc_Stub(
  2400.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2401.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2402.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2403.                 pdwStubPhase     : access Win32.DWORD);
  2404.                                                             -- oleauto.h:2810
  2405.  
  2406.     function ITypeInfo_GetVarDesc_Proxy(
  2407.                 This     : access ITypeInfo;
  2408.                 index    : Win32.UINT;
  2409.                 ppvardesc: access LPVARDESC)
  2410.                return Win32.Objbase.HRESULT;                -- oleauto.h:2817
  2411.  
  2412.     procedure ITypeInfo_GetVarDesc_Stub(
  2413.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2414.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2415.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2416.                 pdwStubPhase     : access Win32.DWORD);
  2417.                                                             -- oleauto.h:2823
  2418.  
  2419.     function ITypeInfo_GetNames_Proxy(
  2420.                 This       : access ITypeInfo;
  2421.                 memid      : MEMBERID;
  2422.                 rgbstrNames: LPBSTR;
  2423.                 cMaxNames  : Win32.UINT;
  2424.                 pcNames    : access Win32.UINT)
  2425.                return Win32.Objbase.HRESULT;                -- oleauto.h:2830
  2426.  
  2427.     procedure ITypeInfo_GetNames_Stub(
  2428.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2429.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2430.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2431.                 pdwStubPhase     : access Win32.DWORD);
  2432.                                                             -- oleauto.h:2838
  2433.  
  2434.     function ITypeInfo_GetRefTypeOfImplType_Proxy(
  2435.                 This     : access ITypeInfo;
  2436.                 index    : Win32.UINT;
  2437.                 hpreftype: access HREFTYPE)
  2438.                return Win32.Objbase.HRESULT;                -- oleauto.h:2845
  2439.  
  2440.     procedure ITypeInfo_GetRefTypeOfImplType_Stub(
  2441.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2442.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2443.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2444.                 pdwStubPhase     : access Win32.DWORD);
  2445.                                                             -- oleauto.h:2851
  2446.  
  2447.     function ITypeInfo_GetImplTypeFlags_Proxy(
  2448.                 This          : access ITypeInfo;
  2449.                 index         : Win32.UINT;
  2450.                 pimpltypeflags: access Win32.INT)
  2451.                return Win32.Objbase.HRESULT;                -- oleauto.h:2858
  2452.  
  2453.     procedure ITypeInfo_GetImplTypeFlags_Stub(
  2454.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2455.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2456.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2457.                 pdwStubPhase     : access Win32.DWORD);
  2458.                                                             -- oleauto.h:2864
  2459.  
  2460.     function ITypeInfo_GetIDsOfNames_Proxy(
  2461.                 This       : access ITypeInfo;
  2462.                 rglpszNames: access Win32.Objbase.LPOLESTR;
  2463.                 cNames     : Win32.UINT;
  2464.                 rgmemid    : access MEMBERID)
  2465.                return Win32.Objbase.HRESULT;                -- oleauto.h:2871
  2466.  
  2467.     procedure ITypeInfo_GetIDsOfNames_Stub(
  2468.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2469.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2470.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2471.                 pdwStubPhase     : access Win32.DWORD);
  2472.                                                             -- oleauto.h:2878
  2473.  
  2474.     function ITypeInfo_Invoke_Proxy(
  2475.                 This       : access ITypeInfo;
  2476.                 pvInstance : Win32.PVOID;
  2477.                 memid      : MEMBERID;
  2478.                 wFlags     : Win32.WORD;
  2479.                 pdispparams: access DISPPARAMS;
  2480.                 pvarResult : access VARIANT;
  2481.                 pexcepinfo : access EXCEPINFO;
  2482.                 puArgErr   : access Win32.UINT)
  2483.                return Win32.Objbase.HRESULT;                -- oleauto.h:2885
  2484.  
  2485.     procedure ITypeInfo_Invoke_Stub(
  2486.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2487.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2488.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2489.                 pdwStubPhase     : access Win32.DWORD);
  2490.                                                             -- oleauto.h:2896
  2491.  
  2492.     function ITypeInfo_GetDocumentation_Proxy(
  2493.                 This          : access ITypeInfo;
  2494.                 memid         : MEMBERID;
  2495.                 pbstrName     : access LPBSTR;
  2496.                 pbstrDocString: access LPBSTR;
  2497.                 pdwHelpContext: access Win32.DWORD;
  2498.                 pbstrHelpFile : access LPBSTR)
  2499.                return Win32.Objbase.HRESULT;                -- oleauto.h:2903
  2500.  
  2501.     procedure ITypeInfo_GetDocumentation_Stub(
  2502.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2503.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2504.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2505.                 pdwStubPhase     : access Win32.DWORD);
  2506.                                                             -- oleauto.h:2912
  2507.  
  2508.     function ITypeInfo_GetDllEntry_Proxy(
  2509.                 This        : access ITypeInfo;
  2510.                 memid       : MEMBERID;
  2511.                 invkind     : INVOKEKIND;
  2512.                 pbstrDllName: access LPBSTR;
  2513.                 pbstrName   : access LPBSTR;
  2514.                 pwOrdinal   : Win32.PWSTR)
  2515.                return Win32.Objbase.HRESULT;                -- oleauto.h:2919
  2516.  
  2517.     procedure ITypeInfo_GetDllEntry_Stub(
  2518.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2519.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2520.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2521.                 pdwStubPhase     : access Win32.DWORD);
  2522.                                                             -- oleauto.h:2928
  2523.  
  2524.     function ITypeInfo_GetRefTypeInfo_Proxy(
  2525.                 This    : access ITypeInfo;
  2526.                 hreftype: Win32.Oleauto.HREFTYPE;
  2527.                 pptinfo : access LPTYPEINFO)
  2528.                return Win32.Objbase.HRESULT;                -- oleauto.h:2935
  2529.  
  2530.     procedure ITypeInfo_GetRefTypeInfo_Stub(
  2531.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2532.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2533.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2534.                 pdwStubPhase     : access Win32.DWORD);
  2535.                                                             -- oleauto.h:2941
  2536.  
  2537.     function ITypeInfo_RemoteAddressOfMember_Proxy(
  2538.                 This: access ITypeInfo)
  2539.                return Win32.Objbase.HRESULT;                -- oleauto.h:2948
  2540.  
  2541.     procedure ITypeInfo_RemoteAddressOfMember_Stub(
  2542.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2543.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2544.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2545.                 pdwStubPhase     : access Win32.DWORD);
  2546.                                                             -- oleauto.h:2952
  2547.  
  2548.     function ITypeInfo_CreateInstance_Proxy(
  2549.                 This     : access ITypeInfo;
  2550.                 puncOuter: access Win32.Objbase.IUnknown;
  2551.                 riid     : access Win32.Objbase.IID;
  2552.                 ppvObj   : access Win32.PVOID)
  2553.                return Win32.Objbase.HRESULT;                -- oleauto.h:2959
  2554.  
  2555.     procedure ITypeInfo_CreateInstance_Stub(
  2556.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2557.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2558.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2559.                 pdwStubPhase     : access Win32.DWORD);
  2560.                                                             -- oleauto.h:2966
  2561.  
  2562.     function ITypeInfo_GetMops_Proxy(
  2563.                 This     : access ITypeInfo;
  2564.                 memid    : MEMBERID;
  2565.                 pbstrMops: access LPBSTR)
  2566.                return Win32.Objbase.HRESULT;                -- oleauto.h:2973
  2567.  
  2568.     procedure ITypeInfo_GetMops_Stub(
  2569.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2570.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2571.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2572.                 pdwStubPhase     : access Win32.DWORD);
  2573.                                                             -- oleauto.h:2979
  2574.  
  2575.     function ITypeInfo_GetContainingTypeLib_Proxy(
  2576.                 This  : access ITypeInfo;
  2577.                 pptlib: access LPTYPELIB;
  2578.                 pindex: access Win32.UINT)
  2579.                return Win32.Objbase.HRESULT;                -- oleauto.h:2986
  2580.  
  2581.     procedure ITypeInfo_GetContainingTypeLib_Stub(
  2582.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2583.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2584.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2585.                 pdwStubPhase     : access Win32.DWORD);
  2586.                                                             -- oleauto.h:2992
  2587.  
  2588.     procedure ITypeInfo_ReleaseTypeAttr_Proxy(
  2589.                 This     : access ITypeInfo;
  2590.                 ptypeattr: LPTYPEATTR);                     -- oleauto.h:2999
  2591.  
  2592.     procedure ITypeInfo_ReleaseTypeAttr_Stub(
  2593.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2594.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2595.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2596.                 pdwStubPhase     : access Win32.DWORD);
  2597.                                                             -- oleauto.h:3004
  2598.  
  2599.     procedure ITypeInfo_ReleaseFuncDesc_Proxy(
  2600.                 This     : access ITypeInfo;
  2601.                 pfuncdesc: access FUNCDESC);                -- oleauto.h:3011
  2602.  
  2603.     procedure ITypeInfo_ReleaseFuncDesc_Stub(
  2604.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2605.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2606.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2607.                 pdwStubPhase     : access Win32.DWORD);
  2608.                                                             -- oleauto.h:3016
  2609.  
  2610.     procedure ITypeInfo_ReleaseVarDesc_Proxy(
  2611.                 This    : access ITypeInfo;
  2612.                 pvardesc: access VARDESC);                  -- oleauto.h:3023
  2613.  
  2614.     procedure ITypeInfo_ReleaseVarDesc_Stub(
  2615.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2616.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2617.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2618.                 pdwStubPhase     : access Win32.DWORD);
  2619.                                                             -- oleauto.h:3028
  2620.  
  2621.     function ITypeLib_GetTypeInfoCount_Proxy(
  2622.                 This: access ITypeLib)
  2623.                return Win32.UINT;                           -- oleauto.h:3266
  2624.  
  2625.     procedure ITypeLib_GetTypeInfoCount_Stub(
  2626.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2627.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2628.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2629.                 pdwStubPhase     : access Win32.DWORD);
  2630.                                                             -- oleauto.h:3270
  2631.  
  2632.     function ITypeLib_GetTypeInfo_Proxy(
  2633.                 This    : access ITypeLib;
  2634.                 index   : Win32.UINT;
  2635.                 ppitinfo: access LPTYPEINFO)
  2636.                return Win32.Objbase.HRESULT;                -- oleauto.h:3277
  2637.  
  2638.     procedure ITypeLib_GetTypeInfo_Stub(
  2639.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2640.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2641.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2642.                 pdwStubPhase     : access Win32.DWORD);
  2643.                                                             -- oleauto.h:3283
  2644.  
  2645.     function ITypeLib_GetTypeInfoType_Proxy(
  2646.                 This  : access ITypeLib;
  2647.                 index : Win32.UINT;
  2648.                 ptkind: access TYPEKIND)
  2649.                return Win32.Objbase.HRESULT;                -- oleauto.h:3290
  2650.  
  2651.     procedure ITypeLib_GetTypeInfoType_Stub(
  2652.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2653.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2654.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2655.                 pdwStubPhase     : access Win32.DWORD);     -- oleauto.h:3296
  2656.  
  2657.     function ITypeLib_GetTypeInfoOfGuid_Proxy(
  2658.                 This   : access ITypeLib;
  2659.                 guid   : access Win32.Objbase.IID;
  2660.                 pptinfo: access LPTYPEINFO)
  2661.                return Win32.Objbase.HRESULT;                -- oleauto.h:3303
  2662.  
  2663.     procedure ITypeLib_GetTypeInfoOfGuid_Stub(
  2664.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2665.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2666.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2667.                 pdwStubPhase     : access Win32.DWORD);
  2668.                                                             -- oleauto.h:3309
  2669.  
  2670.     function ITypeLib_GetLibAttr_Proxy(
  2671.                 This      : access ITypeLib;
  2672.                 pptlibattr: access LPTLIBATTR)
  2673.                return Win32.Objbase.HRESULT;                -- oleauto.h:3316
  2674.  
  2675.     procedure ITypeLib_GetLibAttr_Stub(
  2676.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2677.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2678.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2679.                 pdwStubPhase     : access Win32.DWORD);
  2680.                                                             -- oleauto.h:3321
  2681.  
  2682.     function ITypeLib_GetTypeComp_Proxy(
  2683.                 This   : access ITypeLib;
  2684.                 pptcomp: access LPTYPECOMP)
  2685.                return Win32.Objbase.HRESULT;                -- oleauto.h:3328
  2686.  
  2687.     procedure ITypeLib_GetTypeComp_Stub(
  2688.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2689.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2690.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2691.                 pdwStubPhase     : access Win32.DWORD);
  2692.                                                             -- oleauto.h:3333
  2693.  
  2694.     function ITypeLib_GetDocumentation_Proxy(
  2695.                 This          : access ITypeLib;
  2696.                 index         : Win32.INT;
  2697.                 pbstrName     : access LPBSTR;
  2698.                 pbstrDocString: access LPBSTR;
  2699.                 pdwHelpContext: access Win32.DWORD;
  2700.                 pbstrHelpFile : access LPBSTR)
  2701.                return Win32.Objbase.HRESULT;                -- oleauto.h:3340
  2702.  
  2703.     procedure ITypeLib_GetDocumentation_Stub(
  2704.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2705.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2706.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2707.                 pdwStubPhase     : access Win32.DWORD);
  2708.                                                             -- oleauto.h:3349
  2709.  
  2710.     function ITypeLib_IsName_Proxy(
  2711.                 This     : access ITypeLib;
  2712.                 szNameBuf: Win32.Objbase.LPOLESTR;
  2713.                 lHashVal : Win32.ULONG;
  2714.                 pfName   : access Win32.BOOL)
  2715.                return Win32.Objbase.HRESULT;                -- oleauto.h:3356
  2716.  
  2717.     procedure ITypeLib_IsName_Stub(
  2718.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2719.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2720.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2721.                 pdwStubPhase     : access Win32.DWORD);
  2722.                                                             -- oleauto.h:3363
  2723.  
  2724.     function ITypeLib_FindName_Proxy(
  2725.                 This     : access ITypeLib;
  2726.                 szNameBuf: Win32.Objbase.LPOLESTR;
  2727.                 lHashVal : Win32.ULONG;
  2728.                 rgptinfo : access LPTYPEINFO;
  2729.                 rgmemid  : access Win32.USHORT;
  2730.                 pcFound  : Win32.PWSTR)
  2731.                return Win32.Objbase.HRESULT;                -- oleauto.h:3370
  2732.  
  2733.     procedure ITypeLib_FindName_Stub(
  2734.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2735.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2736.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2737.                 pdwStubPhase     : access Win32.DWORD);
  2738.                                                             -- oleauto.h:3379
  2739.  
  2740.     procedure ITypeLib_ReleaseTLibAttr_Proxy(
  2741.                 This     : access ITypeLib;
  2742.                 ptlibattr: access TLIBATTR);                -- oleauto.h:3386
  2743.  
  2744.     procedure ITypeLib_ReleaseTLibAttr_Stub(
  2745.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2746.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2747.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2748.                 pdwStubPhase     : access Win32.DWORD);
  2749.                                                             -- oleauto.h:3391
  2750.  
  2751.     function IErrorInfo_GetGUID_Proxy(
  2752.                 This : access IErrorInfo;
  2753.                 pguid: access Win32.Objbase.IID)
  2754.                return Win32.Objbase.HRESULT;                -- oleauto.h:3521
  2755.  
  2756.     procedure IErrorInfo_GetGUID_Stub(
  2757.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2758.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2759.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2760.                 pdwStubPhase     : access Win32.DWORD);
  2761.                                                             -- oleauto.h:3526
  2762.  
  2763.     function IErrorInfo_GetSource_Proxy(
  2764.                 This       : access IErrorInfo;
  2765.                 pbstrSource: access LPBSTR)
  2766.                return Win32.Objbase.HRESULT;                -- oleauto.h:3533
  2767.  
  2768.     procedure IErrorInfo_GetSource_Stub(
  2769.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2770.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2771.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2772.                 pdwStubPhase     : access Win32.DWORD);
  2773.                                                             -- oleauto.h:3538
  2774.  
  2775.     function IErrorInfo_GetDescription_Proxy(
  2776.                 This            : access IErrorInfo;
  2777.                 pbstrDescription: access LPBSTR)
  2778.                return Win32.Objbase.HRESULT;                -- oleauto.h:3545
  2779.  
  2780.     procedure IErrorInfo_GetDescription_Stub(
  2781.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2782.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2783.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2784.                 pdwStubPhase     : access Win32.DWORD);
  2785.                                                             -- oleauto.h:3550
  2786.  
  2787.     function IErrorInfo_GetHelpFile_Proxy(
  2788.                 This         : access IErrorInfo;
  2789.                 pbstrHelpFile: access LPBSTR)
  2790.                return Win32.Objbase.HRESULT;                -- oleauto.h:3557
  2791.  
  2792.     procedure IErrorInfo_GetHelpFile_Stub(
  2793.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2794.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2795.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2796.                 pdwStubPhase     : access Win32.DWORD);
  2797.                                                             -- oleauto.h:3562
  2798.  
  2799.     function IErrorInfo_GetHelpContext_Proxy(
  2800.                 This          : access IErrorInfo;
  2801.                 pdwHelpContext: access Win32.DWORD)
  2802.                return Win32.Objbase.HRESULT;                -- oleauto.h:3569
  2803.  
  2804.     procedure IErrorInfo_GetHelpContext_Stub(
  2805.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2806.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2807.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2808.                 pdwStubPhase     : access Win32.DWORD);
  2809.                                                             -- oleauto.h:3574
  2810.  
  2811.     function ICreateErrorInfo_SetGUID_Proxy(
  2812.                 This : access ICreateErrorInfo;
  2813.                 rguid: access Win32.Objbase.IID)
  2814.                return Win32.Objbase.HRESULT;                -- oleauto.h:3704
  2815.  
  2816.     procedure ICreateErrorInfo_SetGUID_Stub(
  2817.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2818.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2819.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2820.                 pdwStubPhase     : access Win32.DWORD);
  2821.                                                             -- oleauto.h:3709
  2822.  
  2823.     function ICreateErrorInfo_SetSource_Proxy(
  2824.                 This    : access ICreateErrorInfo;
  2825.                 szSource: Win32.Objbase.LPOLESTR)
  2826.                return Win32.Objbase.HRESULT;                -- oleauto.h:3716
  2827.  
  2828.     procedure ICreateErrorInfo_SetSource_Stub(
  2829.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2830.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2831.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2832.                 pdwStubPhase     : access Win32.DWORD);
  2833.                                                             -- oleauto.h:3721
  2834.  
  2835.     function ICreateErrorInfo_SetDescription_Proxy(
  2836.                 This         : access ICreateErrorInfo;
  2837.                 szDescription: Win32.Objbase.LPOLESTR)
  2838.                return Win32.Objbase.HRESULT;                -- oleauto.h:3728
  2839.  
  2840.     procedure ICreateErrorInfo_SetDescription_Stub(
  2841.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2842.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2843.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2844.                 pdwStubPhase     : access Win32.DWORD);
  2845.                                                             -- oleauto.h:3733
  2846.  
  2847.     function ICreateErrorInfo_SetHelpFile_Proxy(
  2848.                 This      : access ICreateErrorInfo;
  2849.                 szHelpFile: Win32.Objbase.LPOLESTR)
  2850.                return Win32.Objbase.HRESULT;                -- oleauto.h:3740
  2851.  
  2852.     procedure ICreateErrorInfo_SetHelpFile_Stub(
  2853.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2854.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2855.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2856.                 pdwStubPhase     : access Win32.DWORD);
  2857.                                                             -- oleauto.h:3745
  2858.  
  2859.     function ICreateErrorInfo_SetHelpContext_Proxy(
  2860.                 This         : access ICreateErrorInfo;
  2861.                 dwHelpContext: Win32.DWORD)
  2862.                return Win32.Objbase.HRESULT;                -- oleauto.h:3752
  2863.  
  2864.     procedure ICreateErrorInfo_SetHelpContext_Stub(
  2865.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2866.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2867.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2868.                 pdwStubPhase     : access Win32.DWORD);
  2869.                                                             -- oleauto.h:3757
  2870.  
  2871.     function ISupportErrorInfo_InterfaceSupportsErrorInfo_Proxy(
  2872.                 This: access ISupportErrorInfo;
  2873.                 riid: access Win32.Objbase.IID)
  2874.                return Win32.Objbase.HRESULT;                -- oleauto.h:3847
  2875.  
  2876.     procedure ISupportErrorInfo_InterfaceSupportsErrorInfo_Stub(
  2877.                 This             : access Win32.Objbase.IRpcStubBuffer;
  2878.                 pRpcChannelBuffer: access Win32.Objbase.IRpcChannelBuffer;
  2879.                 pRpcMessage      : Win32.Rpcdcep.PRPC_MESSAGE;
  2880.                 pdwStubPhase     : access Win32.DWORD);
  2881.                                                             -- oleauto.h:3852
  2882.  
  2883.     function SysAllocString(
  2884.                 sz: Win32.PCWSTR)
  2885.                return BSTR;                                 -- oleauto.h:3876
  2886.  
  2887.     function SysReAllocString(
  2888.                 pbstr: access LPBSTR;
  2889.                 sz   : Win32.PCWSTR)
  2890.                return Win32.INT;                            -- oleauto.h:3877
  2891.  
  2892.     function SysAllocStringLen(
  2893.                 pch: Win32.PCWSTR;
  2894.                 cch: Win32.UINT)
  2895.                return BSTR;                                 -- oleauto.h:3878
  2896.  
  2897.     function SysReAllocStringLen(
  2898.                 pbstr: access LPBSTR;
  2899.                 pch  : Win32.PCWSTR;
  2900.                 cch  : Win32.UINT)
  2901.                return Win32.INT;                            -- oleauto.h:3879
  2902.  
  2903.     procedure SysFreeString(
  2904.                 bstr: Win32.Oleauto.BSTR);                  -- oleauto.h:3880
  2905.  
  2906.     function SysStringLen(
  2907.                 bstr: Win32.Oleauto.BSTR)
  2908.                return Win32.UINT;                           -- oleauto.h:3881
  2909.  
  2910.     function SysStringByteLen(
  2911.                 bstr: Win32.Oleauto.BSTR)
  2912.                return Win32.UINT;                           -- oleauto.h:3884
  2913.  
  2914.     function SysAllocStringByteLen(
  2915.                 psz: Win32.PCSTR;
  2916.                 len: Win32.UINT)
  2917.                return BSTR;                                 -- oleauto.h:3885
  2918.  
  2919.     function DosDateTimeToVariantTime(
  2920.                 wDosDate: Win32.USHORT;
  2921.                 wDosTime: Win32.USHORT;
  2922.                 pvtime  : access Win32.DOUBLE)
  2923.                return Win32.INT;                            -- oleauto.h:3893
  2924.  
  2925.     function VariantTimeToDosDateTime(
  2926.                 vtime    : Win32.DOUBLE;
  2927.                 pwDosDate: Win32.PWSTR;
  2928.                 pwDosTime: Win32.PWSTR)
  2929.                return Win32.INT;                            -- oleauto.h:3899
  2930.  
  2931.     function SafeArrayAllocDescriptor(
  2932.                 cDims  : Win32.UINT;
  2933.                 ppsaOut: access LPSAFEARRAY)
  2934.                return Win32.Objbase.HRESULT;                -- oleauto.h:3909
  2935.  
  2936.     function SafeArrayAllocData(
  2937.                 psa: access SAFEARRAY)
  2938.                return Win32.Objbase.HRESULT;                -- oleauto.h:3911
  2939.  
  2940.     function SafeArrayCreate(
  2941.                 vt       : VARTYPE;
  2942.                 cDims    : Win32.UINT;
  2943.                 rgsabound: access SAFEARRAYBOUND)
  2944.                return LPSAFEARRAY;                          -- oleauto.h:3914
  2945.  
  2946.     function SafeArrayDestroyDescriptor(
  2947.                 psa: access SAFEARRAY)
  2948.                return Win32.Objbase.HRESULT;                -- oleauto.h:3919
  2949.  
  2950.     function SafeArrayDestroyData(
  2951.                 psa: access SAFEARRAY)
  2952.                return Win32.Objbase.HRESULT;                -- oleauto.h:3921
  2953.  
  2954.     function SafeArrayDestroy(
  2955.                 psa: access SAFEARRAY)
  2956.                return Win32.Objbase.HRESULT;                -- oleauto.h:3923
  2957.  
  2958.     function SafeArrayRedim(
  2959.                 psa        : access SAFEARRAY;
  2960.                 psaboundNew: access SAFEARRAYBOUND)
  2961.                return Win32.Objbase.HRESULT;                -- oleauto.h:3925
  2962.  
  2963.     function SafeArrayGetDim(
  2964.                 psa: access SAFEARRAY)
  2965.                return Win32.UINT;                           -- oleauto.h:3927
  2966.  
  2967.     function SafeArrayGetElemsize(
  2968.                 psa: access SAFEARRAY)
  2969.                return Win32.UINT;                           -- oleauto.h:3929
  2970.  
  2971.     function SafeArrayGetUBound(
  2972.                 psa     : access SAFEARRAY;
  2973.                 nDim    : Win32.UINT;
  2974.                 plUbound: access Win32.LONG)
  2975.                return Win32.Objbase.HRESULT;                -- oleauto.h:3932
  2976.  
  2977.     function SafeArrayGetLBound(
  2978.                 psa     : access SAFEARRAY;
  2979.                 nDim    : Win32.UINT;
  2980.                 plLbound: access Win32.LONG)
  2981.                return Win32.Objbase.HRESULT;                -- oleauto.h:3935
  2982.  
  2983.     function SafeArrayLock(
  2984.                 psa: access SAFEARRAY)
  2985.                return Win32.Objbase.HRESULT;                -- oleauto.h:3937
  2986.  
  2987.     function SafeArrayUnlock(
  2988.                 psa: access SAFEARRAY)
  2989.                return Win32.Objbase.HRESULT;                -- oleauto.h:3939
  2990.  
  2991.     subtype HUGE is Win32.VOID;                             -- oleauto.h:3941
  2992.     type HUGEP is access all HUGE;
  2993.  
  2994.     function SafeArrayAccessData(
  2995.                 psa    : access SAFEARRAY;
  2996.                 ppvData: access HUGEP)
  2997.                return Win32.Objbase.HRESULT;                -- oleauto.h:3941
  2998.  
  2999.     function SafeArrayUnaccessData(
  3000.                 psa: access SAFEARRAY)
  3001.                return Win32.Objbase.HRESULT;                -- oleauto.h:3943
  3002.  
  3003.     function SafeArrayGetElement(
  3004.                 psa      : access SAFEARRAY;
  3005.                 rgIndices: access Win32.LONG;
  3006.                 pv       : Win32.PVOID)
  3007.                return Win32.Objbase.HRESULT;                -- oleauto.h:3946
  3008.  
  3009.     function SafeArrayPutElement(
  3010.                 psa      : access SAFEARRAY;
  3011.                 rgIndices: access Win32.LONG;
  3012.                 pv       : Win32.PVOID)
  3013.                return Win32.Objbase.HRESULT;                -- oleauto.h:3952
  3014.  
  3015.     function SafeArrayCopy(
  3016.                 psa    : access SAFEARRAY;
  3017.                 ppsaOut: access LPSAFEARRAY)
  3018.                return Win32.Objbase.HRESULT;                -- oleauto.h:3958
  3019.  
  3020.     function SafeArrayPtrOfIndex(
  3021.                 psa      : access SAFEARRAY;
  3022.                 rgIndices: access Win32.LONG;
  3023.                 ppvData  : access HUGEP)
  3024.                return Win32.Objbase.HRESULT;                -- oleauto.h:3963
  3025.  
  3026.     procedure VariantInit(
  3027.                 pvarg: access VARIANT);                     -- oleauto.h:3974
  3028.  
  3029.     function VariantClear(
  3030.                 pvarg: access VARIANT)
  3031.                return Win32.Objbase.HRESULT;                -- oleauto.h:3977
  3032.  
  3033.     function VariantCopy(
  3034.                 pvargDest: access VARIANT;
  3035.                 pvargSrc : access VARIANT)
  3036.                return Win32.Objbase.HRESULT;                -- oleauto.h:3980
  3037.  
  3038.     function VariantCopyInd(
  3039.                 pvarDest: access VARIANT;
  3040.                 pvargSrc: access VARIANT)
  3041.                return Win32.Objbase.HRESULT;                -- oleauto.h:3985
  3042.  
  3043.     function VariantChangeType(
  3044.                 pvargDest: access VARIANT;
  3045.                 pvarSrc  : access VARIANT;
  3046.                 wFlags   : Win32.USHORT;
  3047.                 vt       : VARTYPE)
  3048.                return Win32.Objbase.HRESULT;                -- oleauto.h:3990
  3049.  
  3050.     function VariantChangeTypeEx(
  3051.                 pvargDest: access VARIANT;
  3052.                 pvarSrc  : access VARIANT;
  3053.                 lcid     : Win32.Winnt.LCID;
  3054.                 wFlags   : Win32.USHORT;
  3055.                 vt       : VARTYPE)
  3056.                return Win32.Objbase.HRESULT;                -- oleauto.h:3997
  3057.  
  3058.     function VarUI1FromI2(
  3059.                 sIn  : Win32.SHORT;
  3060.                 pbOut: Win32.PUCHAR)
  3061.                return Win32.Objbase.HRESULT;                -- oleauto.h:4031
  3062.  
  3063.     function VarUI1FromI4(
  3064.                 lIn  : Win32.LONG;
  3065.                 pbOut: Win32.PUCHAR)
  3066.                return Win32.Objbase.HRESULT;                -- oleauto.h:4032
  3067.  
  3068.     function VarUI1FromR4(
  3069.                 fltIn: Win32.FLOAT;
  3070.                 pbOut: Win32.PUCHAR)
  3071.                return Win32.Objbase.HRESULT;                -- oleauto.h:4033
  3072.  
  3073.     function VarUI1FromR8(
  3074.                 dblIn: Win32.DOUBLE;
  3075.                 pbOut: Win32.PUCHAR)
  3076.                return Win32.Objbase.HRESULT;                -- oleauto.h:4034
  3077.  
  3078.     function VarUI1FromCy(
  3079.                 cyIn : CY;
  3080.                 pbOut: Win32.PUCHAR)
  3081.                return Win32.Objbase.HRESULT;                -- oleauto.h:4035
  3082.  
  3083.     function VarUI1FromDate(
  3084.                 dateIn: DATE;
  3085.                 pbOut : Win32.PUCHAR)
  3086.                return Win32.Objbase.HRESULT;                -- oleauto.h:4036
  3087.  
  3088.     function VarUI1FromStr(
  3089.                 strIn  : Win32.PWSTR;
  3090.                 lcid   : Win32.Winnt.LCID;
  3091.                 dwFlags: Win32.ULONG;
  3092.                 pbOut  : Win32.PUCHAR)
  3093.                return Win32.Objbase.HRESULT;                -- oleauto.h:4037
  3094.  
  3095.     function VarUI1FromDisp(
  3096.                 pdispIn: access IDispatch;
  3097.                 lcid   : Win32.Winnt.LCID;
  3098.                 pbOut  : Win32.PUCHAR)
  3099.                return Win32.Objbase.HRESULT;                -- oleauto.h:4038
  3100.  
  3101.     function VarUI1FromBool(
  3102.                 boolIn: VARIANT_BOOL;
  3103.                 pbOut : Win32.PUCHAR)
  3104.                return Win32.Objbase.HRESULT;                -- oleauto.h:4039
  3105.  
  3106.     function VarI2FromUI1(
  3107.                 bIn  : Win32.UCHAR;
  3108.                 psOut: access Win32.SHORT)
  3109.                return Win32.Objbase.HRESULT;                -- oleauto.h:4041
  3110.  
  3111.     function VarI2FromI4(
  3112.                 lIn  : Win32.LONG;
  3113.                 psOut: access Win32.SHORT)
  3114.                return Win32.Objbase.HRESULT;                -- oleauto.h:4042
  3115.  
  3116.     function VarI2FromR4(
  3117.                 fltIn: Win32.FLOAT;
  3118.                 psOut: access Win32.SHORT)
  3119.                return Win32.Objbase.HRESULT;                -- oleauto.h:4043
  3120.  
  3121.     function VarI2FromR8(
  3122.                 dblIn: Win32.DOUBLE;
  3123.                 psOut: access Win32.SHORT)
  3124.                return Win32.Objbase.HRESULT;                -- oleauto.h:4044
  3125.  
  3126.     function VarI2FromCy(
  3127.                 cyIn : CY;
  3128.                 psOut: access Win32.SHORT)
  3129.                return Win32.Objbase.HRESULT;                -- oleauto.h:4045
  3130.  
  3131.     function VarI2FromDate(
  3132.                 dateIn: DATE;
  3133.                 psOut : access Win32.SHORT)
  3134.                return Win32.Objbase.HRESULT;                -- oleauto.h:4046
  3135.  
  3136.     function VarI2FromStr(
  3137.                 strIn  : Win32.PWSTR;
  3138.                 lcid   : Win32.Winnt.LCID;
  3139.                 dwFlags: Win32.ULONG;
  3140.                 psOut  : access Win32.SHORT)
  3141.                return Win32.Objbase.HRESULT;                -- oleauto.h:4047
  3142.  
  3143.     function VarI2FromDisp(
  3144.                 pdispIn: access IDispatch;
  3145.                 lcid   : Win32.Winnt.LCID;
  3146.                 psOut  : access Win32.SHORT)
  3147.                return Win32.Objbase.HRESULT;                -- oleauto.h:4048
  3148.  
  3149.     function VarI2FromBool(
  3150.                 boolIn: VARIANT_BOOL;
  3151.                 psOut : access Win32.SHORT)
  3152.                return Win32.Objbase.HRESULT;                -- oleauto.h:4049
  3153.  
  3154.     function VarI4FromUI1(
  3155.                 bIn  : Win32.UCHAR;
  3156.                 plOut: access Win32.LONG)
  3157.                return Win32.Objbase.HRESULT;                -- oleauto.h:4051
  3158.  
  3159.     function VarI4FromI2(
  3160.                 sIn  : Win32.SHORT;
  3161.                 plOut: access Win32.LONG)
  3162.                return Win32.Objbase.HRESULT;                -- oleauto.h:4052
  3163.  
  3164.     function VarI4FromR4(
  3165.                 fltIn: Win32.FLOAT;
  3166.                 plOut: access Win32.LONG)
  3167.                return Win32.Objbase.HRESULT;                -- oleauto.h:4053
  3168.  
  3169.     function VarI4FromR8(
  3170.                 dblIn: Win32.DOUBLE;
  3171.                 plOut: access Win32.LONG)
  3172.                return Win32.Objbase.HRESULT;                -- oleauto.h:4054
  3173.  
  3174.     function VarI4FromCy(
  3175.                 cyIn : CY;
  3176.                 plOut: access Win32.LONG)
  3177.                return Win32.Objbase.HRESULT;                -- oleauto.h:4055
  3178.  
  3179.     function VarI4FromDate(
  3180.                 dateIn: DATE;
  3181.                 plOut : access Win32.LONG)
  3182.                return Win32.Objbase.HRESULT;                -- oleauto.h:4056
  3183.  
  3184.     function VarI4FromStr(
  3185.                 strIn  : Win32.PWSTR;
  3186.                 lcid   : Win32.Winnt.LCID;
  3187.                 dwFlags: Win32.ULONG;
  3188.                 plOut  : access Win32.LONG)
  3189.                return Win32.Objbase.HRESULT;                -- oleauto.h:4057
  3190.  
  3191.     function VarI4FromDisp(
  3192.                 pdispIn: access IDispatch;
  3193.                 lcid   : Win32.Winnt.LCID;
  3194.                 plOut  : access Win32.LONG)
  3195.                return Win32.Objbase.HRESULT;                -- oleauto.h:4058
  3196.  
  3197.     function VarI4FromBool(
  3198.                 boolIn: VARIANT_BOOL;
  3199.                 plOut : access Win32.LONG)
  3200.                return Win32.Objbase.HRESULT;                -- oleauto.h:4059
  3201.  
  3202.     function VarR4FromUI1(
  3203.                 bIn    : Win32.UCHAR;
  3204.                 pfltOut: access Win32.FLOAT)
  3205.                return Win32.Objbase.HRESULT;                -- oleauto.h:4061
  3206.  
  3207.     function VarR4FromI2(
  3208.                 sIn    : Win32.SHORT;
  3209.                 pfltOut: access Win32.FLOAT)
  3210.                return Win32.Objbase.HRESULT;                -- oleauto.h:4062
  3211.  
  3212.     function VarR4FromI4(
  3213.                 lIn    : Win32.LONG;
  3214.                 pfltOut: access Win32.FLOAT)
  3215.                return Win32.Objbase.HRESULT;                -- oleauto.h:4063
  3216.  
  3217.     function VarR4FromR8(
  3218.                 dblIn  : Win32.DOUBLE;
  3219.                 pfltOut: access Win32.FLOAT)
  3220.                return Win32.Objbase.HRESULT;                -- oleauto.h:4064
  3221.  
  3222.     function VarR4FromCy(
  3223.                 cyIn   : CY;
  3224.                 pfltOut: access Win32.FLOAT)
  3225.                return Win32.Objbase.HRESULT;                -- oleauto.h:4065
  3226.  
  3227.     function VarR4FromDate(
  3228.                 dateIn : DATE;
  3229.                 pfltOut: access Win32.FLOAT)
  3230.                return Win32.Objbase.HRESULT;                -- oleauto.h:4066
  3231.  
  3232.     function VarR4FromStr(
  3233.                 strIn  : Win32.PWSTR;
  3234.                 lcid   : Win32.Winnt.LCID;
  3235.                 dwFlags: Win32.ULONG;
  3236.                 pfltOut: access Win32.FLOAT)
  3237.                return Win32.Objbase.HRESULT;                -- oleauto.h:4067
  3238.  
  3239.     function VarR4FromDisp(
  3240.                 pdispIn: access IDispatch;
  3241.                 lcid   : Win32.Winnt.LCID;
  3242.                 pfltOut: access Win32.FLOAT)
  3243.                return Win32.Objbase.HRESULT;                -- oleauto.h:4068
  3244.  
  3245.     function VarR4FromBool(
  3246.                 boolIn : VARIANT_BOOL;
  3247.                 pfltOut: access Win32.FLOAT)
  3248.                return Win32.Objbase.HRESULT;                -- oleauto.h:4069
  3249.  
  3250.     function VarR8FromUI1(
  3251.                 bIn    : Win32.UCHAR;
  3252.                 pdblOut: access Win32.DOUBLE)
  3253.                return Win32.Objbase.HRESULT;                -- oleauto.h:4071
  3254.  
  3255.     function VarR8FromI2(
  3256.                 sIn    : Win32.SHORT;
  3257.                 pdblOut: access Win32.DOUBLE)
  3258.                return Win32.Objbase.HRESULT;                -- oleauto.h:4072
  3259.  
  3260.     function VarR8FromI4(
  3261.                 lIn    : Win32.LONG;
  3262.                 pdblOut: access Win32.DOUBLE)
  3263.                return Win32.Objbase.HRESULT;                -- oleauto.h:4073
  3264.  
  3265.     function VarR8FromR4(
  3266.                 fltIn  : Win32.FLOAT;
  3267.                 pdblOut: access Win32.DOUBLE)
  3268.                return Win32.Objbase.HRESULT;                -- oleauto.h:4074
  3269.  
  3270.     function VarR8FromCy(
  3271.                 cyIn   : CY;
  3272.                 pdblOut: access Win32.DOUBLE)
  3273.                return Win32.Objbase.HRESULT;                -- oleauto.h:4075
  3274.  
  3275.     function VarR8FromDate(
  3276.                 dateIn : DATE;
  3277.                 pdblOut: access Win32.DOUBLE)
  3278.                return Win32.Objbase.HRESULT;                -- oleauto.h:4076
  3279.  
  3280.     function VarR8FromStr(
  3281.                 strIn  : Win32.PWSTR;
  3282.                 lcid   : Win32.Winnt.LCID;
  3283.                 dwFlags: Win32.ULONG;
  3284.                 pdblOut: access Win32.DOUBLE)
  3285.                return Win32.Objbase.HRESULT;                -- oleauto.h:4077
  3286.  
  3287.     function VarR8FromDisp(
  3288.                 pdispIn: access IDispatch;
  3289.                 lcid   : Win32.Winnt.LCID;
  3290.                 pdblOut: access Win32.DOUBLE)
  3291.                return Win32.Objbase.HRESULT;                -- oleauto.h:4078
  3292.  
  3293.     function VarR8FromBool(
  3294.                 boolIn : VARIANT_BOOL;
  3295.                 pdblOut: access Win32.DOUBLE)
  3296.                return Win32.Objbase.HRESULT;                -- oleauto.h:4079
  3297.  
  3298.     function VarDateFromUI1(
  3299.                 bIn     : Win32.UCHAR;
  3300.                 pdateOut: access DATE)
  3301.                return Win32.Objbase.HRESULT;                -- oleauto.h:4081
  3302.  
  3303.     function VarDateFromI2(
  3304.                 sIn     : Win32.SHORT;
  3305.                 pdateOut: access DATE)
  3306.                return Win32.Objbase.HRESULT;                -- oleauto.h:4082
  3307.  
  3308.     function VarDateFromI4(
  3309.                 lIn     : Win32.LONG;
  3310.                 pdateOut: access DATE)
  3311.                return Win32.Objbase.HRESULT;                -- oleauto.h:4083
  3312.  
  3313.     function VarDateFromR4(
  3314.                 fltIn   : Win32.FLOAT;
  3315.                 pdateOut: access DATE)
  3316.                return Win32.Objbase.HRESULT;                -- oleauto.h:4084
  3317.  
  3318.     function VarDateFromR8(
  3319.                 dblIn   : Win32.DOUBLE;
  3320.                 pdateOut: access DATE)
  3321.                return Win32.Objbase.HRESULT;                -- oleauto.h:4085
  3322.  
  3323.     function VarDateFromCy(
  3324.                 cyIn    : CY;
  3325.                 pdateOut: access DATE)
  3326.                return Win32.Objbase.HRESULT;                -- oleauto.h:4086
  3327.  
  3328.     function VarDateFromStr(
  3329.                 strIn   : Win32.PWSTR;
  3330.                 lcid    : Win32.Winnt.LCID;
  3331.                 dwFlags : Win32.ULONG;
  3332.                 pdateOut: access DATE)
  3333.                return Win32.Objbase.HRESULT;                -- oleauto.h:4087
  3334.  
  3335.     function VarDateFromDisp(
  3336.                 pdispIn : access IDispatch;
  3337.                 lcid    : Win32.Winnt.LCID;
  3338.                 pdateOut: access DATE)
  3339.                return Win32.Objbase.HRESULT;                -- oleauto.h:4088
  3340.  
  3341.     function VarDateFromBool(
  3342.                 boolIn  : VARIANT_BOOL;
  3343.                 pdateOut: access DATE)
  3344.                return Win32.Objbase.HRESULT;                -- oleauto.h:4089
  3345.  
  3346.     function VarCyFromUI1(
  3347.                 bIn   : Win32.UCHAR;
  3348.                 pcyOut: access CY)
  3349.                return Win32.Objbase.HRESULT;                -- oleauto.h:4091
  3350.  
  3351.     function VarCyFromI2(
  3352.                 sIn   : Win32.SHORT;
  3353.                 pcyOut: access CY)
  3354.                return Win32.Objbase.HRESULT;                -- oleauto.h:4092
  3355.  
  3356.     function VarCyFromI4(
  3357.                 lIn   : Win32.LONG;
  3358.                 pcyOut: access CY)
  3359.                return Win32.Objbase.HRESULT;                -- oleauto.h:4093
  3360.  
  3361.     function VarCyFromR4(
  3362.                 fltIn : Win32.FLOAT;
  3363.                 pcyOut: access CY)
  3364.                return Win32.Objbase.HRESULT;                -- oleauto.h:4094
  3365.  
  3366.     function VarCyFromR8(
  3367.                 dblIn : Win32.DOUBLE;
  3368.                 pcyOut: access CY)
  3369.                return Win32.Objbase.HRESULT;                -- oleauto.h:4095
  3370.  
  3371.     function VarCyFromDate(
  3372.                 dateIn: DATE;
  3373.                 pcyOut: access CY)
  3374.                return Win32.Objbase.HRESULT;                -- oleauto.h:4096
  3375.  
  3376.     function VarCyFromStr(
  3377.                 strIn  : Win32.PWSTR;
  3378.                 lcid   : Win32.Winnt.LCID;
  3379.                 dwFlags: Win32.ULONG;
  3380.                 pcyOut : access CY)
  3381.                return Win32.Objbase.HRESULT;                -- oleauto.h:4097
  3382.  
  3383.     function VarCyFromDisp(
  3384.                 pdispIn: access IDispatch;
  3385.                 lcid   : Win32.Winnt.LCID;
  3386.                 pcyOut : access CY)
  3387.                return Win32.Objbase.HRESULT;                -- oleauto.h:4098
  3388.  
  3389.     function VarCyFromBool(
  3390.                 boolIn: VARIANT_BOOL;
  3391.                 pcyOut: access CY)
  3392.                return Win32.Objbase.HRESULT;                -- oleauto.h:4099
  3393.  
  3394.     function VarBstrFromUI1(
  3395.                 bVal    : Win32.UCHAR;
  3396.                 lcid    : Win32.Winnt.LCID;
  3397.                 dwFlags : Win32.ULONG;
  3398.                 pbstrOut: access LPBSTR)
  3399.                return Win32.Objbase.HRESULT;                -- oleauto.h:4101
  3400.  
  3401.     function VarBstrFromI2(
  3402.                 iVal    : Win32.SHORT;
  3403.                 lcid    : Win32.Winnt.LCID;
  3404.                 dwFlags : Win32.ULONG;
  3405.                 pbstrOut: access LPBSTR)
  3406.                return Win32.Objbase.HRESULT;                -- oleauto.h:4102
  3407.  
  3408.     function VarBstrFromI4(
  3409.                 lIn     : Win32.LONG;
  3410.                 lcid    : Win32.Winnt.LCID;
  3411.                 dwFlags : Win32.ULONG;
  3412.                 pbstrOut: access LPBSTR)
  3413.                return Win32.Objbase.HRESULT;                -- oleauto.h:4103
  3414.  
  3415.     function VarBstrFromR4(
  3416.                 fltIn   : Win32.FLOAT;
  3417.                 lcid    : Win32.Winnt.LCID;
  3418.                 dwFlags : Win32.ULONG;
  3419.                 pbstrOut: access LPBSTR)
  3420.                return Win32.Objbase.HRESULT;                -- oleauto.h:4104
  3421.  
  3422.     function VarBstrFromR8(
  3423.                 dblIn   : Win32.DOUBLE;
  3424.                 lcid    : Win32.Winnt.LCID;
  3425.                 dwFlags : Win32.ULONG;
  3426.                 pbstrOut: access LPBSTR)
  3427.                return Win32.Objbase.HRESULT;                -- oleauto.h:4105
  3428.  
  3429.     function VarBstrFromCy(
  3430.                 cyIn    : CY;
  3431.                 lcid    : Win32.Winnt.LCID;
  3432.                 dwFlags : Win32.ULONG;
  3433.                 pbstrOut: access LPBSTR)
  3434.                return Win32.Objbase.HRESULT;                -- oleauto.h:4106
  3435.  
  3436.     function VarBstrFromDate(
  3437.                 dateIn  : DATE;
  3438.                 lcid    : Win32.Winnt.LCID;
  3439.                 dwFlags : Win32.ULONG;
  3440.                 pbstrOut: access LPBSTR)
  3441.                return Win32.Objbase.HRESULT;                -- oleauto.h:4107
  3442.  
  3443.     function VarBstrFromDisp(
  3444.                 pdispIn : access IDispatch;
  3445.                 lcid    : Win32.Winnt.LCID;
  3446.                 dwFlags : Win32.ULONG;
  3447.                 pbstrOut: access LPBSTR)
  3448.                return Win32.Objbase.HRESULT;                -- oleauto.h:4108
  3449.  
  3450.     function VarBstrFromBool(
  3451.                 boolIn  : VARIANT_BOOL;
  3452.                 lcid    : Win32.Winnt.LCID;
  3453.                 dwFlags : Win32.ULONG;
  3454.                 pbstrOut: access LPBSTR)
  3455.                return Win32.Objbase.HRESULT;                -- oleauto.h:4109
  3456.  
  3457.     function VarBoolFromUI1(
  3458.                 bIn     : Win32.UCHAR;
  3459.                 pboolOut: access Win32.SHORT)
  3460.                return Win32.Objbase.HRESULT;                -- oleauto.h:4111
  3461.  
  3462.     function VarBoolFromI2(
  3463.                 sIn     : Win32.SHORT;
  3464.                 pboolOut: access Win32.SHORT)
  3465.                return Win32.Objbase.HRESULT;                -- oleauto.h:4112
  3466.  
  3467.     function VarBoolFromI4(
  3468.                 lIn     : Win32.LONG;
  3469.                 pboolOut: access Win32.SHORT)
  3470.                return Win32.Objbase.HRESULT;                -- oleauto.h:4113
  3471.  
  3472.     function VarBoolFromR4(
  3473.                 fltIn   : Win32.FLOAT;
  3474.                 pboolOut: access Win32.SHORT)
  3475.                return Win32.Objbase.HRESULT;                -- oleauto.h:4114
  3476.  
  3477.     function VarBoolFromR8(
  3478.                 dblIn   : Win32.DOUBLE;
  3479.                 pboolOut: access Win32.SHORT)
  3480.                return Win32.Objbase.HRESULT;                -- oleauto.h:4115
  3481.  
  3482.     function VarBoolFromDate(
  3483.                 dateIn  : DATE;
  3484.                 pboolOut: access Win32.SHORT)
  3485.                return Win32.Objbase.HRESULT;                -- oleauto.h:4116
  3486.  
  3487.     function VarBoolFromCy(
  3488.                 cyIn    : CY;
  3489.                 pboolOut: access Win32.SHORT)
  3490.                return Win32.Objbase.HRESULT;                -- oleauto.h:4117
  3491.  
  3492.     function VarBoolFromStr(
  3493.                 strIn   : Win32.PWSTR;
  3494.                 lcid    : Win32.Winnt.LCID;
  3495.                 dwFlags : Win32.ULONG;
  3496.                 pboolOut: access Win32.SHORT)
  3497.                return Win32.Objbase.HRESULT;                -- oleauto.h:4118
  3498.  
  3499.     function VarBoolFromDisp(
  3500.                 pdispIn : access IDispatch;
  3501.                 lcid    : Win32.Winnt.LCID;
  3502.                 pboolOut: access Win32.SHORT)
  3503.                return Win32.Objbase.HRESULT;                -- oleauto.h:4119
  3504.  
  3505.     function LHashValOfNameSysA(
  3506.                 syskind: Win32.Oleauto.SYSKIND;
  3507.                 lcid   : Win32.Winnt.LCID;
  3508.                 szName : Win32.PCSTR)
  3509.                return Win32.ULONG;                          -- oleauto.h:4190
  3510.  
  3511.     function LHashValOfNameSys(
  3512.                 syskind: Win32.Oleauto.SYSKIND;
  3513.                 lcid   : Win32.Winnt.LCID;
  3514.                 szName : Win32.PCWSTR)
  3515.                return Win32.ULONG;                          -- oleauto.h:4194
  3516.  
  3517.    function LHashValOfName(lcid  : Win32.Winnt.LCID;        -- oleauto.h:4196
  3518.                            szName: Win32.PCWSTR) 
  3519.                             return Win32.ULONG;             
  3520.  
  3521.     function WHashValOfLHashVal(lhashval: Win32.ULONG) 
  3522.                                 return Win32.USHORT;        -- oleauto.h:4199
  3523.  
  3524.     function IsHashValCompatible(lhashval1: Win32.ULONG;
  3525.                                  lhashval2: Win32.ULONG)
  3526.                                  return Win32.BOOL;         -- oleauto.h:4202
  3527.  
  3528.     function LoadTypeLib(
  3529.                 szFile: Win32.PCWSTR;
  3530.                 pptlib: access LPTYPELIB)
  3531.                return Win32.Objbase.HRESULT;                -- oleauto.h:4208
  3532.  
  3533.     function LoadRegTypeLib(
  3534.                 rguid    : access Win32.Objbase.IID;
  3535.                 wVerMajor: Win32.WORD;
  3536.                 wVerMinor: Win32.WORD;
  3537.                 lcid     : Win32.Winnt.LCID;
  3538.                 pptlib   : access LPTYPELIB)
  3539.                return Win32.Objbase.HRESULT;                -- oleauto.h:4213
  3540.  
  3541.     function QueryPathOfRegTypeLib(
  3542.                 guid          : access Win32.Objbase.IID;
  3543.                 wMaj          : Win32.USHORT;
  3544.                 wMin          : Win32.USHORT;
  3545.                 lcid          : Win32.Winnt.LCID;
  3546.                 lpbstrPathName: LPBSTR)
  3547.                return Win32.Objbase.HRESULT;                -- oleauto.h:4223
  3548.  
  3549.     function RegisterTypeLib(
  3550.                 ptlib     : access ITypeLib;
  3551.                 szFullPath: Win32.PWSTR;
  3552.                 szHelpDir : Win32.PWSTR)
  3553.                return Win32.Objbase.HRESULT;                -- oleauto.h:4233
  3554.  
  3555.     function DeregisterTypeLib(
  3556.                 rguid    : access Win32.Objbase.IID;
  3557.                 wVerMajor: Win32.WORD;
  3558.                 wVerMinor: Win32.WORD;
  3559.                 lcid     : Win32.Winnt.LCID)
  3560.                return Win32.Objbase.HRESULT;                -- oleauto.h:4239
  3561.  
  3562.     function CreateTypeLib(
  3563.                 syskind: Win32.Oleauto.SYSKIND;
  3564.                 szFile : Win32.PCWSTR;
  3565.                 ppctlib: access LPCREATETYPELIB)
  3566.                return Win32.Objbase.HRESULT;                -- oleauto.h:4242
  3567.  
  3568.     function DispGetParam(
  3569.                 pdispparams: access DISPPARAMS;
  3570.                 position   : Win32.UINT;
  3571.                 vtTarg     : VARTYPE;
  3572.                 pvarResult : access VARIANT;
  3573.                 puArgErr   : access Win32.UINT)
  3574.                return Win32.Objbase.HRESULT;                -- oleauto.h:4286
  3575.  
  3576.     function DispGetIDsOfNames(
  3577.                 ptinfo   : access ITypeInfo;
  3578.                 rgszNames: access Win32.Objbase.LPOLESTR;
  3579.                 cNames   : Win32.UINT;
  3580.                 rgdispid : access DISPID)
  3581.                return Win32.Objbase.HRESULT;                -- oleauto.h:4296
  3582.  
  3583.     function DispInvoke(
  3584.                 this        : Win32.PVOID;
  3585.                 ptinfo      : access ITypeInfo;
  3586.                 dispidMember: DISPID;
  3587.                 wFlags      : Win32.WORD;
  3588.                 pparams     : access DISPPARAMS;
  3589.                 pvarResult  : access VARIANT;
  3590.                 pexcepinfo  : access EXCEPINFO;
  3591.                 puArgErr    : access Win32.UINT)
  3592.                return Win32.Objbase.HRESULT;                -- oleauto.h:4305
  3593.  
  3594.     function CreateDispTypeInfo(
  3595.                 pidata : LPINTERFACEDATA;
  3596.                 lcid   : Win32.Winnt.LCID;
  3597.                 pptinfo: access LPTYPEINFO)
  3598.                return Win32.Objbase.HRESULT;                -- oleauto.h:4318
  3599.  
  3600.     function CreateStdDispatch(
  3601.                 punkOuter   : access Win32.Objbase.IUnknown;
  3602.                 pvThis      : Win32.PVOID;
  3603.                 ptinfo      : access ITypeInfo;
  3604.                 ppunkStdDisp: access Win32.Objbase.LPUNKNOWN)
  3605.                return Win32.Objbase.HRESULT;                -- oleauto.h:4327
  3606.  
  3607.     function RegisterActiveObject(
  3608.                 punk       : Win32.Objbase.IUnknown;
  3609.                 rclsid     : access Win32.Objbase.IID;
  3610.                 dwFlags    : Win32.DWORD;
  3611.                 pdwRegister: access Win32.DWORD)
  3612.                return Win32.Objbase.HRESULT;                -- oleauto.h:4343
  3613.  
  3614.     function RevokeActiveObject(
  3615.                 dwRegister: Win32.DWORD;
  3616.                 pvReserved: Win32.PVOID)
  3617.                return Win32.Objbase.HRESULT;                -- oleauto.h:4350
  3618.  
  3619.     function GetActiveObject(
  3620.                 rclsid    : access Win32.Objbase.IID;
  3621.                 pvReserved: Win32.PVOID;
  3622.                 ppunk     : access Win32.Objbase.LPUNKNOWN)
  3623.                return Win32.Objbase.HRESULT;                -- oleauto.h:4355
  3624.  
  3625.     function SetErrorInfo(
  3626.                 dwReserved: Win32.ULONG;
  3627.                 perrinfo  : access IErrorInfo)
  3628.                return Win32.Objbase.HRESULT;                -- oleauto.h:4364
  3629.  
  3630.     function GetErrorInfo(
  3631.                 dwReserved: Win32.ULONG;
  3632.                 pperrinfo : access LPERRORINFO)
  3633.                return Win32.Objbase.HRESULT;                -- oleauto.h:4365
  3634.  
  3635.     function CreateErrorInfo(
  3636.                 pperrinfo: access LPERRORINFO)
  3637.                return Win32.Objbase.HRESULT;                -- oleauto.h:4366
  3638.  
  3639.     function OaBuildVersion return Win32.ULONG;             -- oleauto.h:4372
  3640.  
  3641.     function V_VT(X: access VARIANT) return VARTYPE;        -- oleauto.h:4385
  3642.     function V_ISBYREF(X: access VARIANT) return VARTYPE;   -- oleauto.h:4386
  3643.     function V_ISARRAY(X: access VARIANT) return  VARTYPE;  -- oleauto.h:4387
  3644.     function V_ISVECTOR(X: access VARIANT) return  VARTYPE; -- oleauto.h:4388
  3645.     function V_I2(X: access VARIANT) return Win32.SHORT;    -- oleauto.h:4395
  3646.     function V_NONE(X: access VARIANT) return Win32.SHORT;  -- oleauto.h:4390
  3647.     function V_UI1(X: access VARIANT) return Win32.UCHAR;   -- oleauto.h:4392
  3648.     function V_UI1REF(X: access VARIANT) return Win32.PUCHAR;
  3649.                                                             -- oleauto.h:4393
  3650.     function V_I2REF(X: access VARIANT) return Win32.PSHORT;-- oleauto.h:4396
  3651.     function V_I4(X: access VARIANT) return Win32.LONG;     -- oleauto.h:4398
  3652.     function V_I4REF(X: access VARIANT) return Win32.PLONG; -- oleauto.h:4390
  3653.     function V_R4(X: access VARIANT) return Win32.FLOAT;    -- oleauto.h:4404
  3654.     function V_R4REF(X: access VARIANT) return Win32.PFLOAT;-- oleauto.h:4405
  3655.     function V_R8(X: access VARIANT) return Win32.DOUBLE;   -- oleauto.h:4407
  3656.     function V_R8REF(X: access VARIANT) return Win32.PDOUBLE;
  3657.                                                             -- oleauto.h:4408
  3658.     function V_CY(X: access VARIANT) return CY;             -- oleauto.h:4410
  3659.     function V_CYREF(X: access VARIANT) return PCY;         -- oleauto.h:4411
  3660.     function V_DATE(X: access VARIANT) return Win32.Oleauto.DATE;
  3661.                                                             -- oleauto.h:4413
  3662.     function V_DATEREF(X: access VARIANT) return Win32.Oleauto.PDATE; 
  3663.     function V_BSTR(X: access VARIANT) return BSTR;         -- oleauto.h:4416
  3664.                                                             -- oleauto.h:4414
  3665.     function V_BSTRREF(X: access VARIANT) return LPBSTR;    -- oleauto.h:4417
  3666.     function V_DISPATCH(X: access VARIANT) return LPDISPATCH;
  3667.                                                             -- oleauto.h:4419
  3668.     function V_DISPATCHREF(X: access VARIANT) return a_LPDISPATCH_t;            
  3669.                                                             -- oleauto.h:4420
  3670.  
  3671.     function V_ERROR(X: access VARIANT) return Win32.Objbase.SCODE;     
  3672.                                                             -- oleauto.h:4422
  3673.     function V_ERRORREF(X: access VARIANT) return Win32.Objbase.PSCODE;         
  3674.                                                             -- oleauto.h:4423
  3675.     function V_BOOL(X: access VARIANT) return VARIANT_BOOL;     
  3676.                                                             -- oleauto.h:4425
  3677.     function V_BOOLREF(X: access VARIANT) return PVARIANT_BOOL;
  3678.                                                             -- oleauto.h:4426
  3679.     function V_UNKNOWN(X: access VARIANT) return Win32.Objbase.LPUNKNOWN;     
  3680.                                                             -- oleauto.h:4428
  3681.     function V_UNKNOWNREF(X: access VARIANT) return a_a_IUnknown;            
  3682.                                                 -- oleauto.h:4429
  3683.     function V_VARIANTREF(X: access VARIANT) return  LPVARIANT;         
  3684.                                                 -- oleauto.h:4432
  3685.     function V_ARRAY(X: access VARIANT) return LPSAFEARRAY; -- oleauto.h:4448
  3686.  
  3687.     function V_ARRAYREF(X: access VARIANT) return PLPSAFEARRAY;         
  3688.                                                             -- oleauto.h:4449
  3689.     function V_BYREF(X: access VARIANT) return Win32.PVOID; -- oleauto.h:4451
  3690.      
  3691. private
  3692.  
  3693.     pragma Convention(C, ICreateTypeInfo);                  -- oleauto.h:114
  3694.     pragma Convention(C, ICreateTypeLib);                   -- oleauto.h:120
  3695.     pragma Convention(C, IDispatch);                        -- oleauto.h:126
  3696.     pragma Convention(C, IEnumVARIANT);                     -- oleauto.h:132
  3697.     pragma Convention(C, ITypeComp);                        -- oleauto.h:138
  3698.     pragma Convention(C, ITypeInfo);                        -- oleauto.h:144
  3699.     pragma Convention(C, ITypeLib);                         -- oleauto.h:150
  3700.     pragma Convention(C, IErrorInfo);                       -- oleauto.h:156
  3701.     pragma Convention(C, ICreateErrorInfo);                 -- oleauto.h:162
  3702.     pragma Convention(C, ISupportErrorInfo);                -- oleauto.h:168
  3703.     pragma Convention(C, BLOB);                             -- oleauto.h:228
  3704.     pragma Convention(C, CLIPDATA);                         -- oleauto.h:242
  3705.     pragma Convention(C, SAFEARRAYBOUND);                   -- oleauto.h:255
  3706.     pragma Convention(C, SAFEARRAY);                        -- oleauto.h:286
  3707.     pragma Convention(C, CY);                               -- oleauto.h:336
  3708.     pragma Convention(C, IDLDESC);                          -- oleauto.h:692
  3709.     pragma Convention(C, DISPPARAMS);                       -- oleauto.h:760
  3710.     pragma Convention(C, RemEXCEPINFO);                     -- oleauto.h:769
  3711.     pragma Convention(C, EXCEPINFO);                        -- oleauto.h:809
  3712.     pragma Convention(C, ICreateTypeInfoVtbl);              -- oleauto.h:1085
  3713.     pragma Convention(C, ICreateTypeLibVtbl);               -- oleauto.h:1657
  3714.     pragma Convention(C, IDispatchVtbl);                    -- oleauto.h:1978
  3715.     pragma Convention(C, IEnumVARIANTVtbl);                 -- oleauto.h:2166
  3716.     pragma Convention(C, ITypeCompVtbl);                    -- oleauto.h:2360
  3717.     pragma Convention(C, ITypeInfoVtbl);                    -- oleauto.h:2574
  3718.     pragma Convention(C, TLIBATTR);                         -- oleauto.h:3074
  3719.     pragma Convention(C, ITypeLibVtbl);                     -- oleauto.h:3141
  3720.     pragma Convention(C, IErrorInfoVtbl);                   -- oleauto.h:3443
  3721.     pragma Convention(C, ICreateErrorInfoVtbl);             -- oleauto.h:3626
  3722.     pragma Convention(C, ISupportErrorInfoVtbl);            -- oleauto.h:3797
  3723.     pragma Convention(C, PARAMDATA);                        -- oleauto.h:4259
  3724.     pragma Convention(C, METHODDATA);                       -- oleauto.h:4264
  3725.     pragma Convention(C, INTERFACEDATA);                    -- oleauto.h:4275
  3726.     pragma Convention(C, VARIANT);                          -- oleauto.h:467
  3727.     pragma Convention(C, TYPEDESC);                         -- oleauto.h:658
  3728.     pragma Convention(C, ELEMDESC);                         -- oleauto.h:718
  3729.     pragma Convention(C, TYPEATTR);                         -- oleauto.h:733
  3730.     pragma Convention(C, FUNCDESC);                         -- oleauto.h:860
  3731.     pragma Convention(C, VARDESC);                          -- oleauto.h:902
  3732.     pragma Convention(C, ARRAYDESC);                        -- oleauto.h:659
  3733.  
  3734.     pragma Import(Stdcall, RemVariant_v0_1_c_ifspec, "RemVariant_v0_1_c_ifspec");
  3735.                                                             -- oleauto.h:971
  3736.     pragma Import(Stdcall, RemVariant_v0_1_s_ifspec, "RemVariant_v0_1_s_ifspec");
  3737.                                                             -- oleauto.h:972
  3738.     pragma Import(Stdcall, IID_ICreateTypeInfo, "IID_ICreateTypeInfo");
  3739.                                                             -- oleauto.h:990 
  3740.     pragma Import(Stdcall, IID_ICreateTypeLib, "IID_ICreateTypeLib"); 
  3741.                                                             -- oleauto.h:1614
  3742.     pragma Import(Stdcall, IID_IDispatch, "IID_IDispatch");       -- oleauto.h:1942 
  3743.     pragma Import(Stdcall, IID_IEnumVARIANT, "IID_IEnumVARIANT"); -- oleauto.h:2142
  3744.     pragma Import(Stdcall, IID_ITypeComp, "IID_ITypeComp");       -- oleauto.h:2335 
  3745.     pragma Import(Stdcall, IID_ITypeInfo, "IID_ITypeInfo");       -- oleauto.h:2476
  3746.     pragma Import(Stdcall, IID_ITypeLib, "IID_ITypeLib");         -- oleauto.h:3088 
  3747.     pragma Import(Stdcall, IID_IErrorInfo, "IID_IErrorInfo");     -- oleauto.h:3417
  3748.     pragma Import(Stdcall, IID_ICreateErrorInfo, "IID_ICreateErrorInfo");
  3749.                                                             -- oleauto.h:360 0
  3750.     pragma Import(Stdcall, IID_ISupportErrorInfo, "IID_ISupportErrorInfo");
  3751.                                                             -- oleauto.h:3 783
  3752.  
  3753.     pragma Import(Stdcall, ICreateTypeInfo_SetGuid_Proxy, 
  3754.                      "ICreateTypeInfo_SetGuid_Proxy");      -- oleauto.h:1304
  3755.     pragma Import(Stdcall, ICreateTypeInfo_SetGuid_Stub, 
  3756.                      "ICreateTypeInfo_SetGuid_Stub");       -- oleauto.h:1309
  3757.     pragma Import(Stdcall, ICreateTypeInfo_SetTypeFlags_Proxy, 
  3758.                      "ICreateTypeInfo_SetTypeFlags_Proxy"); -- oleauto.h:1316
  3759.     pragma Import(Stdcall, ICreateTypeInfo_SetTypeFlags_Stub, 
  3760.                      "ICreateTypeInfo_SetTypeFlags_Stub");  -- oleauto.h:1321
  3761.     pragma Import(Stdcall, ICreateTypeInfo_SetDocString_Proxy, 
  3762.                      "ICreateTypeInfo_SetDocString_Proxy"); -- oleauto.h:1328
  3763.     pragma Import(Stdcall, ICreateTypeInfo_SetDocString_Stub, 
  3764.                      "ICreateTypeInfo_SetDocString_Stub");  -- oleauto.h:1333
  3765.     pragma Import(Stdcall, ICreateTypeInfo_SetHelpContext_Proxy, 
  3766.                      "ICreateTypeInfo_SetHelpContext_Proxy");
  3767.                                                             -- oleauto.h:1340
  3768.     pragma Import(Stdcall, ICreateTypeInfo_SetHelpContext_Stub, 
  3769.                      "ICreateTypeInfo_SetHelpContext_Stub");-- oleauto.h:1345
  3770.     pragma Import(Stdcall, ICreateTypeInfo_SetVersion_Proxy, 
  3771.                      "ICreateTypeInfo_SetVersion_Proxy");   -- oleauto.h:1352
  3772.     pragma Import(Stdcall, ICreateTypeInfo_SetVersion_Stub, 
  3773.                      "ICreateTypeInfo_SetVersion_Stub");    -- oleauto.h:1358
  3774.     pragma Import(Stdcall, ICreateTypeInfo_AddRefTypeInfo_Proxy, 
  3775.                      "ICreateTypeInfo_AddRefTypeInfo_Proxy");
  3776.                                                             -- oleauto.h:1365
  3777.     pragma Import(Stdcall, ICreateTypeInfo_AddRefTypeInfo_Stub, 
  3778.                      "ICreateTypeInfo_AddRefTypeInfo_Stub");-- oleauto.h:1371
  3779.     pragma Import(Stdcall, ICreateTypeInfo_AddFuncDesc_Proxy, 
  3780.                      "ICreateTypeInfo_AddFuncDesc_Proxy");  -- oleauto.h:1378
  3781.     pragma Import(Stdcall, ICreateTypeInfo_AddFuncDesc_Stub, 
  3782.                      "ICreateTypeInfo_AddFuncDesc_Stub");   -- oleauto.h:1384
  3783.     pragma Import(Stdcall, ICreateTypeInfo_AddImplType_Proxy, 
  3784.                      "ICreateTypeInfo_AddImplType_Proxy");  -- oleauto.h:1391
  3785.     pragma Import(Stdcall, ICreateTypeInfo_AddImplType_Stub, 
  3786.                      "ICreateTypeInfo_AddImplType_Stub");   -- oleauto.h:1397
  3787.     pragma Import(Stdcall, ICreateTypeInfo_SetImplTypeFlags_Proxy, 
  3788.                      "ICreateTypeInfo_SetImplTypeFlags_Proxy");
  3789.                                                             -- oleauto.h:1404
  3790.     pragma Import(Stdcall, ICreateTypeInfo_SetImplTypeFlags_Stub, 
  3791.                      "ICreateTypeInfo_SetImplTypeFlags_Stub");
  3792.                                                             -- oleauto.h:1410
  3793.     pragma Import(Stdcall, ICreateTypeInfo_SetAlignment_Proxy, 
  3794.                      "ICreateTypeInfo_SetAlignment_Proxy"); -- oleauto.h:1417
  3795.     pragma Import(Stdcall, ICreateTypeInfo_SetAlignment_Stub, 
  3796.                      "ICreateTypeInfo_SetAlignment_Stub");  -- oleauto.h:1422
  3797.     pragma Import(Stdcall, ICreateTypeInfo_SetSchema_Proxy, 
  3798.                      "ICreateTypeInfo_SetSchema_Proxy");    -- oleauto.h:1429
  3799.     pragma Import(Stdcall, ICreateTypeInfo_SetSchema_Stub, 
  3800.                      "ICreateTypeInfo_SetSchema_Stub");     -- oleauto.h:1434
  3801.     pragma Import(Stdcall, ICreateTypeInfo_AddVarDesc_Proxy, 
  3802.                      "ICreateTypeInfo_AddVarDesc_Proxy");   -- oleauto.h:1441
  3803.     pragma Import(Stdcall, ICreateTypeInfo_AddVarDesc_Stub, 
  3804.                      "ICreateTypeInfo_AddVarDesc_Stub");    -- oleauto.h:1447
  3805.     pragma Import(Stdcall, ICreateTypeInfo_SetFuncAndParamNames_Proxy, 
  3806.                      "ICreateTypeInfo_SetFuncAndParamNames_Proxy");
  3807.                                                             -- oleauto.h:1454
  3808.     pragma Import(Stdcall, ICreateTypeInfo_SetFuncAndParamNames_Stub, 
  3809.                      "ICreateTypeInfo_SetFuncAndParamNames_Stub");
  3810.                                                             -- oleauto.h:1461
  3811.     pragma Import(Stdcall, ICreateTypeInfo_SetVarName_Proxy, 
  3812.                      "ICreateTypeInfo_SetVarName_Proxy");   -- oleauto.h:1468
  3813.     pragma Import(Stdcall, ICreateTypeInfo_SetVarName_Stub, 
  3814.                      "ICreateTypeInfo_SetVarName_Stub");    -- oleauto.h:1474
  3815.     pragma Import(Stdcall, ICreateTypeInfo_SetTypeDescAlias_Proxy, 
  3816.                      "ICreateTypeInfo_SetTypeDescAlias_Proxy");
  3817.                                                             -- oleauto.h:1481
  3818.     pragma Import(Stdcall, ICreateTypeInfo_SetTypeDescAlias_Stub, 
  3819.                      "ICreateTypeInfo_SetTypeDescAlias_Stub");
  3820.                                                             -- oleauto.h:1486
  3821.     pragma Import(Stdcall, ICreateTypeInfo_DefineFuncAsDllEntry_Proxy, 
  3822.                      "ICreateTypeInfo_DefineFuncAsDllEntry_Proxy");
  3823.                                                             -- oleauto.h:1493
  3824.     pragma Import(Stdcall, ICreateTypeInfo_DefineFuncAsDllEntry_Stub, 
  3825.                      "ICreateTypeInfo_DefineFuncAsDllEntry_Stub");
  3826.                                                             -- oleauto.h:1500
  3827.     pragma Import(Stdcall, ICreateTypeInfo_SetFuncDocString_Proxy, 
  3828.                      "ICreateTypeInfo_SetFuncDocString_Proxy");
  3829.                                                             -- oleauto.h:1507
  3830.     pragma Import(Stdcall, ICreateTypeInfo_SetFuncDocString_Stub, 
  3831.                      "ICreateTypeInfo_SetFuncDocString_Stub");
  3832.                                                             -- oleauto.h:1513
  3833.     pragma Import(Stdcall, ICreateTypeInfo_SetVarDocString_Proxy, 
  3834.                      "ICreateTypeInfo_SetVarDocString_Proxy");
  3835.                                                             -- oleauto.h:1520
  3836.     pragma Import(Stdcall, ICreateTypeInfo_SetVarDocString_Stub, 
  3837.                      "ICreateTypeInfo_SetVarDocString_Stub");
  3838.                                                             -- oleauto.h:1526
  3839.     pragma Import(Stdcall, ICreateTypeInfo_SetFuncHelpContext_Proxy, 
  3840.                      "ICreateTypeInfo_SetFuncHelpContext_Proxy");
  3841.                                                             -- oleauto.h:1533
  3842.     pragma Import(Stdcall, ICreateTypeInfo_SetFuncHelpContext_Stub, 
  3843.                      "ICreateTypeInfo_SetFuncHelpContext_Stub");
  3844.                                                             -- oleauto.h:1539
  3845.     pragma Import(Stdcall, ICreateTypeInfo_SetVarHelpContext_Proxy, 
  3846.                      "ICreateTypeInfo_SetVarHelpContext_Proxy");
  3847.                                                             -- oleauto.h:1546
  3848.     pragma Import(Stdcall, ICreateTypeInfo_SetVarHelpContext_Stub, 
  3849.                      "ICreateTypeInfo_SetVarHelpContext_Stub");
  3850.                                                             -- oleauto.h:1552
  3851.     pragma Import(Stdcall, ICreateTypeInfo_SetMops_Proxy, 
  3852.                      "ICreateTypeInfo_SetMops_Proxy");      -- oleauto.h:1559
  3853.     pragma Import(Stdcall, ICreateTypeInfo_SetMops_Stub, 
  3854.                      "ICreateTypeInfo_SetMops_Stub");       -- oleauto.h:1565
  3855.     pragma Import(Stdcall, ICreateTypeInfo_SetTypeIdldesc_Proxy, 
  3856.                      "ICreateTypeInfo_SetTypeIdldesc_Proxy");
  3857.                                                             -- oleauto.h:1572
  3858.     pragma Import(Stdcall, ICreateTypeInfo_SetTypeIdldesc_Stub, 
  3859.                      "ICreateTypeInfo_SetTypeIdldesc_Stub");-- oleauto.h:1577
  3860.     pragma Import(Stdcall, ICreateTypeInfo_LayOut_Proxy, 
  3861.                      "ICreateTypeInfo_LayOut_Proxy");       -- oleauto.h:1584
  3862.     pragma Import(Stdcall, ICreateTypeInfo_LayOut_Stub, 
  3863.                      "ICreateTypeInfo_LayOut_Stub");        -- oleauto.h:1588
  3864.     pragma Import(Stdcall, ICreateTypeLib_CreateTypeInfo_Proxy, 
  3865.                      "ICreateTypeLib_CreateTypeInfo_Proxy");-- oleauto.h:1772
  3866.     pragma Import(Stdcall, ICreateTypeLib_CreateTypeInfo_Stub, 
  3867.                      "ICreateTypeLib_CreateTypeInfo_Stub"); -- oleauto.h:1779
  3868.     pragma Import(Stdcall, ICreateTypeLib_SetName_Proxy, 
  3869.                      "ICreateTypeLib_SetName_Proxy");       -- oleauto.h:1786
  3870.     pragma Import(Stdcall, ICreateTypeLib_SetName_Stub, 
  3871.                      "ICreateTypeLib_SetName_Stub");        -- oleauto.h:1791
  3872.     pragma Import(Stdcall, ICreateTypeLib_SetVersion_Proxy, 
  3873.                      "ICreateTypeLib_SetVersion_Proxy");    -- oleauto.h:1798
  3874.     pragma Import(Stdcall, ICreateTypeLib_SetVersion_Stub, 
  3875.                      "ICreateTypeLib_SetVersion_Stub");     -- oleauto.h:1804
  3876.     pragma Import(Stdcall, ICreateTypeLib_SetGuid_Proxy, 
  3877.                      "ICreateTypeLib_SetGuid_Proxy");       -- oleauto.h:1811
  3878.     pragma Import(Stdcall, ICreateTypeLib_SetGuid_Stub, 
  3879.                      "ICreateTypeLib_SetGuid_Stub");        -- oleauto.h:1816
  3880.     pragma Import(Stdcall, ICreateTypeLib_SetDocString_Proxy, 
  3881.                      "ICreateTypeLib_SetDocString_Proxy");  -- oleauto.h:1823
  3882.     pragma Import(Stdcall, ICreateTypeLib_SetDocString_Stub, 
  3883.                      "ICreateTypeLib_SetDocString_Stub");   -- oleauto.h:1828
  3884.     pragma Import(Stdcall, ICreateTypeLib_SetHelpFileName_Proxy, 
  3885.                      "ICreateTypeLib_SetHelpFileName_Proxy");
  3886.                                                             -- oleauto.h:1835
  3887.     pragma Import(Stdcall, ICreateTypeLib_SetHelpFileName_Stub, 
  3888.                      "ICreateTypeLib_SetHelpFileName_Stub");-- oleauto.h:1840
  3889.     pragma Import(Stdcall, ICreateTypeLib_SetHelpContext_Proxy, 
  3890.                      "ICreateTypeLib_SetHelpContext_Proxy");-- oleauto.h:1847
  3891.     pragma Import(Stdcall, ICreateTypeLib_SetHelpContext_Stub, 
  3892.                      "ICreateTypeLib_SetHelpContext_Stub"); -- oleauto.h:1852
  3893.     pragma Import(Stdcall, ICreateTypeLib_SetLcid_Proxy, 
  3894.                      "ICreateTypeLib_SetLcid_Proxy");       -- oleauto.h:1859
  3895.     pragma Import(Stdcall, ICreateTypeLib_SetLcid_Stub, 
  3896.                      "ICreateTypeLib_SetLcid_Stub");        -- oleauto.h:1864
  3897.     pragma Import(Stdcall, ICreateTypeLib_SetLibFlags_Proxy, 
  3898.                      "ICreateTypeLib_SetLibFlags_Proxy");   -- oleauto.h:1871
  3899.     pragma Import(Stdcall, ICreateTypeLib_SetLibFlags_Stub, 
  3900.                      "ICreateTypeLib_SetLibFlags_Stub");    -- oleauto.h:1876
  3901.     pragma Import(Stdcall, ICreateTypeLib_SaveAllChanges_Proxy, 
  3902.                      "ICreateTypeLib_SaveAllChanges_Proxy");-- oleauto.h:1883
  3903.     pragma Import(Stdcall, ICreateTypeLib_SaveAllChanges_Stub, 
  3904.                      "ICreateTypeLib_SaveAllChanges_Stub"); -- oleauto.h:1887
  3905.     pragma Import(Stdcall, IDispatch_GetTypeInfoCount_Proxy,
  3906.                      "IDispatch_GetTypeInfoCount_Proxy");   -- oleauto.h:2062
  3907.     pragma Import(Stdcall, IDispatch_GetTypeInfoCount_Stub,
  3908.                      "IDispatch_GetTypeInfoCount_Stub");    -- oleauto.h:2067
  3909.     pragma Import(Stdcall, IDispatch_GetTypeInfo_Proxy,
  3910.                      "IDispatch_GetTypeInfo_Proxy");        -- oleauto.h:2074
  3911.     pragma Import(Stdcall, IDispatch_GetTypeInfo_Stub,
  3912.                      "IDispatch_GetTypeInfo_Stub");         -- oleauto.h:2081
  3913.     pragma Import(Stdcall, IDispatch_GetIDsOfNames_Proxy,
  3914.                      "IDispatch_GetIDsOfNames_Proxy");      -- oleauto.h:2088
  3915.     pragma Import(Stdcall, IDispatch_GetIDsOfNames_Stub,
  3916.                      "IDispatch_GetIDsOfNames_Stub");       -- oleauto.h:2097
  3917.     pragma Import(Stdcall, IDispatch_Invoke_Proxy,
  3918.                      "IDispatch_Invoke_Proxy");             -- oleauto.h:2104
  3919.     pragma Import(Stdcall, IDispatch_Invoke_Stub,
  3920.                      "IDispatch_Invoke_Stub");              -- oleauto.h:2116
  3921.     pragma Import(Stdcall, IEnumVARIANT_Next_Proxy,
  3922.                      "IEnumVARIANT_Next_Proxy");            -- oleauto.h:2238
  3923.     pragma Import(Stdcall, IEnumVARIANT_Next_Stub,
  3924.                      "IEnumVARIANT_Next_Stub");             -- oleauto.h:2245
  3925.     pragma Import(Stdcall, IEnumVARIANT_Skip_Proxy,
  3926.                      "IEnumVARIANT_Skip_Proxy");            -- oleauto.h:2252
  3927.     pragma Import(Stdcall, IEnumVARIANT_Skip_Stub,
  3928.                      "IEnumVARIANT_Skip_Stub");             -- oleauto.h:2257
  3929.     pragma Import(Stdcall, IEnumVARIANT_Reset_Proxy,
  3930.                      "IEnumVARIANT_Reset_Proxy");           -- oleauto.h:2264
  3931.     pragma Import(Stdcall, IEnumVARIANT_Reset_Stub,
  3932.                      "IEnumVARIANT_Reset_Stub");            -- oleauto.h:2268
  3933.     pragma Import(Stdcall, IEnumVARIANT_Clone_Proxy,
  3934.                      "IEnumVARIANT_Clone_Proxy");           -- oleauto.h:2275
  3935.     pragma Import(Stdcall, IEnumVARIANT_Clone_Stub,
  3936.                      "IEnumVARIANT_Clone_Stub");            -- oleauto.h:2280
  3937.     pragma Import(Stdcall, ITypeComp_Bind_Proxy,
  3938.                      "ITypeComp_Bind_Proxy");               -- oleauto.h:2425
  3939.     pragma Import(Stdcall, ITypeComp_Bind_Stub,
  3940.                      "ITypeComp_Bind_Stub");                -- oleauto.h:2435
  3941.     pragma Import(Stdcall, ITypeComp_BindType_Proxy,
  3942.                      "ITypeComp_BindType_Proxy");           -- oleauto.h:2442
  3943.     pragma Import(Stdcall, ITypeComp_BindType_Stub,
  3944.                      "ITypeComp_BindType_Stub");            -- oleauto.h:2450
  3945.     pragma Import(Stdcall, ITypeInfo_GetTypeAttr_Proxy,
  3946.                      "ITypeInfo_GetTypeAttr_Proxy");        -- oleauto.h:2780
  3947.     pragma Import(Stdcall, ITypeInfo_GetTypeAttr_Stub,
  3948.                      "ITypeInfo_GetTypeAttr_Stub");         -- oleauto.h:2785
  3949.     pragma Import(Stdcall, ITypeInfo_GetTypeComp_Proxy,
  3950.                      "ITypeInfo_GetTypeComp_Proxy");        -- oleauto.h:2792
  3951.     pragma Import(Stdcall, ITypeInfo_GetTypeComp_Stub,
  3952.                      "ITypeInfo_GetTypeComp_Stub");         -- oleauto.h:2797
  3953.     pragma Import(Stdcall, ITypeInfo_GetFuncDesc_Proxy,
  3954.                      "ITypeInfo_GetFuncDesc_Proxy");        -- oleauto.h:2804
  3955.     pragma Import(Stdcall, ITypeInfo_GetFuncDesc_Stub,
  3956.                      "ITypeInfo_GetFuncDesc_Stub");         -- oleauto.h:2810
  3957.     pragma Import(Stdcall, ITypeInfo_GetVarDesc_Proxy,
  3958.                      "ITypeInfo_GetVarDesc_Proxy");         -- oleauto.h:2817
  3959.     pragma Import(Stdcall, ITypeInfo_GetVarDesc_Stub,
  3960.                      "ITypeInfo_GetVarDesc_Stub");          -- oleauto.h:2823
  3961.     pragma Import(Stdcall, ITypeInfo_GetNames_Proxy,
  3962.                      "ITypeInfo_GetNames_Proxy");           -- oleauto.h:2830
  3963.     pragma Import(Stdcall, ITypeInfo_GetNames_Stub,
  3964.                      "ITypeInfo_GetNames_Stub");            -- oleauto.h:2838
  3965.     pragma Import(Stdcall, ITypeInfo_GetRefTypeOfImplType_Proxy,
  3966.                      "ITypeInfo_GetRefTypeOfImplType_Proxy");
  3967.                                                             -- oleauto.h:2845
  3968.     pragma Import(Stdcall, ITypeInfo_GetRefTypeOfImplType_Stub,
  3969.                      "ITypeInfo_GetRefTypeOfImplType_Stub");-- oleauto.h:2851
  3970.     pragma Import(Stdcall, ITypeInfo_GetImplTypeFlags_Proxy,
  3971.                      "ITypeInfo_GetImplTypeFlags_Proxy");   -- oleauto.h:2858
  3972.     pragma Import(Stdcall, ITypeInfo_GetImplTypeFlags_Stub,
  3973.                      "ITypeInfo_GetImplTypeFlags_Stub");    -- oleauto.h:2864
  3974.     pragma Import(Stdcall, ITypeInfo_GetIDsOfNames_Proxy,
  3975.                      "ITypeInfo_GetIDsOfNames_Proxy");      -- oleauto.h:2871
  3976.     pragma Import(Stdcall, ITypeInfo_GetIDsOfNames_Stub,
  3977.                      "ITypeInfo_GetIDsOfNames_Stub");       -- oleauto.h:2878
  3978.     pragma Import(Stdcall, ITypeInfo_Invoke_Proxy,
  3979.                      "ITypeInfo_Invoke_Proxy");             -- oleauto.h:2885
  3980.     pragma Import(Stdcall, ITypeInfo_Invoke_Stub,
  3981.                      "ITypeInfo_Invoke_Stub");              -- oleauto.h:2896
  3982.     pragma Import(Stdcall, ITypeInfo_GetDocumentation_Proxy,
  3983.                      "ITypeInfo_GetDocumentation_Proxy");   -- oleauto.h:2903
  3984.     pragma Import(Stdcall, ITypeInfo_GetDocumentation_Stub,
  3985.                      "ITypeInfo_GetDocumentation_Stub");    -- oleauto.h:2912
  3986.     pragma Import(Stdcall, ITypeInfo_GetDllEntry_Proxy,
  3987.                      "ITypeInfo_GetDllEntry_Proxy");        -- oleauto.h:2919
  3988.     pragma Import(Stdcall, ITypeInfo_GetDllEntry_Stub,
  3989.                      "ITypeInfo_GetDllEntry_Stub");         -- oleauto.h:2928
  3990.     pragma Import(Stdcall, ITypeInfo_GetRefTypeInfo_Proxy,
  3991.                      "ITypeInfo_GetRefTypeInfo_Proxy");     -- oleauto.h:2935
  3992.     pragma Import(Stdcall, ITypeInfo_GetRefTypeInfo_Stub,
  3993.                      "ITypeInfo_GetRefTypeInfo_Stub");      -- oleauto.h:2941
  3994.     pragma Import(Stdcall, ITypeInfo_RemoteAddressOfMember_Proxy,
  3995.                      "ITypeInfo_RemoteAddressOfMember_Proxy");
  3996.                                                             -- oleauto.h:2948
  3997.     pragma Import(Stdcall, ITypeInfo_RemoteAddressOfMember_Stub,
  3998.                      "ITypeInfo_RemoteAddressOfMember_Stub");
  3999.                                                             -- oleauto.h:2952
  4000.     pragma Import(Stdcall, ITypeInfo_CreateInstance_Proxy,
  4001.                      "ITypeInfo_CreateInstance_Proxy");     -- oleauto.h:2959
  4002.     pragma Import(Stdcall, ITypeInfo_CreateInstance_Stub,
  4003.                      "ITypeInfo_CreateInstance_Stub");      -- oleauto.h:2966
  4004.     pragma Import(Stdcall, ITypeInfo_GetMops_Proxy,
  4005.                      "ITypeInfo_GetMops_Proxy");            -- oleauto.h:2973
  4006.     pragma Import(Stdcall, ITypeInfo_GetMops_Stub,
  4007.                      "ITypeInfo_GetMops_Stub");             -- oleauto.h:2979
  4008.     pragma Import(Stdcall, ITypeInfo_GetContainingTypeLib_Proxy,
  4009.                      "ITypeInfo_GetContainingTypeLib_Proxy");
  4010.                                                             -- oleauto.h:2986
  4011.     pragma Import(Stdcall, ITypeInfo_GetContainingTypeLib_Stub,
  4012.                      "ITypeInfo_GetContainingTypeLib_Stub");-- oleauto.h:2992
  4013.     pragma Import(Stdcall, ITypeInfo_ReleaseTypeAttr_Proxy,
  4014.                      "ITypeInfo_ReleaseTypeAttr_Proxy");    -- oleauto.h:2999
  4015.     pragma Import(Stdcall, ITypeInfo_ReleaseTypeAttr_Stub,
  4016.                      "ITypeInfo_ReleaseTypeAttr_Stub");     -- oleauto.h:3004
  4017.     pragma Import(Stdcall, ITypeInfo_ReleaseFuncDesc_Proxy,
  4018.                      "ITypeInfo_ReleaseFuncDesc_Proxy");    -- oleauto.h:3011
  4019.     pragma Import(Stdcall, ITypeInfo_ReleaseFuncDesc_Stub,
  4020.                      "ITypeInfo_ReleaseFuncDesc_Stub");     -- oleauto.h:3016
  4021.     pragma Import(Stdcall, ITypeInfo_ReleaseVarDesc_Proxy,
  4022.                      "ITypeInfo_ReleaseVarDesc_Proxy");     -- oleauto.h:3023
  4023.     pragma Import(Stdcall, ITypeInfo_ReleaseVarDesc_Stub,
  4024.                      "ITypeInfo_ReleaseVarDesc_Stub");      -- oleauto.h:3028
  4025.     pragma Import(Stdcall, ITypeLib_GetTypeInfoCount_Proxy,
  4026.                      "ITypeLib_GetTypeInfoCount_Proxy");    -- oleauto.h:3266
  4027.     pragma Import(Stdcall, ITypeLib_GetTypeInfoCount_Stub,
  4028.                      "ITypeLib_GetTypeInfoCount_Stub");     -- oleauto.h:3270
  4029.     pragma Import(Stdcall, ITypeLib_GetTypeInfo_Proxy,
  4030.                      "ITypeLib_GetTypeInfo_Proxy");         -- oleauto.h:3277
  4031.     pragma Import(Stdcall, ITypeLib_GetTypeInfo_Stub,
  4032.                      "ITypeLib_GetTypeInfo_Stub");          -- oleauto.h:3283
  4033.     pragma Import(Stdcall, ITypeLib_GetTypeInfoType_Proxy,
  4034.                      "ITypeLib_GetTypeInfoType_Proxy");     -- oleauto.h:3290
  4035.     pragma Import(Stdcall, ITypeLib_GetTypeInfoType_Stub,
  4036.                      "ITypeLib_GetTypeInfoType_Stub");      -- oleauto.h:3296
  4037.     pragma Import(Stdcall, ITypeLib_GetTypeInfoOfGuid_Proxy,
  4038.                      "ITypeLib_GetTypeInfoOfGuid_Proxy");   -- oleauto.h:3303
  4039.     pragma Import(Stdcall, ITypeLib_GetTypeInfoOfGuid_Stub,
  4040.                      "ITypeLib_GetTypeInfoOfGuid_Stub");    -- oleauto.h:3309
  4041.     pragma Import(Stdcall, ITypeLib_GetLibAttr_Proxy,
  4042.                      "ITypeLib_GetLibAttr_Proxy");          -- oleauto.h:3316
  4043.     pragma Import(Stdcall, ITypeLib_GetLibAttr_Stub,
  4044.                      "ITypeLib_GetLibAttr_Stub");           -- oleauto.h:3321
  4045.     pragma Import(Stdcall, ITypeLib_GetTypeComp_Proxy,
  4046.                      "ITypeLib_GetTypeComp_Proxy");         -- oleauto.h:3328
  4047.     pragma Import(Stdcall, ITypeLib_GetTypeComp_Stub,
  4048.                      "ITypeLib_GetTypeComp_Stub");          -- oleauto.h:3333
  4049.     pragma Import(Stdcall, ITypeLib_GetDocumentation_Proxy,
  4050.                      "ITypeLib_GetDocumentation_Proxy");    -- oleauto.h:3340
  4051.     pragma Import(Stdcall, ITypeLib_GetDocumentation_Stub,
  4052.                      "ITypeLib_GetDocumentation_Stub");     -- oleauto.h:3349
  4053.     pragma Import(Stdcall, ITypeLib_IsName_Proxy,
  4054.                      "ITypeLib_IsName_Proxy");              -- oleauto.h:3356
  4055.     pragma Import(Stdcall, ITypeLib_IsName_Stub,
  4056.                      "ITypeLib_IsName_Stub");               -- oleauto.h:3363
  4057.     pragma Import(Stdcall, ITypeLib_FindName_Proxy,
  4058.                      "ITypeLib_FindName_Proxy");            -- oleauto.h:3370
  4059.     pragma Import(Stdcall, ITypeLib_FindName_Stub,
  4060.                      "ITypeLib_FindName_Stub");             -- oleauto.h:3379
  4061.     pragma Import(Stdcall, ITypeLib_ReleaseTLibAttr_Proxy,
  4062.                      "ITypeLib_ReleaseTLibAttr_Proxy");     -- oleauto.h:3386
  4063.     pragma Import(Stdcall, ITypeLib_ReleaseTLibAttr_Stub,
  4064.                      "ITypeLib_ReleaseTLibAttr_Stub");      -- oleauto.h:3391
  4065.     pragma Import(Stdcall, IErrorInfo_GetGUID_Proxy,
  4066.                      "IErrorInfo_GetGUID_Proxy");           -- oleauto.h:3521
  4067.     pragma Import(Stdcall, IErrorInfo_GetGUID_Stub,
  4068.                      "IErrorInfo_GetGUID_Stub");            -- oleauto.h:3526
  4069.     pragma Import(Stdcall, IErrorInfo_GetSource_Proxy,
  4070.                      "IErrorInfo_GetSource_Proxy");         -- oleauto.h:3533
  4071.     pragma Import(Stdcall, IErrorInfo_GetSource_Stub,
  4072.                      "IErrorInfo_GetSource_Stub");          -- oleauto.h:3538
  4073.     pragma Import(Stdcall, IErrorInfo_GetDescription_Proxy,
  4074.                      "IErrorInfo_GetDescription_Proxy");    -- oleauto.h:3545
  4075.     pragma Import(Stdcall, IErrorInfo_GetDescription_Stub,
  4076.                      "IErrorInfo_GetDescription_Stub");     -- oleauto.h:3550
  4077.     pragma Import(Stdcall, IErrorInfo_GetHelpFile_Proxy,
  4078.                      "IErrorInfo_GetHelpFile_Proxy");       -- oleauto.h:3557
  4079.     pragma Import(Stdcall, IErrorInfo_GetHelpFile_Stub,
  4080.                      "IErrorInfo_GetHelpFile_Stub");        -- oleauto.h:3562
  4081.     pragma Import(Stdcall, IErrorInfo_GetHelpContext_Proxy,
  4082.                      "IErrorInfo_GetHelpContext_Proxy");    -- oleauto.h:3569
  4083.     pragma Import(Stdcall, IErrorInfo_GetHelpContext_Stub,
  4084.                      "IErrorInfo_GetHelpContext_Stub");     -- oleauto.h:3574
  4085.     pragma Import(Stdcall, ICreateErrorInfo_SetGUID_Proxy,
  4086.                      "ICreateErrorInfo_SetGUID_Proxy");     -- oleauto.h:3704
  4087.     pragma Import(Stdcall, ICreateErrorInfo_SetGUID_Stub,
  4088.                      "ICreateErrorInfo_SetGUID_Stub");      -- oleauto.h:3709
  4089.     pragma Import(Stdcall, ICreateErrorInfo_SetSource_Proxy,
  4090.                      "ICreateErrorInfo_SetSource_Proxy");   -- oleauto.h:3716
  4091.     pragma Import(Stdcall, ICreateErrorInfo_SetSource_Stub,
  4092.                      "ICreateErrorInfo_SetSource_Stub");    -- oleauto.h:3721
  4093.     pragma Import(Stdcall, ICreateErrorInfo_SetDescription_Proxy,
  4094.                      "ICreateErrorInfo_SetDescription_Proxy");
  4095.                                                             -- oleauto.h:3728
  4096.     pragma Import(Stdcall, ICreateErrorInfo_SetDescription_Stub,
  4097.                      "ICreateErrorInfo_SetDescription_Stub");
  4098.                                                             -- oleauto.h:3733
  4099.     pragma Import(Stdcall, ICreateErrorInfo_SetHelpFile_Proxy,
  4100.                      "ICreateErrorInfo_SetHelpFile_Proxy"); -- oleauto.h:3740
  4101.     pragma Import(Stdcall, ICreateErrorInfo_SetHelpFile_Stub,
  4102.                      "ICreateErrorInfo_SetHelpFile_Stub");  -- oleauto.h:3745
  4103.     pragma Import(Stdcall, ICreateErrorInfo_SetHelpContext_Proxy,
  4104.                      "ICreateErrorInfo_SetHelpContext_Proxy");
  4105.                                                             -- oleauto.h:3752
  4106.     pragma Import(Stdcall, ICreateErrorInfo_SetHelpContext_Stub,
  4107.                      "ICreateErrorInfo_SetHelpContext_Stub");
  4108.                                                             -- oleauto.h:3757
  4109.     pragma Import(Stdcall, ISupportErrorInfo_InterfaceSupportsErrorInfo_Proxy,
  4110.                      "ISupportErrorInfo_InterfaceSupportsErrorInfo_Proxy");
  4111.                                                             -- oleauto.h:3847
  4112.     pragma Import(Stdcall, ISupportErrorInfo_InterfaceSupportsErrorInfo_Stub,
  4113.                      "ISupportErrorInfo_InterfaceSupportsErrorInfo_Stub");
  4114.                                                             -- oleauto.h:3852
  4115.     pragma Import(Stdcall, SysAllocString, "SysAllocString");     -- oleauto.h:3876
  4116.     pragma Import(Stdcall, SysReAllocString, "SysReAllocString"); -- oleauto.h:3877
  4117.     pragma Import(Stdcall, SysAllocStringLen, "SysAllocStringLen");
  4118.                                                             -- oleauto.h:3878
  4119.     pragma Import(Stdcall, SysReAllocStringLen, "SysReAllocStringLen");
  4120.                                                             -- oleauto.h:3879
  4121.     pragma Import(Stdcall, SysFreeString, "SysFreeString");       -- oleauto.h:3880
  4122.     pragma Import(Stdcall, SysStringLen, "SysStringLen");         -- oleauto.h:3881
  4123.     pragma Import(Stdcall, SysStringByteLen, "SysStringByteLen"); -- oleauto.h:3884
  4124.     pragma Import(Stdcall, SysAllocStringByteLen, "SysAllocStringByteLen");
  4125.                                                             -- oleauto.h:3885
  4126.     pragma Import(Stdcall, DosDateTimeToVariantTime, "DosDateTimeToVariantTime");
  4127.                                                             -- oleauto.h:3893
  4128.     pragma Import(Stdcall, VariantTimeToDosDateTime, "VariantTimeToDosDateTime");
  4129.                                                             -- oleauto.h:3899
  4130.     pragma Import(Stdcall, SafeArrayAllocDescriptor, "SafeArrayAllocDescriptor");
  4131.                                                             -- oleauto.h:3909
  4132.     pragma Import(Stdcall, SafeArrayAllocData, "SafeArrayAllocData");
  4133.                                                             -- oleauto.h:3911
  4134.     pragma Import(Stdcall, SafeArrayCreate, "SafeArrayCreate");   -- oleauto.h:3914
  4135.     pragma Import(Stdcall, SafeArrayDestroyDescriptor, "SafeArrayDestroyDescriptor");
  4136.                                                             -- oleauto.h:3919
  4137.     pragma Import(Stdcall, SafeArrayDestroyData, "SafeArrayDestroyData");
  4138.                                                             -- oleauto.h:3921
  4139.     pragma Import(Stdcall, SafeArrayDestroy, "SafeArrayDestroy"); -- oleauto.h:3923
  4140.     pragma Import(Stdcall, SafeArrayRedim, "SafeArrayRedim");     -- oleauto.h:3925
  4141.     pragma Import(Stdcall, SafeArrayGetDim, "SafeArrayGetDim");   -- oleauto.h:3927
  4142.     pragma Import(Stdcall, SafeArrayGetElemsize, "SafeArrayGetElemsize");
  4143.                                                             -- oleauto.h:3929
  4144.     pragma Import(Stdcall, SafeArrayGetUBound, "SafeArrayGetUBound");
  4145.                                                             -- oleauto.h:3932
  4146.     pragma Import(Stdcall, SafeArrayGetLBound, "SafeArrayGetLBound");
  4147.                                                             -- oleauto.h:3935
  4148.     pragma Import(Stdcall, SafeArrayLock, "SafeArrayLock");       -- oleauto.h:3937
  4149.     pragma Import(Stdcall, SafeArrayUnlock, "SafeArrayUnlock");   -- oleauto.h:3939
  4150.     pragma Import(Stdcall, SafeArrayAccessData, "SafeArrayAccessData");
  4151.                                                             -- oleauto.h:3941
  4152.     pragma Import(Stdcall, SafeArrayUnaccessData, "SafeArrayUnaccessData");
  4153.                                                             -- oleauto.h:3943
  4154.     pragma Import(Stdcall, SafeArrayGetElement, "SafeArrayGetElement");
  4155.                                                             -- oleauto.h:3946
  4156.     pragma Import(Stdcall, SafeArrayPutElement, "SafeArrayPutElement");
  4157.                                                             -- oleauto.h:3952
  4158.     pragma Import(Stdcall, SafeArrayCopy, "SafeArrayCopy");       -- oleauto.h:3958
  4159.     pragma Import(Stdcall, SafeArrayPtrOfIndex, "SafeArrayPtrOfIndex");
  4160.                                                             -- oleauto.h:3963
  4161.     pragma Import(Stdcall, VariantInit, "VariantInit");           -- oleauto.h:3974
  4162.     pragma Import(Stdcall, VariantClear, "VariantClear");         -- oleauto.h:3977
  4163.     pragma Import(Stdcall, VariantCopy, "VariantCopy");           -- oleauto.h:3980
  4164.     pragma Import(Stdcall, VariantCopyInd, "VariantCopyInd");     -- oleauto.h:3985
  4165.     pragma Import(Stdcall, VariantChangeType, "VariantChangeType");
  4166.                                                             -- oleauto.h:3990
  4167.     pragma Import(Stdcall, VariantChangeTypeEx, "VariantChangeTypeEx");
  4168.                                                             -- oleauto.h:3997
  4169.     pragma Import(Stdcall, VarUI1FromI2, "VarUI1FromI2");         -- oleauto.h:4031
  4170.     pragma Import(Stdcall, VarUI1FromI4, "VarUI1FromI4");         -- oleauto.h:4032
  4171.     pragma Import(Stdcall, VarUI1FromR4, "VarUI1FromR4");         -- oleauto.h:4033
  4172.     pragma Import(Stdcall, VarUI1FromR8, "VarUI1FromR8");         -- oleauto.h:4034
  4173.     pragma Import(Stdcall, VarUI1FromCy, "VarUI1FromCy");         -- oleauto.h:4035
  4174.     pragma Import(Stdcall, VarUI1FromDate, "VarUI1FromDate");     -- oleauto.h:4036
  4175.     pragma Import(Stdcall, VarUI1FromStr, "VarUI1FromStr");       -- oleauto.h:4037
  4176.     pragma Import(Stdcall, VarUI1FromDisp, "VarUI1FromDisp");     -- oleauto.h:4038
  4177.     pragma Import(Stdcall, VarUI1FromBool, "VarUI1FromBool");     -- oleauto.h:4039
  4178.     pragma Import(Stdcall, VarI2FromUI1, "VarI2FromUI1");         -- oleauto.h:4041
  4179.     pragma Import(Stdcall, VarI2FromI4, "VarI2FromI4");           -- oleauto.h:4042
  4180.     pragma Import(Stdcall, VarI2FromR4, "VarI2FromR4");           -- oleauto.h:4043
  4181.     pragma Import(Stdcall, VarI2FromR8, "VarI2FromR8");           -- oleauto.h:4044
  4182.     pragma Import(Stdcall, VarI2FromCy, "VarI2FromCy");           -- oleauto.h:4045
  4183.     pragma Import(Stdcall, VarI2FromDate, "VarI2FromDate");       -- oleauto.h:4046
  4184.     pragma Import(Stdcall, VarI2FromStr, "VarI2FromStr");         -- oleauto.h:4047
  4185.     pragma Import(Stdcall, VarI2FromDisp, "VarI2FromDisp");       -- oleauto.h:4048
  4186.     pragma Import(Stdcall, VarI2FromBool, "VarI2FromBool");       -- oleauto.h:4049
  4187.     pragma Import(Stdcall, VarI4FromUI1, "VarI4FromUI1");         -- oleauto.h:4051
  4188.     pragma Import(Stdcall, VarI4FromI2, "VarI4FromI2");           -- oleauto.h:4052
  4189.     pragma Import(Stdcall, VarI4FromR4, "VarI4FromR4");           -- oleauto.h:4053
  4190.     pragma Import(Stdcall, VarI4FromR8, "VarI4FromR8");           -- oleauto.h:4054
  4191.     pragma Import(Stdcall, VarI4FromCy, "VarI4FromCy");           -- oleauto.h:4055
  4192.     pragma Import(Stdcall, VarI4FromDate, "VarI4FromDate");       -- oleauto.h:4056
  4193.     pragma Import(Stdcall, VarI4FromStr, "VarI4FromStr");         -- oleauto.h:4057
  4194.     pragma Import(Stdcall, VarI4FromDisp, "VarI4FromDisp");       -- oleauto.h:4058
  4195.     pragma Import(Stdcall, VarI4FromBool, "VarI4FromBool");       -- oleauto.h:4059
  4196.     pragma Import(Stdcall, VarR4FromUI1, "VarR4FromUI1");         -- oleauto.h:4061
  4197.     pragma Import(Stdcall, VarR4FromI2, "VarR4FromI2");           -- oleauto.h:4062
  4198.     pragma Import(Stdcall, VarR4FromI4, "VarR4FromI4");           -- oleauto.h:4063
  4199.     pragma Import(Stdcall, VarR4FromR8, "VarR4FromR8");           -- oleauto.h:4064
  4200.     pragma Import(Stdcall, VarR4FromCy, "VarR4FromCy");           -- oleauto.h:4065
  4201.     pragma Import(Stdcall, VarR4FromDate, "VarR4FromDate");       -- oleauto.h:4066
  4202.     pragma Import(Stdcall, VarR4FromStr, "VarR4FromStr");         -- oleauto.h:4067
  4203.     pragma Import(Stdcall, VarR4FromDisp, "VarR4FromDisp");       -- oleauto.h:4068
  4204.     pragma Import(Stdcall, VarR4FromBool, "VarR4FromBool");       -- oleauto.h:4069
  4205.     pragma Import(Stdcall, VarR8FromUI1, "VarR8FromUI1");         -- oleauto.h:4071
  4206.     pragma Import(Stdcall, VarR8FromI2, "VarR8FromI2");           -- oleauto.h:4072
  4207.     pragma Import(Stdcall, VarR8FromI4, "VarR8FromI4");           -- oleauto.h:4073
  4208.     pragma Import(Stdcall, VarR8FromR4, "VarR8FromR4");           -- oleauto.h:4074
  4209.     pragma Import(Stdcall, VarR8FromCy, "VarR8FromCy");           -- oleauto.h:4075
  4210.     pragma Import(Stdcall, VarR8FromDate, "VarR8FromDate");       -- oleauto.h:4076
  4211.     pragma Import(Stdcall, VarR8FromStr, "VarR8FromStr");         -- oleauto.h:4077
  4212.     pragma Import(Stdcall, VarR8FromDisp, "VarR8FromDisp");       -- oleauto.h:4078
  4213.     pragma Import(Stdcall, VarR8FromBool, "VarR8FromBool");       -- oleauto.h:4079
  4214.     pragma Import(Stdcall, VarDateFromUI1, "VarDateFromUI1");     -- oleauto.h:4081
  4215.     pragma Import(Stdcall, VarDateFromI2, "VarDateFromI2");       -- oleauto.h:4082
  4216.     pragma Import(Stdcall, VarDateFromI4, "VarDateFromI4");       -- oleauto.h:4083
  4217.     pragma Import(Stdcall, VarDateFromR4, "VarDateFromR4");       -- oleauto.h:4084
  4218.     pragma Import(Stdcall, VarDateFromR8, "VarDateFromR8");       -- oleauto.h:4085
  4219.     pragma Import(Stdcall, VarDateFromCy, "VarDateFromCy");       -- oleauto.h:4086
  4220.     pragma Import(Stdcall, VarDateFromStr, "VarDateFromStr");     -- oleauto.h:4087
  4221.     pragma Import(Stdcall, VarDateFromDisp, "VarDateFromDisp");   -- oleauto.h:4088
  4222.     pragma Import(Stdcall, VarDateFromBool, "VarDateFromBool");   -- oleauto.h:4089
  4223.     pragma Import(Stdcall, VarCyFromUI1, "VarCyFromUI1");         -- oleauto.h:4091
  4224.     pragma Import(Stdcall, VarCyFromI2, "VarCyFromI2");           -- oleauto.h:4092
  4225.     pragma Import(Stdcall, VarCyFromI4, "VarCyFromI4");           -- oleauto.h:4093
  4226.     pragma Import(Stdcall, VarCyFromR4, "VarCyFromR4");           -- oleauto.h:4094
  4227.     pragma Import(Stdcall, VarCyFromR8, "VarCyFromR8");           -- oleauto.h:4095
  4228.     pragma Import(Stdcall, VarCyFromDate, "VarCyFromDate");       -- oleauto.h:4096
  4229.     pragma Import(Stdcall, VarCyFromStr, "VarCyFromStr");         -- oleauto.h:4097
  4230.     pragma Import(Stdcall, VarCyFromDisp, "VarCyFromDisp");       -- oleauto.h:4098
  4231.     pragma Import(Stdcall, VarCyFromBool, "VarCyFromBool");       -- oleauto.h:4099
  4232.     pragma Import(Stdcall, VarBstrFromUI1, "VarBstrFromUI1");     -- oleauto.h:4101
  4233.     pragma Import(Stdcall, VarBstrFromI2, "VarBstrFromI2");       -- oleauto.h:4102
  4234.     pragma Import(Stdcall, VarBstrFromI4, "VarBstrFromI4");       -- oleauto.h:4103
  4235.     pragma Import(Stdcall, VarBstrFromR4, "VarBstrFromR4");       -- oleauto.h:4104
  4236.     pragma Import(Stdcall, VarBstrFromR8, "VarBstrFromR8");       -- oleauto.h:4105
  4237.     pragma Import(Stdcall, VarBstrFromCy, "VarBstrFromCy");       -- oleauto.h:4106
  4238.     pragma Import(Stdcall, VarBstrFromDate, "VarBstrFromDate");   -- oleauto.h:4107
  4239.     pragma Import(Stdcall, VarBstrFromDisp, "VarBstrFromDisp");   -- oleauto.h:4108
  4240.     pragma Import(Stdcall, VarBstrFromBool, "VarBstrFromBool");   -- oleauto.h:4109
  4241.     pragma Import(Stdcall, VarBoolFromUI1, "VarBoolFromUI1");     -- oleauto.h:4111
  4242.     pragma Import(Stdcall, VarBoolFromI2, "VarBoolFromI2");       -- oleauto.h:4112
  4243.     pragma Import(Stdcall, VarBoolFromI4, "VarBoolFromI4");       -- oleauto.h:4113
  4244.     pragma Import(Stdcall, VarBoolFromR4, "VarBoolFromR4");       -- oleauto.h:4114
  4245.     pragma Import(Stdcall, VarBoolFromR8, "VarBoolFromR8");       -- oleauto.h:4115
  4246.     pragma Import(Stdcall, VarBoolFromDate, "VarBoolFromDate");   -- oleauto.h:4116
  4247.     pragma Import(Stdcall, VarBoolFromCy, "VarBoolFromCy");       -- oleauto.h:4117
  4248.     pragma Import(Stdcall, VarBoolFromStr, "VarBoolFromStr");     -- oleauto.h:4118
  4249.     pragma Import(Stdcall, VarBoolFromDisp, "VarBoolFromDisp");   -- oleauto.h:4119
  4250.     pragma Import(Stdcall, LHashValOfNameSysA, "LHashValOfNameSysA");
  4251.                                                             -- oleauto.h:4190
  4252.     pragma Import(Stdcall, LHashValOfNameSys, "LHashValOfNameSys");
  4253.                                                             -- oleauto.h:4194
  4254.     pragma Import(Stdcall, LoadTypeLib, "LoadTypeLib");           -- oleauto.h:4208
  4255.     pragma Import(Stdcall, LoadRegTypeLib, "LoadRegTypeLib");     -- oleauto.h:4213
  4256.     pragma Import(Stdcall, QueryPathOfRegTypeLib, "QueryPathOfRegTypeLib");
  4257.                                                             -- oleauto.h:4223
  4258.     pragma Import(Stdcall, RegisterTypeLib, "RegisterTypeLib");   -- oleauto.h:4233
  4259.     pragma Import(Stdcall, DeregisterTypeLib, "DeregisterTypeLib");
  4260.                                                             -- oleauto.h:4239
  4261.     pragma Import(Stdcall, CreateTypeLib, "CreateTypeLib");       -- oleauto.h:4242
  4262.     pragma Import(Stdcall, DispGetParam, "DispGetParam");         -- oleauto.h:4286
  4263.     pragma Import(Stdcall, DispGetIDsOfNames, "DispGetIDsOfNames");
  4264.                                                             -- oleauto.h:4296
  4265.     pragma Import(Stdcall, DispInvoke, "DispInvoke");             -- oleauto.h:4305
  4266.     pragma Import(Stdcall, CreateDispTypeInfo, "CreateDispTypeInfo");
  4267.                                                             -- oleauto.h:4318
  4268.     pragma Import(Stdcall, CreateStdDispatch, "CreateStdDispatch");
  4269.                                                             -- oleauto.h:4327
  4270.     pragma Import(Stdcall, RegisterActiveObject, "RegisterActiveObject");
  4271.                                                             -- oleauto.h:4343
  4272.     pragma Import(Stdcall, RevokeActiveObject, "RevokeActiveObject");
  4273.                                                             -- oleauto.h:4350
  4274.     pragma Import(Stdcall, GetActiveObject, "GetActiveObject");   -- oleauto.h:4355
  4275.     pragma Import(Stdcall, SetErrorInfo, "SetErrorInfo");         -- oleauto.h:4364
  4276.     pragma Import(Stdcall, GetErrorInfo, "GetErrorInfo");         -- oleauto.h:4365
  4277.     pragma Import(Stdcall, CreateErrorInfo, "CreateErrorInfo");   -- oleauto.h:4366
  4278.     pragma Import(Stdcall, OaBuildVersion, "OaBuildVersion");     -- oleauto.h:4372
  4279.  
  4280. -------------------------------------------------------------------------------
  4281. --
  4282. -- THIS FILE AND ANY ASSOCIATED DOCUMENTATION IS PROVIDED WITHOUT CHARGE
  4283. -- "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING
  4284. -- BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR
  4285. -- FITNESS FOR A PARTICULAR PURPOSE.  The user assumes the entire risk as to
  4286. -- the accuracy and the use of this file.  This file may be used, copied,
  4287. -- modified and distributed only by licensees of Microsoft Corporation's
  4288. -- WIN32 Software Development Kit in accordance with the terms of the 
  4289. -- licensee's End-User License Agreement for Microsoft Software for the
  4290. -- WIN32 Development Kit.
  4291. --
  4292. -- Copyright (c) Intermetrics, Inc. 1995
  4293. -- Portions (c) 1985-1994 Microsoft Corporation with permission.
  4294. -- Microsoft is a registered trademark and Windows and Windows NT are
  4295. -- trademarks of Microsoft Corporation.
  4296. --
  4297. -------------------------------------------------------------------------------
  4298.  
  4299. end Win32.Oleauto;
  4300.