我找到一篇文章，觉得应该是可以更改行距、字距的，可是使用时，为什么就是没有
反应呢？
有没有高手对此有研究？？
Win32教程33-RichEdit控件.基础知识
作者：farsky翻译·发布日期：2001-10-2·阅读次数：1669
--------------------------------------------------------------------------------
【在这里下载本文的源代码】
有很多人要求我提供关于RichEdit控件的指南，经过这方面的大量编程实践，我想我终于可以开写关于RichEdit控件的指南了。诺，这个就是第一篇RichEdit指南。本指南将会描述涉及到RichEdit的几乎所有方面，起码是我所知道的关于它的所有方面。因为指南的信息量相当相当的大，所以我将它分成了几个部分，本篇是第一部分。在这篇指南里，你将会了解到什么是RichEdit控件，怎样创建它，怎样往里面载入数据和保存里面的数据。
理论
A richedit control can be thought of as a souped-up edit control. 它提供了普通简单Edit控件所缺少的很多令人合意的功能，譬如可以使用多种字体和字体大小，多级Undo/Redo,文本搜索，内嵌OLE对象，编辑的拖放支持等等。由于RichEdit控件有这么多功能，因此它独存于一个单独的DLL文件。这个意味着如果你要使用RichEdit控件，就不能象使用其他普通控件那样只调用InitCommonControls 函数。你必须先使用 LoadLibrary 来载入RichEdit DLL文件。
这里有个问题，就是至今为止RichEdit控件共有3个版本，版本1，2和3。下面的表格显示了每个版本的相应的DLL文件名。
DLL Name RichEdit version Richedit Class Name
Riched32.dll 1.0 RICHEDIT
RichEd20.dll 2.0 RICHEDIT20A
RichEd20.dll 3.0 RICHEDIT20A
你会注意到版本2和3都使用了相同的DLL文件名，而且它们也使用了相同的类名！这样在你想要明确的使用RichEdit 3.0的功能的时候就会产生问题. 到目前为止,我还找到一个正式的方法来区分版本2.0和3.0.不过,有个解决方法工作良好，我会在后面演示给你看.
.data
RichEditDLL db "RichEd20.dll",0 ......data? hRichEditDLL dd ?.code invoke LoadLibrary,addr RichEditDLL mov hRichEditDLL,eax ...... invoke FreeLibrary,hRichEditDLL
当Richedit DLL文件被载入时,它会注册 RichEdit 窗口类,因此需要在你创建Richedit控件之前必须先要载入DLL.Richedit控件的类名是不同的。现在你可能会有一个问题要提:我怎么样才能够知道我要使用哪个版本的Richedit控件?如果你不需要使用那些特别的功能,使用最新的版本也不定是最适宜的.下面的表格列出了每个RichEdit版本提供的功能.
功能 版本 1.0 版本 2.0 版本 3.0
选择条 x x x
Unicode 编辑 x x
字符段落格式 x x x
文本搜索 向前搜索 向前/向后搜索 向前/向后搜索
内嵌OLE x x x
拖放编辑 x x x
Undo/Redo 单级 多级 多级
自动 URL 识别 x x
加速键支持 x x
非窗口操作 x x
分行符 CRLF CR CR (可以模拟1.0版本)
Zoom x
Paragraph numbering x
simple table x
normal and heading styles x
underline coloring x
hidden text x
font binding x
上面的表格不是全面的:我只是列出了那些重要的功能.
创建RchEdit 控件
载入DLL文件后,你可以调用CreateWindowEx 来创建RichEdit控件,创建控件时你可以使用Edit控件风格和普通窗口风格,但是ES_LOWERCASE, ES_UPPERCASE 和 ES_OEMCONVERT 风格除外.
.const
RichEditID equ 300
.data
RichEditDLL db "RichEd20.dll",0 RichEditClass db "RichEdit20A",0
...
.data? hRichEditDLL dd ?
hwndRichEdit dd ?
.code
.....
invoke LoadLibrary,addr RichEditDLL
mov hRichEditDLL,eax invoke CreateWindowEx,0,addr RichEditClass,WS_VISIBLE or ES_MULTILINE or WS_CHILD or WS_VSCROLL or WS_HSCROLL, /
CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,hWnd,RichEditID,hInstance,0
mov hwndRichEdit,eax
设置缺省的文本和背景颜色
在使用Edit控件时设置文本和背景颜色可能有点问题,但是在RichEdit控件中已经修正了这个问题.要设置RichEdit的背景色,你要发送 EM_SETBKGNDCOLOR 消息给RichEdit控件.这个消息具有以下语法.
wParam == 颜色选项. 如果是0说明Windows使用 lParam 中的颜色值作为背景色.如果该参数不为0,Windows使用系统背景色.因为我们要发送该消息来改变背景色,所以我们必须令wParam为0.
lParam == 指定要设置的颜色的 COLORREF 结构,仅当 wParam 为 0 时才有效.
譬如, 如果我要设置背景为纯蓝色,我需要写入以下代码:
invoke SendMessage,hwndRichEdit,EM_SETBKGNDCOLOR,0,0FF0000h
要设置文本颜色,RichEdit控件提供了另外的新消息,EM_SETCHARFORMAT来做这个工作. 这个消息控制控件中一段选定的文本或者全部正文的格式. 这个消息的语法如下:
wParam == 格式选项:
SCF_ALL 本次操作影响控件中全部文本.
SCF_SELECTION 本次操作仅影响选定的文本
SCF_WORD or SCF_SELECTION 本次操作仅影响所选定的那个单词. 如果选定是空的话，仅将插入点(光标)设置到指定字的位置. SCF_WORD 标志必须跟 SCF_SELECTION 一起使用.
lParam == CHARFORMAT 或者 CHARFORMAT2 结构的指针,说明要使用的正文格式. CHARFORMAT2 只在 Richedit 2.0 和更高版本才提供.这个不是说在RichEdit 2.0以后你一定要使用 CHARFORMAT2 . 如果你不需要使用到 CHARFORMAT2 中新加的功能, 你仍然可以使用CHARFORMAT .
CHARFORMATA STRUCT
cbSize DWORD ?
dwMask DWORD ?
dwEffects DWORD ?
yHeight DWORD ?
yOffset DWORD ?
crTextColor COLORREF ?
bCharSet BYTE ?
bPitchAndFamily BYTE ?
szFaceName BYTE LF_FACESIZE dup(?)
_wPad2 WORD ?
CHARFORMATA ENDS
Field Name Description
cbSize 该结构的大小. RichEdit控件使用该域来判断该结构的版本是 CHARFORMAT 还是 CHARFORMAT2
dwMask 位标记, 用来指定下面的那些成员是有效的.
CFM_BOLD dwEffects 成语中的 CFE_BOLD 值是有效的.
CFM_CHARSET bCharSet 成员是有效的。
CFM_COLOR crTextColor 成员跟 dwEffects中的 CFE_AUTOCOLOR 值是有效的.
CFM_FACE szFaceName 成员是有效的.
CFM_ITALIC dwEffects 成员中的 CFE_ITALIC 值是有效的.
CFM_OFFSET yOffset 成员是有效的.
CFM_PROTECTED dwEffects 成员中的 CFE_PROTECTED 值是有效的.
CFM_SIZE yHeight 成员是有效的.
CFM_STRIKEOUT dwEffects 成员中的 CFE_STRIKEOUT 值是有效的.
CFM_UNDERLINE dwEffects 成员中的 CFE_UNDERLINE 值是有效的.
dwEffects 字符效果. 可以是以下值的组合
CFE_AUTOCOLOR 使用系统正文颜色
CFE_BOLD 粗体字符
CFE_ITALIC 斜体字符
CFE_STRIKEOUT 字符带删除线
CFE_UNDERLINE 字符带下划线
CFE_PROTECTED 字符是受保护的;
企图改变字体会产生一个EN_PROTECTED 通知消息.
yHeight 字符高度, 单位是 twips ( 1/1440 英寸 或者 1/20 的打印机的打印点).
yOffset 字符偏移,单位是 twips, 从基线算起.如果该成员是正值,字符是下标,如果负值,字符是下标.
crTextColor 正文颜色. 如果指定了 CFE_AUTOCOLOR 字符效果,这个值会被忽略.
bCharSet 字符集
bPitchAndFamily Font family and pitch.
szFaceName 字体名字，是一个空字符结尾的字符数组.
_wPad2 填充
通过检查这个结构，你会发现我们可以改变正文效果(粗体,斜体,删除线,下划线),正文颜色 (crTextColor) 和字体外观/大小/字符集. 值得注意的是 CFE_RPOTECTED 标志. 具有该标志的正文会被标志上受保护标志,意味着当用户试图改变它时, EN_PROTECTED 这个通知消息会被发送到父窗口.同时你可以允许该更改是是否可以进行.
CHARFORMAT2 增加更多的正文风格,象字体权值,间距,正文背景色,字距调整等等.如果你不需要这些额外的功能,只要使用 CHARFORMAT即可.
要设置正文格式,你必须考虑你想要该格式应用到的正文的范围.RichEdit控件引入了字符正文范围的概念.RichEdit 分派给每个字符一个从0开始数字值:控件中的第一个字符具有数字ID值为0,第二个为1...等等。要说明一个正文范围，你必须提供给RichEdit控件两个数值：范围的第一个和最后一个字符的ID值。要跟 EM_SETCHARFORMAT 一起应用字符格式，你有最多3种选择:
1.应用于控件中的所有正文。 (SCF_ALL)
2.应用于当前选定的正文。 (SCF_SELECTION)
3.应用于当前选定的一个单词。 (SCF_WORD 或者 SCF_SELECTION)
第一、二种情况是直观的，最后一个选择需要一点解释。如果当前选择只覆盖了词中的一个或多个字符但是不是整个词，指定 SCF_WORD+SCF_SELECTION 标志将正文格式应用于整个单词。即使没有当前选定，只有插入点（光标）位于单词中，第三种情况下仍然会将正文格式应用到整个单词中。
要使用 EM_SETCHARFORMAT, 你需要填充 CHARFORMAT (或者 CHARFORMAT2) 结构的结果成员。譬如，如果我们要设置正文颜色，需要如下一样填充 CHARFORMAT 结构:
.data?
cf CHARFORMAT <>
....
.code
mov cf.cbSize,sizeof cf
mov cf.dwMask,CFM_COLOR
mov cf.crTextColor,0FF0000h
invoke SendMessage,hwndRichEdit,EM_SETCHARFORMAT,SCF_ALL,addr cf
以上的代码片段设置RichEdit控件的正文颜色为纯蓝色。注意当 EM_SETCHARFORMAT 发生时，如果控件中没有正文，在这个消息之后键入的正文将会使用消息 EM_SETCHARFORMAT 中指定的正文格式。
设置正文/保存正文
对于那些经常使用Edit控件的人来说，你们肯定对使用 WM_GETTEXT/WM_SETTEXT 来设置/保存 控制中的正文的方法很熟悉。这个方法对RichEdit仍然适用，但是如果文件很大的话这个方法不再是最有效的。Edit控件限制了正文长度，可以输入最多64K的正文。但是RichEdit控件可以接受比这个限制大的多的正文数据。要分配一个很大的内存块(譬如大约 10MB ) 来接受来自来自WM_GETTEXT 消息的正文是一件很麻烦的事. Richedit 控件为此提供了一个新的方法，就是 正文流（Text Streaming）。
要设置RichEdit文本，你只需给RichEdit简单的提供一个回调函数的地址，当一切准备好时，RichEdit 会调用回调函数，并将正文缓冲区的地址传递给它。回调函数会将要发送给RichEdit的数据填入缓冲区或者将缓冲区的数据读出，然后等待下一次调用自到操作完成。 范例程序是流入（设置正文）和流出（取出正文）两者的例子。你将会发现这个方法更加有效：这个缓冲区是RichEdit控件自己提供的，因此数据被分成了几个大块。这个操作包括两条消息: EM_STREAMIN 和 EM_STREAMOUT。
EM_STREAMIN 和 EM_STREAMOUT 两者使用同一个语法:
wParam == 格式选项.
SF_RTF 数据是RTF格式。
SF_TEXT 数据是简单正文格式。
SFF_PLAINRTF 只有那些对所有语系都共有的关键词才流入。
SFF_SELECTION 如果指定这个标志，流操作的目标就是当前选定的正文。如果你将正文流入，当前正文就会被替换，如果是流出，则只有那些当前选定的正文才流出。如果没有指定这个标志，操作就会影响到控件中的所有正文。
SF_UNICODE (RichEdit 2.0 或更高版本才提供）指定的是 Unicode 正文。
lParam == 指向一个 EDITSTREAM 结构，该结构定义如下：
EDITSTREAM STRUCT
dwCookie DWORD ?
dwError DWORD ?
pfnCallback DWORD ?
EDITSTREAM ENDS
dwCookie 应用程序定义的数值，将会被传递给由 pfnCallback 成员说明的回调函数。通常地我们传递一些重要的参数值给回调函数，譬如流入/流出 处理中使用到的文件句柄。
dwError 指示流入（读）或流出（写）操作的结果。0说明没有错误。非0值可以是 EditStreamCallback 函数的返回值或者说明控件遇到了错误。
pfnCallback 指向 EditStreamCallback 函数的指针，该函数是由用户定义，由RichEdit调用来传输数据的。RichEdit 将数据分开多个部分，重复地调用该函数，一次一部分地进行数据传输。
EditStream 回调函数具有以下定义：
EditStreamCallback proto dwCookie
WORD,pBuffer
WORD,
NumBytes
WORD,
pBytesTransferred
WORD
你必须在程序中按照以上原型来创建回调函数。然后将函数地址通过 EDITSTREAM 结构传递给EM_STREAMIN 或者 EM_STREAMOUT 。
对流入操作(设置RichEdit 控件中的正文):
dwCookie: 应用程序定义的数值，通过 EDITSTREAM 结构传递给 EM_STREAMIN 。
在这里我们几乎全部都是将用其内容来设置RichEdit正文的文件的句柄传给这个参数。
pBuffer: 指向RichEdit提供的缓冲区。用来接受回调函数中提供的正文数据。
NumBytes: 本次调用中你可以写入缓冲区(pBuffer)的最大正文字节数。你 必须 遵守这个限制，
也就是说你发送的数据的大小可以比NumBytes指定要小，但是不能大于这个值。
你可以将这个数值当作pBuffer缓冲区的大小。
pBytesTransferred: 指向一个双字(DWORD)，你必须设置这个值来指示你实际上传输了多少字节数据到缓冲区。
这个值通常跟 NumBytes中的值是相等的. 唯一的例外是当要传送的数据少于缓冲区提供的大小时，
譬如到达文件尾时就是了。
对流出操作(读出RichEdit控件的正文):
dwCookie: 跟流入操作相同. 我们一般传递想要将数据写入的文件的句柄给这个参数。
pBuffer: 指向由RichEdit提供的缓冲区，里面的是RichEdit的正文。要得到其大小，你必须检查 NumBytes 的知.
NumBytes: pBuffer 指向的缓冲区的的数据的大小。
pBytesTransferred: 指向一个双字(DWORD)，你必须设置这个值来指示你实际上从缓冲区里读出了多少字节数据。
回调函数返回0说明操作成功，而且如果还有数据需要读/写的话，RichEdit控件会继续调用它。如果操作中发生了错误，而且你想停止操作的话，你可以返回一个非0值，这样RichEdit就会丢弃pBuffer指向的数据。错误/成功返回值会在 EDITSTREAM 的 dwError 成员中返回，你可以 在SendMessage 返回后检查流操作的错误/成功状态。.
例子:
下面的例子是一个简单的编辑器，你可以用来打开一个asm源文件，编辑它，然后保存。它使用了 RichEdit 控件 2.0 或者更高的版本.
.386
.model flat,stdcall
option casemap:none
include /masm32/include/windows.inc
include /masm32/include/user32.inc
include /masm32/include/comdlg32.inc
include /masm32/include/gdi32.inc
include /masm32/include/kernel32.inc
includelib /masm32/lib/gdi32.lib
includelib /masm32/lib/comdlg32.lib
includelib /masm32/lib/user32.lib
includelib /masm32/lib/kernel32.lib
WinMain proto
WORD,
WORD,
WORD,
WORD
.const
IDR_MAINMENU equ 101
IDM_OPEN equ 40001
IDM_SAVE equ 40002
IDM_CLOSE equ 40003
IDM_SAVEAS equ 40004
IDM_EXIT equ 40005
IDM_COPY equ 40006
IDM_CUT equ 40007
IDM_PASTE equ 40008
IDM_DELETE equ 40009
IDM_SELECTALL equ 40010
IDM_OPTION equ 40011
IDM_UNDO equ 40012
IDM_REDO equ 40013
IDD_OPTIONDLG equ 101
IDC_BACKCOLORBOX equ 1000
IDC_TEXTCOLORBOX equ 1001
RichEditID equ 300
.data
ClassName db "IczEditClass",0
AppName db "IczEdit version 1.0",0
RichEditDLL db "riched20.dll",0
RichEditClass db "RichEdit20A",0
NoRichEdit db "Cannot find riched20.dll",0
ASMFilterString db "ASM Source code (*.asm)",0,"*.asm",0
db "All Files (*.*)",0,"*.*",0,0
OpenFileFail db "Cannot open the file",0
WannaSave db "The data in the control is modified. Want to save it?",0
FileOpened dd FALSE
BackgroundColor dd 0FFFFFFh ;
缺省为白色
TextColor dd 0 ;
缺省为黑色
.data?
hInstance dd ?
hRichEdit dd ?
hwndRichEdit dd ?
FileName db 256 dup(?)
AlternateFileName db 256 dup(?)
CustomColors dd 16 dup(?)
.code
start:
invoke GetModuleHandle, NULL
mov hInstance,eax
invoke LoadLibrary,addr RichEditDLL
.if eax!=0
mov hRichEdit,eax
invoke WinMain, hInstance,0,0, SW_SHOWDEFAULT
invoke FreeLibrary,hRichEdit
.else
invoke MessageBox,0,addr NoRichEdit,addr AppName,MB_OK or MB_ICONERROR
.endif
invoke ExitProcess,eax
WinMain proc hInst
WORD,hPrevInst
WORD,CmdLine
WORD,CmdShow
WORD
LOCAL wc:WNDCLASSEX
LOCAL msg:MSG
LOCAL hwnd
WORD
mov wc.cbSize,SIZEOF WNDCLASSEX
mov wc.style, CS_HREDRAW or CS_VREDRAW
mov wc.lpfnWndProc, OFFSET WndProc
mov wc.cbClsExtra,NULL
mov wc.cbWndExtra,NULL
push hInst
pop wc.hInstance
mov wc.hbrBackground,COLOR_WINDOW+1
mov wc.lpszMenuName,IDR_MAINMENU
mov wc.lpszClassName,OFFSET ClassName
invoke LoadIcon,NULL,IDI_APPLICATION
mov wc.hIcon,eax
mov wc.hIconSm,eax
invoke LoadCursor,NULL,IDC_ARROW
mov wc.hCursor,eax
invoke RegisterClassEx, addr wc
INVOKE CreateWindowEx,NULL,ADDR ClassName,ADDR AppName,/
WS_OVERLAPPEDWINDOW,CW_USEDEFAULT,/
CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,NULL,NULL,/
hInst,NULL
mov hwnd,eax
invoke ShowWindow, hwnd,SW_SHOWNORMAL
invoke UpdateWindow, hwnd
.while TRUE
invoke GetMessage, ADDR msg,0,0,0
.break .if (!eax)
invoke TranslateMessage, ADDR msg
invoke DispatchMessage, ADDR msg
.endw
mov eax,msg.wParam
ret
WinMain endp
StreamInProc proc hFile
WORD,pBuffer
WORD, NumBytes
WORD, pBytesRead
WORD
invoke ReadFile,hFile,pBuffer,NumBytes,pBytesRead,0
xor eax,1
ret
StreamInProc endp
StreamOutProc proc hFile
WORD,pBuffer
WORD, NumBytes
WORD, pBytesWritten
WORD
invoke WriteFile,hFile,pBuffer,NumBytes,pBytesWritten,0
xor eax,1
ret
StreamOutProc endp
CheckModifyState proc hWnd
WORD
invoke SendMessage,hwndRichEdit,EM_GETMODIFY,0,0
.if eax!=0
invoke MessageBox,hWnd,addr WannaSave,addr AppName,MB_YESNOCANCEL
.if eax==IDYES
invoke SendMessage,hWnd,WM_COMMAND,IDM_SAVE,0
.else
if eax==IDCANCEL
mov eax,FALSE
ret
.endif
.endif
mov eax,TRUE
ret
CheckModifyState endp
SetColor proc
LOCAL cfm:CHARFORMAT
invoke SendMessage,hwndRichEdit,EM_SETBKGNDCOLOR,0,BackgroundColor
invoke RtlZeroMemory,addr cfm,sizeof cfm
mov cfm.cbSize,sizeof cfm
mov cfm.dwMask,CFM_COLOR
push TextColor
pop cfm.crTextColor
invoke SendMessage,hwndRichEdit,EM_SETCHARFORMAT,SCF_ALL,addr cfm
ret
SetColor endp
OptionProc proc hWnd
WORD, uMsg
WORD, wParam
WORD, lParam
WORD
LOCAL clr:CHOOSECOLOR
.if uMsg==WM_INITDIALOG
.else
if uMsg==WM_COMMAND
mov eax,wParam
shr eax,16
.if ax==BN_CLICKED
mov eax,wParam
.if ax==IDCANCEL
invoke SendMessage,hWnd,WM_CLOSE,0,0
.else
if ax==IDC_BACKCOLORBOX
invoke RtlZeroMemory,addr clr,sizeof clr
mov clr.lStructSize,sizeof clr
push hWnd
pop clr.hwndOwner
push hInstance
pop clr.hInstance
push BackgroundColor
pop clr.rgbResult
mov clr.lpCustColors,offset CustomColors
mov clr.Flags,CC_ANYCOLOR or CC_RGBINIT
invoke ChooseColor,addr clr
.if eax!=0
push clr.rgbResult
pop BackgroundColor
invoke GetDlgItem,hWnd,IDC_BACKCOLORBOX
invoke InvalidateRect,eax,0,TRUE
.endif
.else
if ax==IDC_TEXTCOLORBOX
invoke RtlZeroMemory,addr clr,sizeof clr
mov clr.lStructSize,sizeof clr
push hWnd
pop clr.hwndOwner
push hInstance
pop clr.hInstance
push TextColor
pop clr.rgbResult
mov clr.lpCustColors,offset CustomColors
mov clr.Flags,CC_ANYCOLOR or CC_RGBINIT
invoke ChooseColor,addr clr
.if eax!=0
push clr.rgbResult
pop TextColor
invoke GetDlgItem,hWnd,IDC_TEXTCOLORBOX
invoke InvalidateRect,eax,0,TRUE
.endif
.else
if ax==IDOK
;==================================================================================
;保存RichEdit控件的修改状态，因为更改正文颜色时改变了RichEdit控件的修改状态。
;
;==================================================================================
invoke SendMessage,hwndRichEdit,EM_GETMODIFY,0,0
push eax
invoke SetColor
pop eax
invoke SendMessage,hwndRichEdit,EM_SETMODIFY,eax,0
invoke EndDialog,hWnd,0
.endif
.endif
.else
if uMsg==WM_CTLCOLORSTATIC
invoke GetDlgItem,hWnd,IDC_BACKCOLORBOX
.if eax==lParam
invoke CreateSolidBrush,BackgroundColor
ret
.else
invoke GetDlgItem,hWnd,IDC_TEXTCOLORBOX
.if eax==lParam
invoke CreateSolidBrush,TextColor
ret
.endif
.endif
mov eax,FALSE
ret
.else
if uMsg==WM_CLOSE
invoke EndDialog,hWnd,0
.else
mov eax,FALSE
ret
.endif
mov eax,TRUE
ret
OptionProc endp
WndProc proc hWnd
WORD, uMsg
WORD, wParam
WORD, lParam
WORD
LOCAL chrg:CHARRANGE
LOCAL ofn:OPENFILENAME
LOCAL buffer[256]:BYTE
LOCAL editstream:EDITSTREAM
LOCAL hFile
WORD
.if uMsg==WM_CREATE
invoke CreateWindowEx,WS_EX_CLIENTEDGE,addr RichEditClass,0,WS_CHILD or/
WS_VISIBLE or ES_MULTILINE or WS_VSCROLL or WS_HSCROLL or ES_NOHIDESEL,/
CW_USEDEFAULT,CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,hWnd,RichEditID,hInstance,0
mov hwndRichEdit,eax
;=============================================================
;
设置正文长度限制，缺省是 64K
;=============================================================
invoke SendMessage,hwndRichEdit,EM_LIMITTEXT,-1,0
;=============================================================
;
Set the default text/background color
;=============================================================
invoke SetColor
invoke SendMessage,hwndRichEdit,EM_SETMODIFY,FALSE,0
invoke SendMessage,hwndRichEdit,EM_EMPTYUNDOBUFFER,0,0
.else
if uMsg==WM_INITMENUPOPUP
mov eax,lParam
;====================================================
.if ax==0 ;
file menu
.if FileOpened==TRUE ;
a file is already opened
invoke EnableMenuItem,wParam,IDM_OPEN,MF_GRAYED
invoke EnableMenuItem,wParam,IDM_CLOSE,MF_ENABLED
invoke EnableMenuItem,wParam,IDM_SAVE,MF_ENABLED
invoke EnableMenuItem,wParam,IDM_SAVEAS,MF_ENABLED
.else
invoke EnableMenuItem,wParam,IDM_OPEN,MF_ENABLED
invoke EnableMenuItem,wParam,IDM_CLOSE,MF_GRAYED
invoke EnableMenuItem,wParam,IDM_SAVE,MF_GRAYED
invoke EnableMenuItem,wParam,IDM_SAVEAS,MF_GRAYED
.endif
.else
if ax==1 ;
edit 菜单
;=============================================================================
;
检查剪贴板里是否有正文，如果有的话我们就使能 Paste 菜单项。
;=============================================================================
invoke SendMessage,hwndRichEdit,EM_CANPASTE,CF_TEXT,0
.if eax==0 ;
no text in the clipboard
invoke EnableMenuItem,wParam,IDM_PASTE,MF_GRAYED
.else
invoke EnableMenuItem,wParam,IDM_PASTE,MF_ENABLED
.endif
;==========================================================
;
检查Undo队列时是否为空
;==========================================================
invoke SendMessage,hwndRichEdit,EM_CANUNDO,0,0
.if eax==0
invoke EnableMenuItem,wParam,IDM_UNDO,MF_GRAYED
.else
invoke EnableMenuItem,wParam,IDM_UNDO,MF_ENABLED
.endif
;=========================================================
;
检查Redo队列时是否为空
;=========================================================
invoke SendMessage,hwndRichEdit,EM_CANREDO,0,0
.if eax==0
invoke EnableMenuItem,wParam,IDM_REDO,MF_GRAYED
.else
invoke EnableMenuItem,wParam,IDM_REDO,MF_ENABLED
.endif
;=========================================================
;
检查RichEdit控件中是否有当前选定正文，有的话就使能
;
cut/copy/delete 菜单项。
;=========================================================
invoke SendMessage,hwndRichEdit,EM_EXGETSEL,0,addr chrg
mov eax,chrg.cpMin
.if eax==chrg.cpMax ;
没有当前选定
invoke EnableMenuItem,wParam,IDM_COPY,MF_GRAYED
invoke EnableMenuItem,wParam,IDM_CUT,MF_GRAYED
invoke EnableMenuItem,wParam,IDM_DELETE,MF_GRAYED
.else
invoke EnableMenuItem,wParam,IDM_COPY,MF_ENABLED
invoke EnableMenuItem,wParam,IDM_CUT,MF_ENABLED
invoke EnableMenuItem,wParam,IDM_DELETE,MF_ENABLED
.endif
.endif
;=======================================================
.else
if uMsg==WM_COMMAND
.if lParam==0 ;
命令菜单
mov eax,wParam
.if ax==IDM_OPEN
invoke RtlZeroMemory,addr ofn,sizeof ofn
mov ofn.lStructSize,sizeof ofn
push hWnd
pop ofn.hwndOwner
push hInstance
pop ofn.hInstance
mov ofn.lpstrFilter,offset ASMFilterString
mov ofn.lpstrFile,offset FileName
mov byte ptr [FileName],0
mov ofn.nMaxFile,sizeof FileName
mov ofn.Flags,OFN_FILEMUSTEXIST or OFN_HIDEREADONLY or OFN_PATHMUSTEXIST
invoke GetOpenFileName,addr ofn
.if eax!=0
invoke CreateFile,addr FileName,GENERIC_READ,FILE_SHARE_READ,NULL,/
OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0
.if eax!=INVALID_HANDLE_VALUE
mov hFile,eax
;================================================================
;
将正文流入RichEdit控件。
;================================================================
mov editstream.dwCookie,eax
mov editstream.pfnCallback,offset StreamInProc
invoke SendMessage,hwndRichEdit,EM_STREAMIN,SF_TEXT,addr editstream
;==========================================================
;
初始化修改状态为FALSE
;==========================================================
invoke SendMessage,hwndRichEdit,EM_SETMODIFY,FALSE,0
invoke CloseHandle,hFile
mov FileOpened,TRUE
.else
invoke MessageBox,hWnd,addr OpenFileFail,addr AppName,MB_OK or MB_ICONERROR
.endif
.endif
.else
if ax==IDM_CLOSE
invoke CheckModifyState,hWnd
.if eax==TRUE
invoke SetWindowText,hwndRichEdit,0
mov FileOpened,FALSE
.endif
.else
if ax==IDM_SAVE
invoke CreateFile,addr FileName,GENERIC_WRITE,FILE_SHARE_READ,NULL,/
CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,0
.if eax!=INVALID_HANDLE_VALUE
@@:
mov hFile,eax
;================================================================
;
将RichEdit中的正文流出到文件中。
;================================================================
mov editstream.dwCookie,eax
mov editstream.pfnCallback,offset StreamOutProc
invoke SendMessage,hwndRichEdit,EM_STREAMOUT,SF_TEXT,addr editstream
;==========================================================
;
初始化修改状态为FALSE
;==========================================================
invoke SendMessage,hwndRichEdit,EM_SETMODIFY,FALSE,0
invoke CloseHandle,hFile
.else
invoke MessageBox,hWnd,addr OpenFileFail,addr AppName,MB_OK or MB_ICONERROR
.endif
.else
if ax==IDM_COPY
invoke SendMessage,hwndRichEdit,WM_COPY,0,0
.else
if ax==IDM_CUT
invoke SendMessage,hwndRichEdit,WM_CUT,0,0
.else
if ax==IDM_PASTE
invoke SendMessage,hwndRichEdit,WM_PASTE,0,0
.else
if ax==IDM_DELETE
invoke SendMessage,hwndRichEdit,EM_REPLACESEL,TRUE,0
.else
if ax==IDM_SELECTALL
mov chrg.cpMin,0
mov chrg.cpMax,-1
invoke SendMessage,hwndRichEdit,EM_EXSETSEL,0,addr chrg
.else
if ax==IDM_UNDO
invoke SendMessage,hwndRichEdit,EM_UNDO,0,0
.else
if ax==IDM_REDO
invoke SendMessage,hwndRichEdit,EM_REDO,0,0
.else
if ax==IDM_OPTION
invoke DialogBoxParam,hInstance,IDD_OPTIONDLG,hWnd,addr OptionProc,0
.else
if ax==IDM_SAVEAS
invoke RtlZeroMemory,addr ofn,sizeof ofn
mov ofn.lStructSize,sizeof ofn
push hWnd
pop ofn.hwndOwner
push hInstance
pop ofn.hInstance
mov ofn.lpstrFilter,offset ASMFilterString
mov ofn.lpstrFile,offset AlternateFileName
mov byte ptr [AlternateFileName],0
mov ofn.nMaxFile,sizeof AlternateFileName
mov ofn.Flags,OFN_FILEMUSTEXIST or OFN_HIDEREADONLY or OFN_PATHMUSTEXIST
invoke GetSaveFileName,addr ofn
.if eax!=0
invoke CreateFile,addr AlternateFileName,GENERIC_WRITE,/
FILE_SHARE_READ,NULL,CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,0
.if eax!=INVALID_HANDLE_VALUE
jmp @B
.endif
.endif
.else
if ax==IDM_EXIT
invoke SendMessage,hWnd,WM_CLOSE,0,0
.endif
.endif
.else
if uMsg==WM_CLOSE
invoke CheckModifyState,hWnd
.if eax==TRUE
invoke DestroyWindow,hWnd
.endif
.else
if uMsg==WM_SIZE
mov eax,lParam
mov edx,eax
and eax,0FFFFh
shr edx,16
invoke MoveWindow,hwndRichEdit,0,0,eax,edx,TRUE
.else
if uMsg==WM_DESTROY
invoke PostQuitMessage,NULL
.else
invoke DefWindowProc,hWnd,uMsg,wParam,lParam
ret
.endif
xor eax,eax
ret
WndProc endp
end start
;===================================================================
;
资源文件
;===================================================================
#include "resource.h"
#define IDR_MAINMENU 101
#define IDD_OPTIONDLG 101
#define IDC_BACKCOLORBOX 1000
#define IDC_TEXTCOLORBOX 1001
#define IDM_OPEN 40001
#define IDM_SAVE 40002
#define IDM_CLOSE 40003
#define IDM_SAVEAS 40004
#define IDM_EXIT 40005
#define IDM_COPY 40006
#define IDM_CUT 40007
#define IDM_PASTE 40008
#define IDM_DELETE 40009
#define IDM_SELECTALL 40010
#define IDM_OPTION 40011
#define IDM_UNDO 40012
#define IDM_REDO 40013
IDR_MAINMENU MENU DISCARDABLE
begin
POPUP "&File"
begin
MENUITEM "&Open", IDM_OPEN
MENUITEM "&Close", IDM_CLOSE
MENUITEM "&Save", IDM_SAVE
MENUITEM "Save &As", IDM_SAVEAS
MENUITEM SEPARATOR
MENUITEM "E&xit", IDM_EXIT
END
POPUP "&Edit"
begin
MENUITEM "&Undo", IDM_UNDO
MENUITEM "&Redo", IDM_REDO
MENUITEM "&Copy", IDM_COPY
MENUITEM "C&ut", IDM_CUT
MENUITEM "&Paste", IDM_PASTE
MENUITEM SEPARATOR
MENUITEM "&Delete", IDM_DELETE
MENUITEM SEPARATOR
MENUITEM "Select &All", IDM_SELECTALL
END
MENUITEM "Options", IDM_OPTION
END
IDD_OPTIONDLG DIALOG DISCARDABLE 0, 0, 183, 54
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | DS_CENTER
CAPTION "Options"
FONT 8, "MS Sans Serif"
begin
DEFPUSHBUTTON "OK",IDOK,137,7,39,14
PUSHBUTTON "Cancel",IDCANCEL,137,25,39,14
GROUPBOX "",IDC_STATIC,5,0,124,49
LTEXT "Background Color:",IDC_STATIC,20,14,60,8
LTEXT "",IDC_BACKCOLORBOX,85,11,28,14,SS_NOTIFY | WS_BORDER
LTEXT "Text Color:",IDC_STATIC,20,33,35,8
LTEXT "",IDC_TEXTCOLORBOX,85,29,28,14,SS_NOTIFY | WS_BORDER
END
--------------------------------------------------------------------------------
分析:
例子程序首先载入RichEdit DLL, 在这里是 riched20.dll. 如果DLL载入失败，就返回 Windows.
invoke LoadLibrary,addr RichEditDLL
.if eax!=0
mov hRichEdit,eax
invoke WinMain,hInstance,0,0, SW_SHOWDEFAULT
invoke FreeLibrary,hRichEdit
.else
invoke MessageBox,0,addr NoRichEdit,addr AppName,MB_OK or MB_ICONERROR
.endif
invoke ExitProcess,eax
成功载入DLL后，我们继续创建一个常规窗口，作为RichEdit的父窗口。在 WM_CREATE 处理函数里，我们创建一个RichEdit控件:
invoke CreateWindowEx,WS_EX_CLIENTEDGE,addr RichEditClass,0,WS_CHILD or WS_VISIBLE or ES_MULTILINE or WS_VSCROLL or WS_HSCROLL or ES_NOHIDESEL,/
CW_USEDEFAULT,CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,hWnd,RichEditID,hInstance,0
mov hwndRichEdit,eax
注意在这里我们指定了 ES_MULTILINE 风格，否则创建的会是一个单行的控件。
invoke SendMessage,hwndRichEdit,EM_LIMITTEXT,-1,0
创建了RichEdit控件之后，我们必须设置新的正文大小。缺省时，RichEdit控件具有64K的正文大小限制，跟简单的多行Edit控件相同。我们需要扩展这个限制，允许用来操作更大的文件。在上一个代码行里，我们指定了大小为 -1， 大小总计为 0FFFFFFFFh 字节, 是一个很大的数值了。
invoke SetColor
下一步，我们设置正文/背景色 。 因为这个操作可以在程序中的其他部分执行，我把这些代码放到一个叫SetColor的函数里。
SetColor proc
LOCAL cfm:CHARFORMAT
invoke SendMessage,hwndRichEdit,EM_SETBKGNDCOLOR,0,BackgroundColor
设置RichEdit控件的背景色是一个很简单的操作：只需发送 EM_SETBKGNDCOLOR 信息给RIchEdit控件就行了。(如果你使用多行Edit控件，你必须处理 WM_CTLCOLOREDIT 消息)。缺省的背景色是白色的。
invoke RtlZeroMemory,addr cfm,sizeof cfm
mov cfm.cbSize,sizeof cfm
mov cfm.dwMask,CFM_COLOR
push TextColor
pop cfm.crTextColor
设置好背景色之后，我们填充 CHARFORMAT 的成员，以便用来设置设置正文颜色。应该注意的是我们使用该结构的大小来填充cbSize 成员，这样RichEdit 控件就知道我们发送的是CHARFORMAT, 而不是 CHARFORMAT2。 dwMask 只使用了一个 CFM_COLOR 标志, 因为我们只想设置正文颜色，同时往 crTextColor 里填入我们想要的正文颜色值.
invoke SendMessage,hwndRichEdit,EM_SETCHARFORMAT,SCF_ALL,addr cfm
ret
SetColor endp
设置好颜色后，你必须要清空 Undo 缓冲区，因为更改正文/背景颜色的操作是可撤消的（Undo-able），更改颜色时在缓冲区里留下了Undo信息。我们可以发送 EM_EMPTYUNDOBUFFER 消息来实现这个操作。
invoke SendMessage,hwndRichEdit,EM_EMPTYUNDOBUFFER,0,0
填充好 CHARFORMAT 结构, 我们发送 EM_SETCHARFORMAT 消息给RichEdit控件，在wParam中指定 SCF_ALL 标志，说明我们想把正文格式应用于控件中的所有正文。
注意在我们第一次创建RichEdit控件时，我们没有指定它的大小/位置。这是因为我们想它覆盖父窗口的全部客户区。当父窗口大小改变时，我们就跟着改变RichEdit控件的大小。
.else
if uMsg==WM_SIZE
mov eax,lParam
mov edx,eax
and eax,0FFFFh
shr edx,16
invoke MoveWindow,hwndRichEdit,0,0,eax,edx,TRUE
在上面的程序片段, 我们使用了在 lParam中的客户区的新尺寸，通过 MoveWindow来改变RichEdit的大小。
当用户点击文件 File/Edit 菜单条时，我们处理 WM_INITPOPUPMENU 消息，因此我们可以在显示子菜单给用户之前准备好各个子菜单项的状态。譬如，如果已经有一个文件在RichEdit控件中打开了，我们想禁止Open菜单项同时使能其他的菜单项。
对于这种情况下的File菜单条, 我们使用变量 FileOpened 来作为标志表示是否有一个文件已经打开了。如果这个变量是TRUE值，我们知道已经有一个文件被打开了。
.else
if uMsg==WM_INITMENUPOPUP
mov eax,lParam
.if ax==0 ;
file 菜单
.if FileOpened==TRUE ;
已经打开了一个文件
invoke EnableMenuItem,wParam,IDM_OPEN,MF_GRAYED
invoke EnableMenuItem,wParam,IDM_CLOSE,MF_ENABLED
invoke EnableMenuItem,wParam,IDM_SAVE,MF_ENABLED
invoke EnableMenuItem,wParam,IDM_SAVEAS,MF_ENABLED
.else
invoke EnableMenuItem,wParam,IDM_OPEN,MF_ENABLED
invoke EnableMenuItem,wParam,IDM_CLOSE,MF_GRAYED
invoke EnableMenuItem,wParam,IDM_SAVE,MF_GRAYED
invoke EnableMenuItem,wParam,IDM_SAVEAS,MF_GRAYED
.endif
正如你所见的，如果有一个文件已经打开了，我们将Open菜单项变灰禁止并将其他菜单项都使能。跟TRUE值相反的是 FileOpened 值为FALSE.
在这种情况下的EDIT菜单条我们需要先检查RichEdit控件/剪贴板的状态。
invoke SendMessage,hwndRichEdit,EM_CANPASTE,CF_TEXT,0
.if eax==0 ;
剪贴板里没有正文
invoke EnableMenuItem,wParam,IDM_PASTE,MF_GRAYED
.else
invoke EnableMenuItem,wParam,IDM_PASTE,MF_ENABLED
.endif
我们首先发送 EM_CANPASTE 消息，来检查剪贴板里是否存在可用的正文。如果有的话，SendMessage 返回 TRUE ，我们就将 Paste 菜单项使能。如果没有的话，我们将该菜单项变灰禁止。
invoke SendMessage,hwndRichEdit,EM_CANUNDO,0,0
.if eax==0
invoke EnableMenuItem,wParam,IDM_UNDO,MF_GRAYED
.else
invoke EnableMenuItem,wParam,IDM_UNDO,MF_ENABLED
.endif
跟着，我们通过发送 EM_CANUNDO 消息来检查Undo 缓冲区是否为空，如果不空，SendMessage 返回 TRUE ，我们就使能 Undo 菜单项。
invoke SendMessage,hwndRichEdit,EM_CANREDO,0,0
.if eax==0
invoke EnableMenuItem,wParam,IDM_REDO,MF_GRAYED
.else
invoke EnableMenuItem,wParam,IDM_REDO,MF_ENABLED
.endif
我们通过发送 EM_CANREDO 消息给 RichEdit 控件来检查 Redo 缓冲区。如果不空的话，SendMessage 返回 TRUE，我们就使能 Redo 菜单项。
invoke SendMessage,hwndRichEdit,EM_EXGETSEL,0,addr chrg
mov eax,chrg.cpMin
.if eax==chrg.cpMax ;
没有当前选定正文
invoke EnableMenuItem,wParam,IDM_COPY,MF_GRAYED
invoke EnableMenuItem,wParam,IDM_CUT,MF_GRAYED
invoke EnableMenuItem,wParam,IDM_DELETE,MF_GRAYED
.else
invoke EnableMenuItem,wParam,IDM_COPY,MF_ENABLED
invoke EnableMenuItem,wParam,IDM_CUT,MF_ENABLED
invoke EnableMenuItem,wParam,IDM_DELETE,MF_ENABLED
.endif
最后，我们通过发送 EM_EXGETSEL 消息来检查是否存在当前选定的正文，该消息使用一个 CHARRANGE 结构，定义如下：
CHARRANGE STRUCT
cpMin DWORD ?
cpMax DWORD ?
CHARRANGE ENDS
cpMin 包含紧接在范围中的第一个字符之前的字符的位置索引。
cpMax 包含紧跟在范围中的最后一个字符之后的的字符的位置索引。
EM_EXGETSEL 返回后，CHARRANGE 结构就会被用选择范围的开始和结束位置索引所填充。如果没有当前选定，cpMin 和 cpMax 就会是同样的数值，我们就将 Cut/Copy/Delete 菜单项变灰禁止。
当用户点击 Open 菜单项，我们就显示一个打开文件的对话框，如果用户选择了一个文件，我们就打开该文件并将其内容流入RichEdit 控件中。
invoke CreateFile,addr FileName,GENERIC_READ,FILE_SHARE_READ,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0
.if eax!=INVALID_HANDLE_VALUE
mov hFile,eax
mov editstream.dwCookie,eax
mov editstream.pfnCallback,offset StreamInProc
invoke SendMessage,hwndRichEdit,EM_STREAMIN,SF_TEXT,addr editstream
使用 CreateFile成功打开文件后，我们填充EDITSTREAM 结构，以便准备发送 EM_STREAMIN 消息我们选择通过 dwCookie 成员发送打开文件的句柄，并在 pfnCallback 成员中传递流回调函数的地址。
流回调函数本身是简单基本的。
StreamInProc proc hFile
WORD,pBuffer
WORD, NumBytes
WORD, pBytesRead
WORD
invoke ReadFile,hFile,pBuffer,NumBytes,pBytesRead,0
xor eax,1
ret
StreamInProc endp
你可以看到流回调函数的所有参数跟 ReadFile 函数 完美匹配。而且ReadFile 的返回值是是跟 1 经过 XOR异或运算的，因此如果它返回 1 （成功），在EAX中实际返回的值的是0，反之亦然。
invoke SendMessage,hwndRichEdit,EM_SETMODIFY,FALSE,0
invoke CloseHandle,hFile
mov FileOpened,TRUE
消息EM_STREAMIN 返回后, 意味着流操作已经完成。实际上，我们必需检查 EDITSTREAM 结构的 dwError 成员。
RichEdit (和 Edit) 控件支持一个标志，用来指示其内容时候被改变了。我们可以通过发送 EM_GETMODIFY 消息给控件来得到这个标志的值。如果控件内容被改变了的话，SendMessage 返回 TRUE。因为我们将正文流入控件，也是一种改变。所以我们必需设置修改标志为FALSE，可以通过给控件发送EM_SETMODIFY 消息，令其 wParam==FALSE 使控件的修改标志在流入操作完成后重新开始。然后我们马上就关闭文件并设置变量 FileOpened 为 TRUE 来说明已经打开了一个文件。
当用户点击 Save/SaveAs 菜单项，我们使用 EM_STREAMOUT 消息来将RichEdit控件的内容输出到一个文件中。跟流入回调函数一样，流出回调函数本身也是很简单的。它也是跟 WriteFile完美匹配.
正文操作象Cut/Copy/Paste/Redo/Undo 等通过发送单个消息给控件是很容易实现的，这些消息分别是 WM_CUT/WM_COPY/WM_PASTE/WM_REDO/WM_UNDO 。
删除/选择全部正文的操作如下：
.else
if ax==IDM_DELETE
invoke SendMessage,hwndRichEdit,EM_REPLACESEL,TRUE,0
.else
if ax==IDM_SELECTALL
mov chrg.cpMin,0
mov chrg.cpMax,-1
invoke SendMessage,hwndRichEdit,EM_EXSETSEL,0,addr chrg
删除操作影响到当前的选定。我发送 EM_REPLACESEL 消息，传递一个 NULL 字符串，RichEdit 控件将会用空串来替代当前选定的正文串。
选择全部正文的操作通过发送 EM_EXSETSEL 消息，指定 cpMin==0 和 cpMax==-1 的数值来选择所有的正文。
当用户选择 Option 菜单条，我们显示一个对话框，显示当前的背景/正文颜色。
当用户点击任意一个颜色框，它会显示颜色选择对话框。"颜色框" 实际上是一个具有 SS_NOTIFY 和 WS_BORDER 风格标志的静态控件。具有 SS_NOTIFY 标志的静态控件会将在上面的鼠标动作通知给父窗口，譬如BN_CLICKED (STN_CLICKED). 这个就是窍门了！
.else
if ax==IDC_BACKCOLORBOX
invoke RtlZeroMemory,addr clr,sizeof clr
mov clr.lStructSize,sizeof clr
push hWnd
pop clr.hwndOwner
push hInstance
pop clr.hInstance
push BackgroundColor
pop clr.rgbResult
mov clr.lpCustColors,offset CustomColors
mov clr.Flags,CC_ANYCOLOR or CC_RGBINIT
invoke ChooseColor,addr clr
.if eax!=0
push clr.rgbResult
pop BackgroundColor
invoke GetDlgItem,hWnd,IDC_BACKCOLORBOX
invoke InvalidateRect,eax,0,TRUE
.endif
当用户点击任意一个颜色框时，我们会填充 CHOOSECOLOR 结构的成员并调用ChooseColor 来显示颜色选择对话框。如果用户选择了一种颜色，颜色值会在 rgbResult 成员中返回，我们把改值保存在变量 BackgroundColor 中。之后，我们通过用颜色框句柄调用InvalidateRect 函数来强迫颜色框进行重画。 颜色框会发送 WM_CTLCOLORSTATIC 消息给父窗口.
invoke GetDlgItem,hWnd,IDC_BACKCOLORBOX
.if eax==lParam
invoke CreateSolidBrush,BackgroundColor
ret
在 WM_CTLCOLORSTATIC 消息处理中，我们把在 lParam 传递进来的静态控件的句柄跟那两个颜色框的句柄作比较。如果值匹配的话，我们就使用变量中颜色值来创建一个新画刷并立刻返回。静态控件将会使用新创建的画刷来重画其背景。
