[收藏]调试信息写入EDIT方法

天云上人

  有时候需要一个EDIT窗口来显示调试信息，记录程序运行的一些过程或结果.
6 |3 W% c  r5 C; X* l. s' j不才是这么做的（有好招的朋友请赐教）：
3 R* y. S$ o$ g: v( Z. Y
/ H5 X$ Q! Q9 o2 a: I3 T#define OUTPUT(str) ::SendMessage( g_hWndInfo, EM_REPLACESEL, 0, (LPARAM)(LPCTSTR)(str) )

#define COL
"==============================================================================="
5 L4 ^3 C  u( b& }; s4 ?& j
调用方：
* S7 n" d2 `7 |6 C+ Z$ hOUTPUT( sMsg.c_str());
OUTPUT( "\r\n" );    //如果需要回车和分隔效果
OUTPUT( COL );
OUTPUT( "\r\n" );

: ]5 u3 Z% }* f7 `6 A: X. v
//EM_REPLACESEL  LB_INSERTSTRING 更改这些可以使用其他控件。