Changeset 303 for trunk/Include/oleidl.ab
- Timestamp:
- Aug 24, 2007, 11:14:46 AM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Include/oleidl.ab
r300 r303 1 1 'oleidl.ab 2 2 3 Const Enum OLERENDER 3 #require <objidl.sbp> 4 5 Dim IID_IOleAdviseHolder = [&h00000111, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID 6 Interface IOleAdviseHolder 7 Inherits IUnknown 8 9 Function Advise( 10 /* [unique][in] */ Advise As IAdviseSink, 11 /* [out] */ ByRef dwConnection As DWord) As HRESULT 12 Function Unadvise( 13 /* [in] */ dwConnection As DWord) As HRESULT 14 Function EnumAdvise( 15 /* [out] */ ByRef enumAdvise As IEnumSTATDATA) As HRESULT 16 Function SendOnRename( 17 /* [unique][in] */ pmk As IMoniker) As HRESULT 18 Function SendOnSave() As HRESULT 19 Function SendOnClose() As HRESULT 20 End Interface 21 22 'IOleCache 23 'IOleCache2 24 'IOleCacheControl 25 26 /* interface IParseDisplayName */ 27 /* [unique][uuid][object] */ 28 29 Dim IID_IParseDisplayName = [&h0000011a, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID 30 31 Interface IParseDisplayName 32 Inherits IUnknown 33 34 Function ParseDisplayName( 35 /* [unique][in] */ bc As IBindCtx, 36 /* [in] */ pszDisplayName As LPOLESTR, 37 /* [out] */ ByRef chEaten As DWord, 38 /* [out] */ ByRef mkOut As IMoniker) As HRESULT 39 End Interface 40 41 /* interface IOleContainer */ 42 /* [unique][uuid][object] */ 43 44 Dim IID_IOleContainer = [&h0000011b, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID 45 Interface IOleContainer 46 Inherits IParseDisplayName 47 48 Function EnumObjects( 49 /* [in] */ grfFlags As DWord, 50 /* [out] */ ByRef enumUnk As IEnumUnknown) As HRESULT 51 Function LockContainer( 52 /* [in] */ fLock As BOOL) As HRESULT 53 End Interface 54 55 Const Enum OLERENDER 4 56 OLERENDER_NONE = 0 5 57 OLERENDER_DRAW = 1 6 58 OLERENDER_FORMAT = 2 7 OLERENDER_ASIS = 3 59 OLERENDER_ASIS = 3 8 60 End Enum 9 61 10 62 Dim IID_IOleClientSite = [&h00000118, &h0000, &h0000, [&hC0, &h00, &h00, &h00, &h00, &h00, &h00, &h46]] As IID 11 Interface IOleClientSite 63 Interface IOleClientSite 12 64 Inherits IUnknown 13 65 … … 16 68 /* [in] */ dwAssign As DWord, 17 69 /* [in] */ dwWhichMoniker As DWord, 18 /* [out] */ ByRef pmk As *IMoniker) As HRESULT70 /* [out] */ ByRef mk As IMoniker) As HRESULT 19 71 Function GetContainer( 20 /* [out] */ ByRef pContainer As VoidPtr /* *IOleContainer*/) As HRESULT72 /* [out] */ ByRef Container As IOleContainer) As HRESULT 21 73 Function ShowObject() As HRESULT 22 74 Function OnShowWindow( … … 25 77 End Interface 26 78 79 /* interface IOleObject */ 80 /* [unique][uuid][object] */ 81 82 Const Enum OLEGETMONIKER 83 OLEGETMONIKER_ONLYIFTHERE = 1 84 OLEGETMONIKER_FORCEASSIGN = 2 85 OLEGETMONIKER_UNASSIGN = 3 86 OLEGETMONIKER_TEMPFORUSER = 4 87 End Enum 88 89 Const Enum OLEWHICHMK 90 OLEWHICHMK_CONTAINER = 1 91 OLEWHICHMK_OBJREL = 2 92 OLEWHICHMK_OBJFULL = 3 93 End Enum 94 95 Const Enum USERCLASSTYPE 96 USERCLASSTYPE_FULL = 1 97 USERCLASSTYPE_SHORT = 2 98 USERCLASSTYPE_APPNAME = 3 99 End Enum 100 101 Const Enum OLEMISC 102 OLEMISC_RECOMPOSEONRESIZE = &h1 103 OLEMISC_ONLYICONIC = &h2 104 OLEMISC_INSERTNOTREPLACE = &h4 105 OLEMISC_STATIC = &h8 106 OLEMISC_CANTLINKINSIDE = &h10 107 OLEMISC_CANLINKBYOLE1 = &h20 108 OLEMISC_ISLINKOBJECT = &h40 109 OLEMISC_INSIDEOUT = &h80 110 OLEMISC_ACTIVATEWHENVISIBLE = &h100 111 OLEMISC_RENDERINGISDEVICEINDEPENDENT = &h200 112 OLEMISC_INVISIBLEATRUNTIME = &h400 113 OLEMISC_ALWAYSRUN = &h800 114 OLEMISC_ACTSLIKEBUTTON = &h1000 115 OLEMISC_ACTSLIKELABEL = &h2000 116 OLEMISC_NOUIACTIVATE = &h4000 117 OLEMISC_ALIGNABLE = &h8000 118 OLEMISC_SIMPLEFRAME = &h10000 119 OLEMISC_SETCLIENTSITEFIRST = &h20000 120 OLEMISC_IMEMODE = &h40000 121 OLEMISC_IGNOREACTIVATEWHENVISIBLE = &h80000 122 OLEMISC_WANTSTOMENUMERGE = &h100000 123 OLEMISC_SUPPORTSMULTILEVELUNDO = &h200000 124 End Enum 125 126 Const Enum OLECLOSE 127 OLECLOSE_SAVEIFDIRTY = 0 128 OLECLOSE_NOSAVE = 1 129 OLECLOSE_PROMPTSAVE = 2 130 End Enum 131 27 132 Dim IID_IOleObject = [&h00000112, &h0000, &h0000, [&hC0, &h00, &h00, &h00, &h00, &h00, &h00, &h46]] As IID 28 133 Interface IOleObject … … 30 135 31 136 Function SetClientSite( 32 /* [unique][in] */ pClientSite As IOleClientSite) As HRESULT137 /* [unique][in] */ ClientSite As IOleClientSite) As HRESULT 33 138 Function GetClientSite( 34 /* [out] */ ByRef pClientSite As *IOleClientSite) As HRESULT139 /* [out] */ ByRef ClientSite As IOleClientSite) As HRESULT 35 140 Function SetHostNames( 36 141 /* [in] */ szContainerApp As LPCOLESTR, 37 142 /* [unique][in] */ szContainerObj As LPCOLESTR) As HRESULT 38 143 Function Close( 39 /* [in] */ dwSaveOption As DWord) As HRESULT 144 /* [in] */ dwSaveOption As DWord) As HRESULT 40 145 Function SetMoniker( 41 146 /* [in] */ dwWhichMoniker As DWord, 42 /* [unique][in] */ pmk As *IMoniker) As HRESULT147 /* [unique][in] */ mk As IMoniker) As HRESULT 43 148 Function GetMoniker( 44 149 /* [in] */ dwAssign As DWord, 45 150 /* [in] */ dwWhichMoniker As DWord, 46 /* [out] */ ByRef pmk As *IMoniker) As HRESULT151 /* [out] */ ByRef mk As IMoniker) As HRESULT 47 152 Function InitFromData( 48 /* [unique][in] */ pDataObject As IDataObject,153 /* [unique][in] */ DataObject As IDataObject, 49 154 /* [in] */ fCreation As BOOL, 50 155 /* [in] */ dwReserved As DWord) As HRESULT 51 156 Function GetClipboardData( 52 157 /* [in] */ dwReserved As DWord, 53 /* [out] */ ByRef pDataObject As *IDataObject) As HRESULT158 /* [out] */ ByRef DataObject As IDataObject) As HRESULT 54 159 Function DoVerb( 55 160 /* [in] */ iVerb As Long, 56 161 /* [unique][in] */ lpmsg As *MSG, 57 /* [unique][in] */ pActiveSite As IOleClientSite,162 /* [unique][in] */ ActiveSite As IOleClientSite, 58 163 /* [in] */ lindex As Long, 59 164 /* [in] */ hwndParent As HWND, 60 165 /* [unique][in] */ lprcPosRect As *RECT /*LPCRECT*/) As HRESULT 61 166 Function EnumVerbs( 62 /* [out] */ ByRef pEnumOleVerb As *IUnknown /*IEnumOLEVERB*/) As HRESULT167 /* [out] */ ByRef EnumOleVerb As IUnknown /*IEnumOLEVERB*/) As HRESULT 63 168 Function Update() As HRESULT 64 169 Function IsUpToDate() As HRESULT … … 75 180 /* [out] */ ByRef sizel As SIZEL) As HRESULT 76 181 Function Advise( 77 /* [unique][in] */ pAdvSink As *IAdviseSink,182 /* [unique][in] */ AdvSink As IAdviseSink, 78 183 /* [out] */ ByRef dwConnection As DWord) As HRESULT 79 184 Function Unadvise( … … 87 192 /* [in] */ ByRef Logpal As LOGPALETTE) As HRESULT 88 193 End Interface 194 195 /* interface IOleWindow */ 196 /* [unique][uuid][object] */ 197 198 Dim IID_IOleWindow = [&h00000114, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID 199 Interface IOleWindow 200 Inherits IUnknown 201 202 /* [input_sync] */ Function GetWindow( 203 /* [out] */ ByRef hwnd As HWND) As HRESULT 204 Function ContextSensitiveHelp( 205 /* [in] */ fEnterMode As BOOL) As HRESULT 206 End Interface 207 208 'IOleLink 209 'IOleItemContainer 210 'IOleInPlaceUIWindow 211 'IOleInPlaceActiveObject 212 Interface IOleInPlaceActiveObject 213 Inherits IOleWindow 214 End Interface 215 216 'IOleInPlaceFrame 217 Interface IOleInPlaceFrame 218 Inherits IOleWindow 219 End Interface 220 221 'IOleInPlaceObject 222 'IOleInPlaceSite 223 'IContinue 224 'IViewObject 225 'IViewObject2 226 227 /* interface IDropSource */ 228 /* [uuid][object][local] */ 229 230 Dim IID_IDropSource = [&h00000121, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID 231 232 Interface IDropSource 233 Inherits IUnknown 234 235 Function QueryContinueDrag( 236 fEscapePressed As DWord, 237 grfKeyState As DWord) As HRESULT 238 Function GiveFeedback( 239 dwEffect As DWord) As HRESULT 240 End Interface 241 242 /* interface IDropTarget */ 243 /* [unique][uuid][object] */ 244 245 Const MK_ALT = &h20 246 247 Const DROPEFFECT_NONE = 0 248 Const DROPEFFECT_COPY = 1 249 Const DROPEFFECT_MOVE = 2 250 Const DROPEFFECT_LINK = 4 251 Const DROPEFFECT_SCROLL = &h80000000 252 253 Const DD_DEFSCROLLINSET = 11 254 Const DD_DEFSCROLLDELAY = 50 255 Const DD_DEFSCROLLINTERVAL = 50 256 Const DD_DEFDRAGDELAY = 200 257 Const DD_DEFDRAGMINDIST = 2 258 259 Dim IID_IDropTarget = [&h00000122, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID 260 Interface IDropTarget 261 Inherits IUnknown 262 263 Function DragEnter( 264 /* [unique][in] */ DataObj As IDataObject, 265 /* [in] */ grfKeyState As DWord, 266 /* [in] */ x As Long, y As Long, 267 /* [out][in] */ ByRef effect As DWord) As HRESULT 268 Function DragOver( 269 /* [in] */ grfKeyState As DWord, 270 /* [in] */ x As Long, y As Long, 271 /* [out][in] */ ByRef effect As DWord) As HRESULT 272 Function DragLeave() As HRESULT 273 Function Drop( 274 /* [unique][in] */ DataObj As IDataObject, 275 /* [in] */ grfKeyState As DWord, 276 /* [in] */ x As Long, y As Long, 277 /* [out][in] */ ByRef effect As DWord) As HRESULT 278 End Interface 279 280 /* interface IDropSourceNotify */ 281 /* [unique][uuid][object][local] */ 282 283 Dim IID_IDropSourceNotify = [&h0000012B, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID 284 Interface IDropSourceNotify 285 Inherits IUnknown 286 287 Function DragEnterTarget( 288 /* [in] */ hwndTarget As HWND) As HRESULT 289 Function DragLeaveTarget() As HRESULT 290 End Interface 291 292 /* interface IEnumOLEVERB */ 293 /* [unique][uuid][object] */ 294 295 Type OLEVERB 296 lVerb As Long 297 lpszVerbName As LPOLESTR 298 fuFlags As DWord 299 grfAttribs As DWord 300 End Type 301 302 /* [v1_enum] */ Const Enum OLEVERBATTRIB 303 OLEVERBATTRIB_NEVERDIRTIES = 1 304 OLEVERBATTRIB_ONCONTAINERMENU = 2 305 End Enum 306 307 Dim IID_IEnumOLEVERB = [&h00000104, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID 308 Interface IEnumOLEVERB 309 Inherits IUnknown 310 311 /* [local] */ Function Next_( 312 /* [in] */ celt As DWord, 313 /* [length_is][size_is][out] */ rgelt As *OLEVERB, 314 /* [out] */ ByRef celtFetched As DWord) As HRESULT 315 Function Skip( 316 /* [in] */ celt As DWord) As HRESULT 317 Function Reset() As HRESULT 318 Function Clone( 319 /* [out] */ ByRef enumOleVerb As IEnumOLEVERB) As HRESULT 320 End Interface
Note:
See TracChangeset
for help on using the changeset viewer.