richedit.inc

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

; #########################################################################

;     include files
;     ~~~~~~~~~~~~~
      include \MASM32\INCLUDE\windows.inc
      include \MASM32\INCLUDE\masm32.inc
      include \MASM32\INCLUDE\gdi32.inc
      include \MASM32\INCLUDE\user32.inc
      include \MASM32\INCLUDE\kernel32.inc
      include \MASM32\INCLUDE\Comctl32.inc
      include \MASM32\INCLUDE\comdlg32.inc
      include \MASM32\INCLUDE\shell32.inc
      include \masm32\include\shlwapi.inc
      include \MASM32\include\oleaut32.inc

;     libraries
;     ~~~~~~~~~
      includelib \MASM32\LIB\masm32.lib

      includelib \MASM32\LIB\gdi32.lib
      includelib \MASM32\LIB\user32.lib
      includelib \MASM32\LIB\kernel32.lib
      includelib \MASM32\LIB\Comctl32.lib
      includelib \MASM32\LIB\comdlg32.lib
      includelib \MASM32\LIB\shell32.lib
      includelib \masm32\lib\shlwapi.lib
      includelib \MASM32\LIB\oleaut32.lib

; #########################################################################

        ;=================
        ; Local prototypes
        ;=================
        WinMain PROTO :DWORD,:DWORD,:DWORD,:DWORD
        WndProc PROTO :DWORD,:DWORD,:DWORD,:DWORD
        TopXY PROTO   :DWORD,:DWORD
        FillBuffer     PROTO :DWORD,:DWORD,:BYTE
        Paint_Proc     PROTO :DWORD,:DWORD
        EditControl    PROTO :DWORD,:DWORD,:DWORD,:DWORD,:DWORD,:DWORD
        hEditProc      PROTO :DWORD,:DWORD,:DWORD,:DWORD
        Select_All     PROTO :DWORD
        TextFind       PROTO :DWORD,:DWORD
        SearchProc     PROTO :DWORD,:DWORD,:DWORD,:DWORD
        CallSearchDlg  PROTO
        StreamFileOut  PROTO :DWORD,:DWORD
        StreamFileIn   PROTO :DWORD,:DWORD
        ofCallBack     PROTO :DWORD,:DWORD,:DWORD,:DWORD
        sfCallBack     PROTO :DWORD,:DWORD,:DWORD,:DWORD
        Confirmation   PROTO :DWORD
        MergeFile      PROTO :DWORD

        wsprintfA PROTO C :DWORD,:VARARG
        wsprintf equ <wsprintfA>

      ;=============
      ; Local macros
      ;=============

      szText MACRO Name, Text:VARARG
        LOCAL lbl
          jmp lbl
            Name db Text,0
          lbl:
        ENDM

      m2m MACRO M1, M2
        push M2
        pop  M1
      ENDM

      return MACRO arg
        mov eax, arg
        ret
      ENDM

      stralloc MACRO ln
        invoke SysAllocStringByteLen,0,ln
      ENDM

      strfree MACRO strhandle
        invoke SysFreeString,strhandle
      ENDM

    .data
        szDisplayName db "MASM32 Richedit",0
        Untitled      db "Untitled",0

      ; ------------------------------------
      ; string data for status bar messages
      ; used in WM_NOTIFY message.
      ; ------------------------------------
        tbn_new       db "New File",0
        tbn_open      db "Open File",0
        tbn_save      db "Save File",0
        tbn_cut       db "Edit Cut",0
        tbn_copy      db "Edit Copy",0
        tbn_paste     db "Edit Paste",0
        tbn_undo      db "Edit Undo",0
        tbn_find      db "Find Text",0
        tbn_instance  db "New Instance",0
        tbn_quit      db "Close Editor",0
        tbn_else      db 0

    .data?
        CommandLine   dd ?
        hWnd          dd ?
        hInstance     dd ?
        hIcon         dd ?
        hRichEd       dd ?
        lpfnhEditProc dd ?
        hToolTips     dd ?

        hCheck1       dd ?
        hCheck2       dd ?
        TextLen       dd ?
        CaseFlag      dd ?
        WholeWord     dd ?
        CtrlFlag      dd ?
        hMnu          dd ?
        SearchText    db 128 dup(?)

; ########################### Inserted modules ############################

    include toolbar.asm
    include statusbr.asm
    include filedlgs.asm
    include fileio.asm
    include search.asm
    include misc.asm

; #########################################################################