📄 component.inc
字号:
;/////////////////////////////////////////////////////////////////////////////
;//
;// component.inc
;//
;// MASM Translation from 'C' September 9, 2000
;//
;// Copyright 9/9/2000 Ernest Murphy. All rights reserved.
;//
;/////////////////////////////////////////////////////////////////////////////
option expr32
option casemap:none
IFNDEF component_inc
component_inc EQU 1
; IOleObject Interface
;------------------------------------------------------------------------------------
; IOleObject : public IUnknown
ADVF_NODATA EQU 1t
ADVF_PRIMEFIRST EQU 2t
ADVF_ONLYONCE EQU 4t
ADVFCACHE_NOHANDLER EQU 8t
ADVFCACHE_FORCEBUILTIN EQU 16t
ADVFCACHE_ONSAVE EQU 32t
ADVF_DATAONSTOP EQU 64t
OLEGETMONIKER_ONLYIFTHERE EQU 1t
OLEGETMONIKER_FORCEASSIGN EQU 2t
OLEGETMONIKER_UNASSIGN EQU 3t
OLEGETMONIKER_TEMPFORUSER EQU 4t
OLEWHICHMK_CONTAINER EQU 1t
OLEWHICHMK_OBJREL EQU 2t
OLEWHICHMK_OBJFULL EQU 3t
USERCLASSTYPE_FULL EQU 1t
USERCLASSTYPE_SHORT EQU 2t
USERCLASSTYPE_APPNAME EQU 3t
OLEMISC_RECOMPOSEONRESIZE EQU 1t
OLEMISC_ONLYICONIC EQU 2t
OLEMISC_INSERTNOTREPLACE EQU 4t
OLEMISC_STATIC EQU 8t
OLEMISC_CANTLINKINSIDE EQU 16t
OLEMISC_CANLINKBYOLE1 EQU 32t
OLEMISC_ISLINKOBJECT EQU 64t
OLEMISC_INSIDEOUT EQU 128t
OLEMISC_ACTIVATEWHENVISIBLE EQU 256t
OLEMISC_RENDERINGISDEVICEINDEPENDENT EQU 512t
OLEMISC_INVISIBLEATRUNTIME EQU 1024t
OLEMISC_ALWAYSRUN EQU 2048t
OLEMISC_ACTSLIKEBUTTON EQU 4096t
OLEMISC_ACTSLIKELABEL EQU 8192t
OLEMISC_NOUIACTIVATE EQU 16384t
OLEMISC_ALIGNABLE EQU 32768t
OLEMISC_SIMPLEFRAME EQU 65536t
OLEMISC_SETCLIENTSITEFIRST EQU 131072t
OLEMISC_IMEMODE EQU 262144t
OLEMISC_IGNOREACTIVATEWHENVISIBLE EQU 524288t
OLEMISC_WANTSTOMENUMERGE EQU 1048576t
OLEMISC_SUPPORTSMULTILEVELUNDO EQU 2097152t
OLECLOSE_SAVEIFDIRTY EQU 0t
OLECLOSE_NOSAVE EQU 1t
OLECLOSE_PROMPTSAVE EQU 2t
ULARGE_INTEGER UNION
STRUCT
LowPart DWORD ?
HighPart DWORD ?
ENDS
QuadPart QWORD ?
ULARGE_INTEGER ENDS
; Interface IOleObject
;------------------------------------------------------------------------------
; public IUnknown
; (00000112-0000-0000-C000-000000000046H)
sIID_IOleObject TEXTEQU <{000000112H, 00000H, 00000H, \
{0C0H, 000H, 000H, 000H, 000H, 000H, 000H, 046H}}>
_vtIOleObject MACRO CastName:REQ
; IUnknown methods
_vtIUnknown CastName
; IOleObject methods
&CastName&_SetClientSite comethod2 ?
&CastName&_GetClientSite comethod2 ?
&CastName&_SetHostNames comethod3 ?
&CastName&_Close comethod2 ?
&CastName&_SetMoniker comethod3 ?
&CastName&_GetMoniker comethod4 ?
&CastName&_InitFromData comethod4 ?
&CastName&_GetClipboardData comethod3 ?
&CastName&_DoVerb comethod7 ?
&CastName&_EnumVerbs comethod2 ?
&CastName&_Update comethod1 ?
&CastName&_IsUpToDate comethod1 ?
&CastName&_GetUserClassID comethod2 ?
&CastName&_GetUserType comethod3 ?
&CastName&_SetExtent comethod3 ?
&CastName&_GetExtent comethod3 ?
&CastName&_Advise comethod3 ?
&CastName&_Unadvise comethod2 ?
&CastName&_EnumAdvise comethod2 ?
&CastName&_GetMiscStatus comethod3 ?
&CastName&_SetColorScheme comethod2 ?
ENDM
IOleObject STRUCT
_vtIOleObject IOleObject
IOleObject ENDS
; IViewObject Interface
;------------------------------------------------------------------------------------
; public IUnknown
; (0000010D-0000-0000-C000-000000000046H)
sIID_IViewObject TEXTEQU <{00000010DH, 00000H, 00000H, \
{0C0H, 000H, 000H, 000H, 000H, 000H, 000H, 046H}}>
_vtIViewObject MACRO CastName:REQ
; IUnknown methods
_vtIUnknown CastName
; IViewObject methods
&CastName&_Draw comethod11 ?
&CastName&_GetColorSet comethod7 ?
&CastName&_Freeze comethod5 ?
&CastName&_Unfreeze comethod2 ?
&CastName&_SetAdvise comethod4 ?
&CastName&_GetAdvise comethod4 ?
ENDM
IViewObject STRUCT
_vtIViewObject IViewObject
IViewObject ENDS
; IViewObject2 Interface
;------------------------------------------------------------------------------------
; public IViewObject
; (00000127-0000-0000-C000-000000000046H)
sIID_IViewObject2 TEXTEQU <{000000127H, 00000H, 00000H, \
{0C0H, 000H, 000H, 000H, 000H, 000H, 000H, 046H}}>
_vtIViewObject2 MACRO CastName:REQ
; IViewObject methods
_vtIViewObject CastName
; IViewObject2 methods
&CastName&_GetExtent comethod5 ?
ENDM
IViewObject2 STRUCT
_vtIViewObject2 IViewObject2
IViewObject2 ENDS
; IOleControlSite Interface
;------------------------------------------------------------------------------------
; public IUnknown
POINTF struct DWORD
FLOAT x
FLOAT y
POINTF ENDS
XFORMCOORDS_POSITION EQU 1
XFORMCOORDS_SIZE EQU 2
XFORMCOORDS_HIMETRICTOCONTAINER EQU 4
XFORMCOORDS_CONTAINERTOHIMETRIC EQU 8
XFORMCOORDS_EVENTCOMPAT EQU 10
; (B196B289-BAB4-101A-B69C-00AA00341D07H)
sIID_IOleControlSite TEXTEQU <{0B196B289H, 0BAB4H, 0101AH, \
{0B6H, 09CH, 000H, 0AAH, 000H, 034H, 01DH, 007H}}>
_vtIOleControlSite MACRO CastName:REQ
; IUnknown methods
_vtIUnknown CastName
; IOleControlSite methods
&CastName&_OnControlInfoChanged comethod1 ?
&CastName&_LockInPlaceActive comethod2 ?
&CastName&_GetExtendedControl comethod2 ?
&CastName&_TransformCoords comethod4 ?
&CastName&_TranslateAccelerator comethod3 ?
&CastName&_OnFocus comethod2 ?
&CastName&_ShowPropertyFrame comethod1 ?
ENDM
IOleControlSite STRUCT
_vtIOleControlSite IOleControlSite
IOleControlSite ENDS
; IFont Interface
;------------------------------------------------------------------------------------
; public IUnknown
; (BEF6E002-A874-101A-8BBA-00AA00300CAB)
sIID_IFont TEXTEQU <{0BEF6E002H, 0A874H, 0101AH, \
{08BH, 0BAH, 000H, 0AAH, 000H, 030H, 00CH, 0ABH}}>
_vtIFont MACRO CastName:REQ
; IUnknown methods
_vtIUnknown CastName
; IFont methods
&CastName&_get_Name comethod2 ?
&CastName&_put_Name comethod2 ?
&CastName&_get_Size comethod2 ?
&CastName&_put_Size comethod2 ?
&CastName&_get_Bold comethod2 ?
&CastName&_put_Bold comethod2 ?
&CastName&_get_Italic comethod2 ?
&CastName&_put_Italic comethod2 ?
&CastName&_get_Underline comethod2 ?
&CastName&_put_Underline comethod2 ?
&CastName&_get_Strikethrough comethod2 ?
&CastName&_put_Strikethrough comethod2 ?
&CastName&_get_Weight comethod2 ?
&CastName&_put_Weight comethod2 ?
&CastName&_get_Charset comethod2 ?
&CastName&_put_Charset comethod2 ?
&CastName&_get_hFont comethod2 ?
&CastName&_Clone comethod2 ?
&CastName&_IsEqual comethod2 ?
&CastName&_SetRatio comethod3 ?
&CastName&_QueryTextMetrics comethod2 ?
&CastName&_AddRefHfont comethod2 ?
&CastName&_ReleaseHfont comethod2 ?
&CastName&_SetHdc comethod2 ?
ENDM
IFont STRUCT
_vtIFont IFont
IFont ENDS
; ISimpleFrameSite Interface
;------------------------------------------------------------------------------------
; public IUnknown
; (742B0E01-14E6-101B-914E-00AA00300CA)
sIID_ISimpleFrameSite TEXTEQU <{0742B0E01H, 014E6H, 0101BH, \
{091H, 04EH, 000H, 0AAH, 000H, 030H, 00CH, 0ABH}}>
_vtISimpleFrameSite MACRO CastName:REQ
; IUnknown methods
_vtIUnknown CastName
; ISimpleFrameSite methods
&CastName&_PreMessageFilter comethod7 ?
&CastName&_PostMessageFilter comethod7 ?
ENDM
ISimpleFrameSite STRUCT
_vtISimpleFrameSite ISimpleFrameSite
ISimpleFrameSite ENDS
; IOleWindow Interface
;------------------------------------------------------------------------------------
; public IUnknown
; (00000114-0000-0000-C000-000000000046H)
sIID_IOleWindow TEXTEQU <{000000114H, 00000H, 00000H, \
{0C0H, 000H, 000H, 000H, 000H, 000H, 000H, 046H}}>
_vtIOleWindow MACRO CastName:REQ
; IUnknown methods
_vtIUnknown CastName
; IOleWindow methods
&CastName&_GetWindow comethod2 ?
&CastName&_ContextSensitiveHelp comethod2 ?
ENDM
IOleWindow STRUCT
_vtIOleWindow IOleWindow
IOleWindow ENDS
; IOleInPlaceObject Interface
;------------------------------------------------------------------------------------
; public IOleWindow
; (00000113-0000-0000-C000-000000000046H)
sIID_IOleInPlaceObject TEXTEQU <{000000113H, 00000H, 00000H, \
{0C0H, 000H, 000H, 000H, 000H, 000H, 000H, 046H}}>
_vtIOleInPlaceObject MACRO CastName:REQ
; IOleWindow methods
_vtIOleWindow CastName
; IOleInPlaceObject methods
&CastName&_InPlaceDeactivate comethod1 ?
&CastName&_UIDeactivate comethod1 ?
&CastName&_SetObjectRects comethod3 ?
&CastName&_ReactivateAndUndo comethod1 ?
ENDM
IOleInPlaceObject STRUCT
_vtIOleInPlaceObject IOleInPlaceObject
IOleInPlaceObject ENDS
; IOleInPlaceObjectWindowless Interface
;------------------------------------------------------------------------------------
; public IOleInPlaceObject
; (1C2056CC-5EF4-101B-8BC8-00AA003E3B29)
sIID_IOleInPlaceObjectWindowless TEXTEQU <{01C2056CCH, 05EF4H, 0101BH, \
{08BH, 0C8H, 000H, 0AAH, 000H, 03EH, 03BH, 029H}}>
_vtIOleInPlaceObjectWindowless MACRO CastName:REQ
; IOleInPlaceObject methods
_vtIOleInPlaceObject CastName
; IOleInPlaceObjectWindowless methods
&CastName&_OnWindowMessage comethod5 ?
&CastName&_GetDropTarget comethod2 ?
ENDM
IOleInPlaceObjectWindowless STRUCT
_vtIOleInPlaceObjectWindowless IOleInPlaceObjectWindowless
IOleInPlaceObjectWindowless ENDS
; IOleControl Interface
;------------------------------------------------------------------------------------
; public IUnknown
CONTROLINFO struct
cb ULONG ?
hAccel HACCEL ?
cAccel USHORT ?
dwFlags DWORD ?
CONTROLINFO ENDS
CTRLINFO_EATS_RETURN EQU 1
CTRLINFO_EATS_ESCAPE EQU 2
; (B196B288-BAB4-101A-B69C-00AA00341D07H)
sIID_IOleControl TEXTEQU <{0B196B288H, 0BAB4H, 0101AH, \
{0B6H, 09CH, 000H, 0AAH, 000H, 034H, 01DH, 007H}}>
_vtIOleControl MACRO CastName:REQ
; IUnknown methods
_vtIUnknown CastName
; IOleControl methods
&CastName&_GetControlInfo comethod2 ?
&CastName&_OnMnemonic comethod2 ?
&CastName&_OnAmbientPropertyChange comethod2 ?
&CastName&_FreezeEvents comethod2 ?
ENDM
IOleControl STRUCT
_vtIOleControl IOleControl
IOleControl ENDS
; IConnectionPoint Interface
;------------------------------------------------------------------------------------
; public IUnknown
; (B196B286-BAB4-101A-B69C-00AA00341D07H)
sIID_IConnectionPoint TEXTEQU <{0B196B286H, 0BAB4H, 0101AH, \
{0B6H, 09CH, 000H, 0AAH, 000H, 034H, 01DH, 007H}}>
_vtIConnectionPoint MACRO CastName:REQ
; IUnknown methods
_vtIUnknown CastName
; IConnectionPoint methods
&CastName&_GetConnectionInterface comethod2 ?
&CastName&_GetConnectionPointContainer comethod2 ?
&CastName&_Advise comethod3 ?
&CastName&_Unadvise comethod2 ?
&CastName&_EnumConnections comethod2 ?
ENDM
IConnectionPoint STRUCT
_vtIConnectionPoint IConnectionPoint
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -