windows: Add all shell32 function stubs. Add more com.

[factor.git] / basis / windows / ole32 / ole32.factor

diff --git a/basis/windows/ole32/ole32.factor b/basis/windows/ole32/ole32.factor
index 89a54b8f589918a940d0e5821c3227351ce7ee1d..84e3935ea58c797805a7cd676dea81a37dff519a 100644 (file)
--- a/basis/windows/ole32/ole32.factor
+++ b/basis/windows/ole32/ole32.factor
@@ -29,6 +29,10 @@ FUNCTION: HRESULT CLSIDFromString ( LPOLESTR lpsz, REFGUID out_rguid )
 
 CONSTANT: S_OK 0
 CONSTANT: S_FALSE 1
+CONSTANT: DRAGDROP_S_DROP 0x00040100
+CONSTANT: DRAGDROP_S_CANCEL 0x00040101
+CONSTANT: DRAGDROP_S_USEDEFAULTCURSORS 0x00040102
+
 CONSTANT: E_NOINTERFACE 0x80004002
 CONSTANT: E_FAIL 0x80004005
 CONSTANT: E_INVALIDARG 0x80070057
@@ -45,30 +49,6 @@ CONSTANT: DD_DEFSCROLLINTERVAL 50
 CONSTANT: DD_DEFDRAGDELAY 200
 CONSTANT: DD_DEFDRAGMINDIST 2
 
-CONSTANT: CF_TEXT             1
-CONSTANT: CF_BITMAP           2
-CONSTANT: CF_METAFILEPICT     3
-CONSTANT: CF_SYLK             4
-CONSTANT: CF_DIF              5
-CONSTANT: CF_TIFF             6
-CONSTANT: CF_OEMTEXT          7
-CONSTANT: CF_DIB              8
-CONSTANT: CF_PALETTE          9
-CONSTANT: CF_PENDATA          10
-CONSTANT: CF_RIFF             11
-CONSTANT: CF_WAVE             12
-CONSTANT: CF_UNICODETEXT      13
-CONSTANT: CF_ENHMETAFILE      14
-CONSTANT: CF_HDROP            15
-CONSTANT: CF_LOCALE           16
-CONSTANT: CF_MAX              17
-
-CONSTANT: CF_OWNERDISPLAY     0x0080
-CONSTANT: CF_DSPTEXT          0x0081
-CONSTANT: CF_DSPBITMAP        0x0082
-CONSTANT: CF_DSPMETAFILEPICT  0x0083
-CONSTANT: CF_DSPENHMETAFILE   0x008E
-
 CONSTANT: DVASPECT_CONTENT    1
 CONSTANT: DVASPECT_THUMBNAIL  2
 CONSTANT: DVASPECT_ICON       4