Files
harbour-core/contrib/hbwin/hbole.ch
vszakats 9687850865 2013-03-16 02:10 UTC+0100 Viktor Szakats (harbour syenar.net)
* (all files)
    * stripped svn header
    * minor cleanups
    ; use following command to find out the history of files:
       git log
       git log --follow
       git blame
       git annotate
2013-03-16 02:11:42 +01:00

108 lines
4.2 KiB
Plaintext

/*
* Harbour Project source code:
* OLE header
*
* Copyright 2012 Przemyslaw Czerpak <druzus / at / priv.onet.pl>
* www - http://harbour-project.org
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2, or (at your option)
* any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this software; see the file COPYING.txt. If not, write to
* the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
* Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/).
*
* As a special exception, the Harbour Project gives permission for
* additional uses of the text contained in its release of Harbour.
*
* The exception is that, if you link the Harbour libraries with other
* files to produce an executable, this does not by itself cause the
* resulting executable to be covered by the GNU General Public License.
* Your use of that executable is in no way restricted on account of
* linking the Harbour library code into it.
*
* This exception does not however invalidate any other reasons why
* the executable file might be covered by the GNU General Public License.
*
* This exception applies only to the code released by the Harbour
* Project under the name Harbour. If you copy code from other
* Harbour Project or Free Software Foundation releases into a copy of
* Harbour, as the General Public License permits, the exception does
* not apply to the code that you add in this way. To avoid misleading
* anyone as to the status of such modified files, you must delete
* this exception notice from them.
*
* If you write modifications of your own for Harbour, it is your choice
* whether to permit this exception to apply to your modifications.
* If you do not wish that, delete this exception notice.
*
*/
#ifndef HBOLE_CH_
#define HBOLE_CH_
/* Variant types */
#define WIN_VT_EMPTY 0
#define WIN_VT_NULL 1
#define WIN_VT_I2 2
#define WIN_VT_I4 3
#define WIN_VT_R4 4
#define WIN_VT_R8 5
#define WIN_VT_CY 6
#define WIN_VT_DATE 7
#define WIN_VT_BSTR 8
#define WIN_VT_DISPATCH 9
#define WIN_VT_ERROR 10
#define WIN_VT_BOOL 11
#define WIN_VT_VARIANT 12
#define WIN_VT_UNKNOWN 13
#define WIN_VT_DECIMAL 14
#define WIN_VT_I1 16
#define WIN_VT_UI1 17
#define WIN_VT_UI2 18
#define WIN_VT_UI4 19
#define WIN_VT_I8 20
#define WIN_VT_UI8 21
#define WIN_VT_INT 22
#define WIN_VT_UINT 23
#define WIN_VT_VOID 24
#define WIN_VT_HRESULT 25
#define WIN_VT_PTR 26
#define WIN_VT_SAFEARRAY 27
#define WIN_VT_CARRAY 28
#define WIN_VT_USERDEFINED 29
#define WIN_VT_LPSTR 30
#define WIN_VT_LPWSTR 31
#define WIN_VT_RECORD 36
#define WIN_VT_INT_PTR 37
#define WIN_VT_UINT_PTR 38
#define WIN_VT_FILETIME 64
#define WIN_VT_BLOB 65
#define WIN_VT_STREAM 66
#define WIN_VT_STORAGE 67
#define WIN_VT_STREAMED_OBJECT 68
#define WIN_VT_STORED_OBJECT 69
#define WIN_VT_BLOB_OBJECT 70
#define WIN_VT_CF 71
#define WIN_VT_CLSID 72
#define WIN_VT_VERSIONED_STREAM 73
#define WIN_VT_BSTR_BLOB 0x0fff
#define WIN_VT_VECTOR 0x1000
#define WIN_VT_ARRAY 0x2000
#define WIN_VT_BYREF 0x4000
#define WIN_VT_RESERVED 0x8000
#define WIN_VT_ILLEGAL 0xffff
#define WIN_VT_ILLEGALMASKED 0x0fff
#define WIN_VT_TYPEMASK 0x0fff
#endif /* HBOLE_CH_ */