tom.inc

这是一个数字图像处理的matlab仿真程序

    &CastName&_MoveStart            comethod4 ?
    &CastName&_MoveEnd              comethod4 ?
    &CastName&_MoveWhile            comethod4 ?
    &CastName&_MoveStartWhile       comethod4 ?
    &CastName&_MoveEndWhile         comethod4 ?
    &CastName&_MoveUntil            comethod4 ?
    &CastName&_MoveStartUntil       comethod4 ?
    &CastName&_MoveEndUntil         comethod4 ?
    &CastName&_FindText             comethod5 ?
    &CastName&_FindTextStart        comethod5 ?
    &CastName&_FindTextEnd          comethod5 ?
    &CastName&_Delete               comethod4 ?
    &CastName&_Cut                  comethod2 ?
    &CastName&_Copy                 comethod2 ?
    &CastName&_Paste                comethod3 ?
    &CastName&_CanPaste             comethod4 ?
    &CastName&_CanEdit              comethod2 ?
    &CastName&_ChangeCase           comethod2 ?
    &CastName&_GetPoint             comethod4 ?
    &CastName&_SetPoint             comethod5 ?
    &CastName&_ScrollIntoView       comethod2 ?
    &CastName&_GetEmbeddedObject    comethod2 ?
ENDM

ITextRanges              STRUCT
    _vtITextRanges ITextRanges
ITextRanges              ENDS

; ITextSelection interface
;-------------------------------------------------------------------------------
; public ITextRange

;{8CC497C1-A1DF-11ce-8098-00AA0047BE5D}
sIID_ITextSelection         TEXTEQU <{08CC497C1H, 0A1DFH, 011ceH, \
                                     {080H, 098H, 000H, 0AAH, 000H, 047H, 0BEH, 05DH}}>

_vtITextSelection MACRO CastName:REQ
    ; ITextRange methods 
    _vtITextRanges CastName
    ; ITextSelection methods
    &CastName&_GetFlags                 comethod2 ?  
    &CastName&_SetFlags                 comethod2 ?  
    &CastName&_GetType                  comethod2 ?  
    &CastName&_MoveLeft                 comethod5 ?  
    &CastName&_MoveRight                comethod5 ?      
    &CastName&_MoveUp                   comethod5 ?  
    &CastName&_MoveDown                 comethod5 ?  
    &CastName&_HomeKey                  comethod4 ?  
    &CastName&_EndKey                   comethod4 ?  
    &CastName&_TypeText                 comethod2 ?  
ENDM

ITextSelection              STRUCT
    _vtITextSelection ITextSelection
ITextSelection              ENDS

; ITextFont interface
;-------------------------------------------------------------------------------
; public IDispatch

;{8CC497C3-A1DF-11ce-8098-00AA0047BE5D}
sIID_ITextFont          TEXTEQU <{08CC497C3H, 0A1DFH, 011ceH, \
                                 {080H, 098H, 000H, 0AAH, 000H, 047H, 0BEH, 05DH}}>

_vtITextFont MACRO CastName:REQ
    ; IDispatch methods 
    _vtIDispatch CastName
    ; ITextFont methods
    &CastName&_GetDuplicate         comethod2 ?
    &CastName&_SetDuplicate         comethod2 ?
    &CastName&_CanChange            comethod2 ?
    &CastName&_IsEqual              comethod3 ?
    &CastName&_Reset                comethod2 ?
    &CastName&_GetStyle             comethod2 ?
    &CastName&_SetStyle             comethod2 ?
    &CastName&_GetAllCaps           comethod2 ?
    &CastName&_SetAllCaps           comethod2 ?
    &CastName&_GetAnimation         comethod2 ?
    &CastName&_SetAnimation         comethod2 ?
    &CastName&_GetBackColor         comethod2 ?
    &CastName&_SetBackColor         comethod2 ?
    &CastName&_GetBold              comethod2 ?
    &CastName&_SetBold              comethod2 ?
    &CastName&_GetEmboss            comethod2 ?
    &CastName&_SetEmboss            comethod2 ?
    &CastName&_GetForeColor         comethod2 ?
    &CastName&_SetForeColor         comethod2 ?
    &CastName&_GetHidden            comethod2 ?
    &CastName&_SetHidden            comethod2 ?
    &CastName&_GetEngrave           comethod2 ?
    &CastName&_SetEngrave           comethod2 ?
    &CastName&_GetItalic            comethod2 ?
    &CastName&_SetItalic            comethod2 ?
    &CastName&_GetKerning           comethod2 ?
    &CastName&_SetKerning           comethod2 ?
    &CastName&_GetLanguageID        comethod2 ?
    &CastName&_SetLanguageID        comethod2 ?
    &CastName&_GetName              comethod2 ?
    &CastName&_SetName              comethod2 ?
    &CastName&_GetOutline           comethod2 ?
    &CastName&_SetOutline           comethod2 ?
    &CastName&_GetPosition          comethod2 ?
    &CastName&_SetPosition          comethod2 ?
    &CastName&_GetProtected         comethod2 ?
    &CastName&_SetProtected         comethod2 ?
    &CastName&_GetShadow            comethod2 ?
    &CastName&_SetShadow            comethod2 ?
    &CastName&_GetSize              comethod2 ?
    &CastName&_SetSize              comethod2 ?
    &CastName&_GetSmallCaps         comethod2 ?
    &CastName&_SetSmallCaps         comethod2 ?
    &CastName&_GetSpacing           comethod2 ?
    &CastName&_SetSpacing           comethod2 ?
    &CastName&_GetStrikeThrough     comethod2 ?
    &CastName&_SetStrikeThrough     comethod2 ?
    &CastName&_GetSubscript         comethod2 ?
    &CastName&_SetSubscript         comethod2 ?
    &CastName&_GetSuperscript       comethod2 ?
    &CastName&_SetSuperscript       comethod2 ?
    &CastName&_GetUnderline         comethod2 ?
    &CastName&_SetUnderline         comethod2 ?
    &CastName&_GetWeight            comethod2 ?
    &CastName&_SetWeight            comethod2 ?
ENDM

ITextFont              STRUCT
    _vtITextFont ITextFont
ITextFont              ENDS

; ITextPara interface
;-------------------------------------------------------------------------------
; public IDispatch

;{"8CC497C4-A1DF-11ce-8098-00AA0047BE5D}
sIID_ITextPara          TEXTEQU <{08CC497C4H, 0A1DFH, 011ceH, \
                                 {080H, 098H, 000H, 0AAH, 000H, 047H, 0BEH, 05DH}}>

_vtITextPara MACRO CastName:REQ
    ; IDispatch methods 
    _vtIDispatch CastName
    ; ITextPara methods
    &CastName&_GetDuplicate             comethod2 ?
    &CastName&_SetDuplicate             comethod2 ?
    &CastName&_CanChange                comethod2 ?
    &CastName&_IsEqual                  comethod2 ?
    &CastName&_Reset                    comethod2 ?
    &CastName&_GetStyle 	          comethod2 ?
    &CastName&_SetStyle                 comethod2 ?
    &CastName&_GetAlignment             comethod2 ?
    &CastName&_SetAlignment             comethod2 ?
    &CastName&_GetHyphenation           comethod2 ?
    &CastName&_SetHyphenation           comethod2 ?
    &CastName&_GetFirstLineIndent       comethod2 ?
    &CastName&_GetKeepTogether          comethod2 ?
    &CastName&_SetKeepTogether          comethod2 ?
    &CastName&_GetKeepWithNext          comethod2 ?
    &CastName&_SetKeepWithNext          comethod2 ?
    &CastName&_GetLeftIndent            comethod2 ?
    &CastName&_GetLineSpacing           comethod2 ?
    &CastName&_GetLineSpacingRule       comethod2 ?
    &CastName&_GetListAlignment         comethod2 ?
    &CastName&_SetListAlignment         comethod2 ?
    &CastName&_GetListLevelIndex        comethod2 ?
    &CastName&_SetListLevelIndex        comethod2 ?
    &CastName&_GetListStart             comethod2 ?
    &CastName&_SetListStart             comethod2 ?
    &CastName&_GetListTab               comethod2 ?
    &CastName&_SetListTab               comethod2 ?
    &CastName&_GetListType              comethod2 ?
    &CastName&_SetListType              comethod2 ?
    &CastName&_GetNoLineNumber          comethod2 ?
    &CastName&_SetNoLineNumber          comethod2 ?
    &CastName&_GetPageBreakBefore       comethod2 ?
    &CastName&_SetPageBreakBefore       comethod2 ?
    &CastName&_GetRightIndent           comethod2 ?
    &CastName&_SetRightIndent           comethod2 ?
    &CastName&_SetIndents               comethod4 ?
    &CastName&_SetLineSpacing           comethod3 ?
    &CastName&_GetSpaceAfter            comethod2 ?
    &CastName&_SetSpaceAfter            comethod2 ?
    &CastName&_GetSpaceBefore           comethod2 ?
    &CastName&_SetSpaceBefore           comethod2 ?
    &CastName&_GetWidowControl          comethod2 ?
    &CastName&_SetWidowControl          comethod2 ?
    &CastName&_GetTabCount              comethod2 ?
    &CastName&_AddTab                   comethod4 ?
    &CastName&_ClearAllTabs             comethod1 ?
    &CastName&_DeleteTab                comethod2 ?
    &CastName&_GetTab                   comethod5 ?
ENDM

ITextPara              STRUCT
    _vtITextPara ITextPara
ITextPara              ENDS

; ITextStoryRanges interface
;-------------------------------------------------------------------------------
; public IDispatch

;{8CC497C5-A1DF-11ce-8098-00AA0047BE5D}
sIID_ITextStoryRanges           TEXTEQU <{08CC497C5H, 0A1DFH, 011ceH, \
                                         {080H, 098H, 000H, 0AAH, 000H, 047H, 0BEH, 05DH}}>

_vtITextStoryRanges MACRO CastName:REQ
    ; IDispatch methods 
    _vtIDispatch CastName
    ; ITextStoryRanges methods
    &CastName&__NewEnum         comethod2 ?  
    &CastName&_Item             comethod3 ?  
    &CastName&_GetCount         comethod2 ?  
ENDM

ITextStoryRanges              STRUCT
    _vtITextStoryRanges ITextStoryRanges
ITextStoryRanges              ENDS

; ITextDocument2 interface
;-------------------------------------------------------------------------------
; public ITextDocument

;{01c25500-4268-11d1-883a-3c8b00c10000}
sIID_ITextDocument2             TEXTEQU <{001c25500H, 04268H, 011d1H, \
                                         {088H, 03aH, 03cH, 08bH, 000H, 0c1H, 000H, 000H}}>
                          
_vtITextDocument2 MACRO CastName:REQ
    ; ITextDocument methods 
    _vtITextDocument CastName
    ; ITextDocument2 methods
    &CastName&_AttachMsgFilter          comethod2 ?
    &CastName&_SetEffectColor           comethod3 ?
    &CastName&_GetEffectColor           comethod3 ?
    &CastName&_GetCaretType             comethod2 ?
    &CastName&_SetCaretType             comethod2 ?
    &CastName&_GetImmContext            comethod2 ?
    &CastName&_ReleaseImmContext        comethod2 ?
    &CastName&_GetPreferredFont         comethod9 ?
    &CastName&_GetNotificationMode      comethod2 ?
    &CastName&_SetNotificationMode      comethod2 ?
    &CastName&_GetClientRect            comethod6 ?
    &CastName&_GetSelectionEx           comethod2 ?
    &CastName&_GetWindow                comethod2 ?
    &CastName&_GetFEFlags               comethod2 ?
    &CastName&_UpdateWindow             comethod1 ?
    &CastName&_CheckTextLimit           comethod3 ?
    &CastName&_IMEInProgress            comethod2 ?
    &CastName&_SysBeep                  comethod1 ?
    &CastName&_Update                   comethod2 ?
    &CastName&_Notify                   comethod2 ?
ENDM

ITextDocument2              STRUCT
    _vtITextDocument2 ITextDocument2
ITextDocument2              ENDS

; ITextMsgFilter interface
;-------------------------------------------------------------------------------
; public IUnknown

;{a3787420-4267-11d1-883a-3c8b00c10000}
sIID_ITextMsgFilter             TEXTEQU <{0a3787420H, 04267H, 011d1H, \
                                         {088H, 03aH, 03cH, 08bH, 000H, 0c1H, 000H, 000H}}>
                          
_vtITextMsgFilter MACRO CastName:REQ
    ; IUnknown methods 
    _vtIUnknown CastName
    ; ITextMsgFilter methods
    &CastName&_AttachDocument       comethod3 ?
    &CastName&_HandleMessage        comethod5 ?
    &CastName&_AttachMsgFilter      comethod2 ?
ENDM

ITextMsgFilter              STRUCT
    _vtITextMsgFilter ITextMsgFilter
ITextMsgFilter              ENDS

ENDIF   ; _TOM