要求:
1. 改正typer程序中的不足
2. 增加读、写文件功能
3. 使用鼠标指定插入点
4. 在窗口标题中显示该程序运行的总时间(每秒更新一次)
5. 增加垂直滚动条,处理相应的操作。
实现:
1.水平滚动条与垂直滚动条都有,可使用鼠标滚轮,文件宽高都可多页(编辑过程中Caret移出窗口时,窗口会自动滚动);
2.可以新建,打开,编辑,保存,另存为文件(未考虑实际的文件编码,而是使用自定义的文件格式);
3.使用鼠标指定插入点;
4.文件修改未保存时新建或关闭会有询问;
5.窗口标题栏显示正在编辑的文件名,及程序运行总时间;
6.支持中英文混合编辑;
![](/images/cppblog_com/corebugzj/win4jt1.jpg)
源码:
resource.h
1
//{{NO_DEPENDENCIES}}
2
// Microsoft Visual C++ generated include file.
3
// Used by TyperZJ.rc
4
//
5
#define IDR_MENU 101
6
#define IDR_ACCE 102
7![](/Images/OutliningIndicators/None.gif)
8
// Next default values for new objects
9
//
10
#ifdef APSTUDIO_INVOKED
11
#ifndef APSTUDIO_READONLY_SYMBOLS
12
#define _APS_NEXT_RESOURCE_VALUE 103
13
#define _APS_NEXT_COMMAND_VALUE 40003
14
#define _APS_NEXT_CONTROL_VALUE 1001
15
#define _APS_NEXT_SYMED_VALUE 101
16
#endif
17
#endif
18![](/Images/OutliningIndicators/None.gif)
TyperZJ.rc
1
// Microsoft Visual C++ generated resource script.
2
//
3
#include "resource.h"
4![](/Images/OutliningIndicators/None.gif)
5
#define APSTUDIO_READONLY_SYMBOLS
6![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**////////////////////////////////////////////////////////////////////////////// 7
//
8
// Generated from the TEXTINCLUDE 2 resource.
9
//
10
#include "afxres.h"
11![](/Images/OutliningIndicators/None.gif)
12![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**//////////////////////////////////////////////////////////////////////////////13
#undef APSTUDIO_READONLY_SYMBOLS
14![](/Images/OutliningIndicators/None.gif)
15![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**//////////////////////////////////////////////////////////////////////////////16
// Chinese (Simplified, PRC) resources
17![](/Images/OutliningIndicators/None.gif)
18
#if !defined(AFX_RESOURCE_DLL) || defined(AFX_TARG_CHS)
19
LANGUAGE LANG_CHINESE, SUBLANG_CHINESE_SIMPLIFIED
20![](/Images/OutliningIndicators/None.gif)
21
#ifdef APSTUDIO_INVOKED
22![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**//////////////////////////////////////////////////////////////////////////////23
//
24
// TEXTINCLUDE
25
//
26![](/Images/OutliningIndicators/None.gif)
27
1 TEXTINCLUDE
28
BEGIN
29
"resource.h\0"
30
END
31![](/Images/OutliningIndicators/None.gif)
32
2 TEXTINCLUDE
33
BEGIN
34
"#include ""afxres.h""\r\n"
35
"\0"
36
END
37![](/Images/OutliningIndicators/None.gif)
38
3 TEXTINCLUDE
39
BEGIN
40
"\r\n"
41
"\0"
42
END
43![](/Images/OutliningIndicators/None.gif)
44
#endif // APSTUDIO_INVOKED
45![](/Images/OutliningIndicators/None.gif)
46![](/Images/OutliningIndicators/None.gif)
47![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**//////////////////////////////////////////////////////////////////////////////48
//
49
// Menu
50
//
51![](/Images/OutliningIndicators/None.gif)
52
IDR_MENU MENU
53
BEGIN
54
POPUP "文件(&F)"
55
BEGIN
56
MENUITEM "新建(&N)\tCtrl+N", ID_FILE_NEW
57
MENUITEM "打开(&O)\tCtrl+O", ID_FILE_OPEN
58
MENUITEM "保存(&S)\tCtrl+S", ID_FILE_SAVE
59
MENUITEM "另存为(&A)", ID_FILE_SAVE_AS
60
MENUITEM SEPARATOR
61
MENUITEM "退出(&X)\tCtrl+X", ID_FILE_CLOSE
62
END
63
END
64![](/Images/OutliningIndicators/None.gif)
65![](/Images/OutliningIndicators/None.gif)
66![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**//////////////////////////////////////////////////////////////////////////////67
//
68
// Accelerator
69
//
70![](/Images/OutliningIndicators/None.gif)
71
IDR_ACCE ACCELERATORS
72
BEGIN
73
"N", ID_FILE_NEW, VIRTKEY, CONTROL, NOINVERT
74
"O", ID_FILE_OPEN, VIRTKEY, CONTROL, NOINVERT
75
"S", ID_FILE_SAVE, VIRTKEY, CONTROL, NOINVERT
76
"X", ID_FILE_CLOSE, VIRTKEY, CONTROL, NOINVERT
77
END
78![](/Images/OutliningIndicators/None.gif)
79
#endif // Chinese (Simplified, PRC) resources
80![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**//////////////////////////////////////////////////////////////////////////////81![](/Images/OutliningIndicators/None.gif)
82![](/Images/OutliningIndicators/None.gif)
83![](/Images/OutliningIndicators/None.gif)
84
#ifndef APSTUDIO_INVOKED
85![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**//////////////////////////////////////////////////////////////////////////////86
//
87
// Generated from the TEXTINCLUDE 3 resource.
88
//
89![](/Images/OutliningIndicators/None.gif)
90![](/Images/OutliningIndicators/None.gif)
91![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**//////////////////////////////////////////////////////////////////////////////92
#endif // not APSTUDIO_INVOKED
93![](/Images/OutliningIndicators/None.gif)
94![](/Images/OutliningIndicators/None.gif)
TyperZJ.cpp
1
#ifndef UNICODE
2
#define UNICODE
3
#endif
4
#ifndef _UNICODE
5
#define _UNICODE
6
#endif
7![](/Images/OutliningIndicators/None.gif)
8![](/Images/OutliningIndicators/None.gif)
9
#include "resource.h"
10
#include "afxres.h"
11
#include <windows.h>
12![](/Images/OutliningIndicators/None.gif)
13
#include <list>
14
using std::list;
15![](/Images/OutliningIndicators/None.gif)
16![](/Images/OutliningIndicators/None.gif)
17
// 半角,全角字符宽高硬编码
18
#define CX_HALF 8
19
#define CY_HALF 16
20
#define CX_FULL (CX_HALF+CX_HALF)
21
#define CY_FULL CY_HALF
22![](/Images/OutliningIndicators/None.gif)
23![](/Images/OutliningIndicators/None.gif)
24![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**///////// 文本 25
// 内存中不保存回车换行,内存中的文本至少一行,会有空行
26![](/Images/OutliningIndicators/None.gif)
27
typedef list< TCHAR > TLINE;
28
typedef list< TLINE > TTEXT;
29
typedef TTEXT::iterator TPOSLINE;
30
typedef TLINE::iterator TPOSCHAR;
31![](/Images/OutliningIndicators/None.gif)
32
// 当前行中当前字符宽度
33![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
inline INT GetDeltaX( const TLINE &line, const TPOSCHAR &pc )
{
34
return ( ((pc==line.end())||(((UINT)(*pc))<0x80)) ? CX_HALF : CX_FULL );
35
}
36
// 当前行中当前字符左侧 X 坐标
37![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
INT GetX( TLINE &line, const TPOSCHAR &pc )
{
38
TPOSCHAR p;
39
INT x = 0;
40![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( p = line.begin(); (p!=line.end())&&(p!=pc); ++p )
{
41
x += ::GetDeltaX( line, p );
42
}
43
return x;
44
}
45
// 当前行中当前 X 坐标右侧字符
46![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
TPOSCHAR GetPoschar( TLINE &line, INT x )
{
47
TPOSCHAR p;
48![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( p = line.begin(); (p!=line.end())&&(x>0); ++p )
{
49
x -= ::GetDeltaX( line, p );
50
}
51
return p;
52
}
53
// 当前行中当前字符高度
54![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
inline INT GetDeltaY( const TLINE &line, const TPOSCHAR &pc )
{
55
return ( ((pc==line.end())||(((UINT)(*pc))<0x80)) ? CY_HALF : CY_FULL );
56
}
57
// 当前文本中当前行高度
58![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
inline INT GetDeltaY( const TTEXT &text, const TPOSLINE &pl )
{
59
return ( (pl==text.end()) ? (CY_HALF) : (::GetDeltaY(*pl,pl->begin())) );
60
}
61
// 当前文本中当前文本行上方 Y 坐标
62![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
INT GetY( TTEXT &text, const TPOSLINE &pl )
{
63
TPOSLINE p;
64
INT y = 0;
65![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( p = text.begin(); (p!=text.end())&&(p!=pl); ++p )
{
66
y += ::GetDeltaY( text, p );
67
}
68
return y;
69
}
70
// 当前文本中当前 Y 坐标下方文本行
71![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
TPOSLINE GetPosline( TTEXT &text, INT y )
{
72
TPOSLINE p;
73![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( p = text.begin(); (p!=text.end())&&(y>0); ++p )
{
74
y -= ::GetDeltaY( text, p );
75
}
76![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( p == text.end() )
{
77
--p;
78
}
79
return p;
80
}
81![](/Images/OutliningIndicators/None.gif)
82
// 当前文本中最长的行的长度,单位 字符数
83![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
INT GetLineMaxLength( TTEXT &text )
{
84
INT iMax = 0, tmp;
85
TPOSLINE p;
86![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( p = text.begin(); p != text.end(); ++p )
{
87
tmp = p->size();
88![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( tmp > iMax )
{
89
iMax = tmp;
90
}
91
}
92
return iMax;
93
}
94
// 文本宽度,单位 字符
95![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
inline INT GetTextWidth( TTEXT &text )
{
96
return ::GetLineMaxLength( text );
97
}
98
// 文本高度,单位 字符
99![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
inline INT GetTextHeight( TTEXT &text )
{
100
return text.size();
101
}
102
// 文本区宽度,单位 像素
103![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
INT GetTextAreaWidth( TTEXT &text )
{
104
INT res = 0, tmp;
105
TPOSLINE pl;
106![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( pl = text.begin(); pl != text.end(); ++pl )
{
107
tmp = ::GetX( *pl, pl->end() );
108![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( tmp > res )
{
109
res = tmp;
110
}
111
}
112
return res;
113
}
114
// 文本区高度,单位 像素
115![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
inline INT GetTextAreaHeight( TTEXT &text )
{
116
return ::GetTextHeight(text) * CY_FULL; // 偷懒,因高度硬编码
117
}
118![](/Images/OutliningIndicators/None.gif)
119![](/Images/OutliningIndicators/None.gif)
120![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**///////// 文件121
// 只能读入自己保存的文件,因为未考虑实际的文件编码
122
// 内存中的文本与磁盘上的文件内容有些差别,但保证读写过程不会对文件造成修改,如:
123
// 读入空文件会得到非空的有一个空行的文本,写文件时会将其过滤
124
// szFileDir "F:\\ZJ\\"
125
// szFileName "a.txt"
126![](/Images/OutliningIndicators/None.gif)
127
// 文件对话框,bOpen TRUE OPEN, FALSE SAVE;目录与文件名既输入也输出;放弃返回FALSE
128
// iMaxLen 为 szFileDir, szFileName 字符数组的大小,包括结尾的 NULL
129![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
BOOL GetFileName( HWND hWnd, LPTSTR szFileDir, LPTSTR szFileName, INT iMaxLen, BOOL bOpen )
{
130![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
::OPENFILENAME ofn =
{0};
131
ofn.lStructSize = sizeof(ofn);
132
ofn.hwndOwner = hWnd;
133
ofn.hInstance = NULL;
134
TCHAR szFilter[100] = TEXT("文本文件\0*.txt\0所有文件\0*.*\0\0");
135
ofn.lpstrFilter = szFilter;
136
ofn.nFilterIndex = 1;
137
const int L = 1024;
138
TCHAR szFile[ L ];
139
::lstrcpy( szFile, szFileName );
140
ofn.lpstrFile = szFile;
141
ofn.nMaxFile = L;
142
ofn.lpstrFileTitle = NULL;
143
ofn.lpstrInitialDir = szFileDir;
144
ofn.lpstrTitle = ( bOpen ? TEXT("打开文件") : TEXT("保存文件") );
145
ofn.Flags = OFN_EXPLORER;
146
BOOL res = ( bOpen ? ::GetOpenFileName( &ofn ) : ::GetSaveFileName( &ofn ) );
147![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( res )
{
148
::lstrcpy( szFileName, szFile + ofn.nFileOffset );
149
szFile[ ofn.nFileOffset ] = 0;
150
::lstrcpy( szFileDir, szFile );
151
// test begin
152
// ::MessageBox( hWnd, szFileDir, szFileName, MB_OK );
153
// test end
154
return TRUE;
155
}
156
return FALSE;
157
}
158
// 文件若存在,就覆盖;不存在,就新建
159![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
BOOL SaveFile( TTEXT &text, LPCTSTR szFileDir, LPCTSTR szFileName )
{
160
TCHAR szFile[ 1024 ];
161
::lstrcpy( szFile, szFileDir );
162
::lstrcat( szFile, szFileName );
163
HANDLE hFile = ::CreateFile( szFile, GENERIC_WRITE, 0, NULL,
164
CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL );
165![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( hFile == INVALID_HANDLE_VALUE )
{
166
return FALSE;
167
}
168
169
INT iMaxLen = ::GetLineMaxLength( text );
170
HGLOBAL hMem = ::GlobalAlloc( GMEM_FIXED, sizeof(TCHAR)*(iMaxLen+20) ); // +20 防空行
171
LPVOID pMem = ::GlobalLock( hMem );
172![](/Images/OutliningIndicators/InBlock.gif)
173
TPOSLINE pl;
174![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( pl = text.begin(); pl != text.end(); /**//*++pl*/ )
{
175
TCHAR *buf = (TCHAR*)pMem;
176
TPOSCHAR pc;
177
DWORD n = 0, nw = 0;
178![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( pc = pl->begin(); pc != pl->end(); ++pc )
{
179
buf[ n++ ] = *pc;
180
}
181![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( (++pl) != text.end() )
{
182
buf[ n++ ] = TEXT('\n'); // 最后一行尾不要加换行符
183
}
184
n *= sizeof(TCHAR);
185
BYTE *pByte = (BYTE*)pMem;
186![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
while ( n > 0 )
{
187
::WriteFile( hFile, pByte, n, &nw, NULL );
188
pByte += nw;
189
n -= nw;
190
}
191
}
192![](/Images/OutliningIndicators/InBlock.gif)
193
::GlobalUnlock( hMem );
194
::GlobalFree( hMem );
195
::CloseHandle( hFile );
196
return TRUE;
197
}
198
// 文件若不存在,就返回FALSE表示失败
199![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
BOOL LoadFile( TTEXT &text, LPCTSTR szFileDir, LPCTSTR szFileName )
{
200
TCHAR szFile[ 1024 ];
201
::lstrcpy( szFile, szFileDir );
202
::lstrcat( szFile, szFileName );
203
HANDLE hFile = ::CreateFile( szFile, GENERIC_READ, 0, NULL,
204
OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL );
205![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( hFile == INVALID_HANDLE_VALUE )
{
206
return FALSE;
207
}
208![](/Images/OutliningIndicators/InBlock.gif)
209
INT iMaxLen = 1024 * 4;
210
HGLOBAL hMem = ::GlobalAlloc( GMEM_FIXED, iMaxLen+20 );
211
LPVOID pMem = ::GlobalLock( hMem );
212![](/Images/OutliningIndicators/InBlock.gif)
213
DWORD nr = 0, nm = 0;
214
text.clear();
215
text.push_back( TLINE() );
216
TPOSLINE pl = text.begin();
217
BYTE *pByte = (BYTE*)pMem;
218
// 考虑一次成功读入的字节数不是 sizeof(TCHAR) 的整数倍
219![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
while ( ::ReadFile( hFile, pByte+nm, iMaxLen-nm, &nr, NULL ) && (nr>0) )
{
220
DWORD i;
221
TCHAR *buf = (TCHAR*)pMem;
222
nr += nm;
223
nm = nr % (sizeof(TCHAR));
224
nr /= sizeof(TCHAR);
225![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( i = 0; i < nr; ++i )
{
226![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( buf[ i ] == TEXT('\n') )
{
227
text.push_back( TLINE() );
228
pl = text.end();
229
--pl;
230
}
231![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else
{
232
pl->push_back( buf[ i ] );
233
}
234
}
235
nr *= sizeof(TCHAR);
236![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( i = 0; i < nm; ++i )
{
237
pByte[ i ] = pByte[ nr + i ];
238
}
239
}
240![](/Images/OutliningIndicators/InBlock.gif)
241
::GlobalUnlock( hMem );
242
::GlobalFree( hMem );
243
::CloseHandle( hFile );
244
return TRUE;
245
}
246![](/Images/OutliningIndicators/None.gif)
247![](/Images/OutliningIndicators/None.gif)
248![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**///////// 滚动条249
// 滚动范围 0..文本宽度-窗口客户区宽度 0..文本高度-窗口客户区高度 单位 CX_HALE, CY_HALF
250
// 位置 窗口客户区左上角半字符在整个文本中的位置
251
// nPage, nMin, nMax
252![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
void CalcScrollInfo( HWND hWnd, TTEXT &text, INT nBar, ::SCROLLINFO &si )
{
253
RECT rt;
254
::GetClientRect( hWnd, &rt );
255![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( nBar == SB_HORZ )
{
256
si.nPage = ( rt.right - rt.left ) / CX_FULL * CX_FULL;
257
si.nMax = ::GetTextAreaWidth( text );
258
}
259![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( nBar == SB_VERT )
{
260
si.nPage = ( rt.bottom - rt.top ) / CY_FULL * CY_FULL;
261
si.nMax = ::GetTextAreaHeight( text );
262
}
263
si.nMin = 0;
264
}
265
// 获取两个滚动条的所有信息
266![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
void GetBothScrollInfo( HWND hWnd, ::SCROLLINFO &sih, ::SCROLLINFO &siv )
{
267
sih.cbSize = sizeof(sih);
268
sih.fMask = SIF_ALL;
269
::GetScrollInfo( hWnd, SB_HORZ, &sih );
270
siv.cbSize = sizeof(siv);
271
siv.fMask = SIF_ALL;
272
::GetScrollInfo( hWnd, SB_VERT, &siv );
273
}
274
// nMin, nMax, nPage, if ( bInit ) nPos=0
275![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
void UpdateScrollBar( HWND hWnd, TTEXT &text, BOOL bInit = FALSE )
{
276![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
INT i, sb[] =
{ SB_HORZ, SB_VERT };
277
::SCROLLINFO si, sio;
278![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( i = 0; i < sizeof(sb)/sizeof(sb[0]); ++i )
{
279
sio.cbSize = sizeof(sio);
280
sio.fMask = SIF_ALL;
281
::GetScrollInfo( hWnd, sb[i], &sio );
282![](/Images/OutliningIndicators/InBlock.gif)
283
::CalcScrollInfo( hWnd, text, sb[i], si );
284
si.cbSize = sizeof(si);
285
si.fMask = SIF_DISABLENOSCROLL | SIF_ALL;
286![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( bInit )
{
287
si.nPos = 0;
288
}
289![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else
{
290
si.nPos = sio.nPos;
291
}
292![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( si.nPos < si.nMin )
{
293
si.nPos = si.nMin;
294
}
295![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( si.nPos > si.nMax )
{
296
si.nPos = si.nMax;
297
}
298
si.nTrackPos = sio.nTrackPos;
299
::SetScrollInfo( hWnd, sb[i], &si, TRUE );
300
}
301
}
302
// 窗口客户区左上角在文本区中的位置
303![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
inline void GetLeftTopDelta( HWND hWnd, INT &leftX, INT &topY )
{
304
::SCROLLINFO sih, siv;
305
::GetBothScrollInfo( hWnd, sih, siv );
306
leftX = sih.nPos;
307
topY = siv.nPos;
308
}
309![](/Images/OutliningIndicators/None.gif)
310![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**///////// Caret311![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
void UpdateCaretPos( HWND hWnd, TTEXT &text, TPOSLINE &pl, TPOSCHAR &pc )
{
312
INT leftX, topY;
313
::GetLeftTopDelta( hWnd, leftX, topY );
314
::SetCaretPos( ::GetX( *pl, pc ) - leftX, ::GetY( text, pl ) - topY );
315
}
316![](/Images/OutliningIndicators/None.gif)
317![](/Images/OutliningIndicators/None.gif)
318![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
/**///////// 窗口319
TCHAR szClassName[] = TEXT("TyperZJ");
320
TCHAR szWndNameMid[] = TEXT(" - TyperZJ - ");
321![](/Images/OutliningIndicators/None.gif)
322
// 利用常量相等 SB_LINEUP==SB_LINELEFT,
323
// SB_LINEDOWN==SB_LINERIGHT, SB_PAGEUP==SB_PAGELEFT, SB_PAGEDOWN==SB_PAGERIGHT
324
// SB_TOP==SB_LEFT, SB_BOTTOM==SB_RIGHT
325![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
void OnScroll( HWND hWnd, INT nBar, WPARAM wParam, TTEXT &text, TPOSLINE &pl, TPOSCHAR &pc )
{
326
::SCROLLINFO si;
327
si.cbSize = sizeof(si);
328
si.fMask = SIF_ALL;
329
::GetScrollInfo( hWnd, nBar, &si );
330![](/Images/OutliningIndicators/InBlock.gif)
331![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
switch ( LOWORD(wParam) )
{
332
case SB_LINELEFT :
333
si.nPos -= CX_FULL;
334
break;
335
case SB_LINERIGHT :
336
si.nPos += CY_FULL;
337
break;
338
case SB_PAGELEFT :
339
si.nPos -= si.nPage;
340
break;
341
case SB_PAGERIGHT :
342
si.nPos += si.nPage;
343
break;
344
case SB_THUMBTRACK :
345
si.nPos = si.nTrackPos;
346
break;
347
}
348![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( si.nPos < si.nMin )
{
349
si.nPos = si.nMin;
350
}
351![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( si.nPos > si.nMax )
{
352
si.nPos = si.nMax;
353
}
354![](/Images/OutliningIndicators/InBlock.gif)
355
si.fMask = SIF_POS;
356
::SetScrollInfo( hWnd, nBar, &si, TRUE );
357
::UpdateCaretPos( hWnd, text, pl, pc );
358
::InvalidateRect( hWnd, NULL, TRUE );
359
}
360
// 文本修改并更新滚动条nMin,nMax,nPage后,修改滚动条nPos,Caret
361![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
void OnTextChange( HWND hWnd, TTEXT &text, TPOSLINE &pl, TPOSCHAR &pc )
{
362
::SCROLLINFO sih, siv;
363
::GetBothScrollInfo( hWnd, sih, siv );
364![](/Images/OutliningIndicators/InBlock.gif)
365
INT x = ::GetX( *pl, pc );
366
INT xP = sih.nPos;
367![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( x < sih.nPos )
{
368
sih.nPos = x;
369
}
370![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else if ( x >= sih.nPos + (INT)sih.nPage )
{
371
sih.nPos = x - sih.nPage;
372
}
373![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( sih.nPos < sih.nMin )
{
374
sih.nPos = sih.nMin;
375
}
376![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( sih.nPos > sih.nMax )
{
377
sih.nPos = sih.nMax;
378
}
379![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( xP != sih.nPos )
{
380
sih.cbSize = sizeof(sih);
381
sih.fMask = SIF_POS;
382
::SetScrollInfo( hWnd, SB_HORZ, &sih, TRUE );
383
}
384![](/Images/OutliningIndicators/InBlock.gif)
385
INT y = ::GetY( text, pl );
386
INT yP = siv.nPos;
387![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( y < siv.nPos )
{
388
siv.nPos = y;
389
}
390![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else if ( y >= siv.nPos + (INT)siv.nPage )
{
391
siv.nPos = y - siv.nPage;
392
}
393![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( siv.nPos < siv.nMin )
{
394
siv.nPos = siv.nMin;
395
}
396![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( siv.nPos > siv.nMax )
{
397
siv.nPos = siv.nMax;
398
}
399![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( yP != siv.nPos )
{
400
siv.cbSize = sizeof(siv);
401
siv.fMask = SIF_POS;
402
::SetScrollInfo( hWnd, SB_VERT, &siv, TRUE );
403
}
404![](/Images/OutliningIndicators/InBlock.gif)
405
::UpdateCaretPos( hWnd, text, pl, pc );
406![](/Images/OutliningIndicators/InBlock.gif)
407
::InvalidateRect( hWnd, NULL, TRUE );
408
}
409
// 更新窗口标题 文件名 + 程序名 + 程序运行时间
410![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
void UpdateWindowText( HWND hWnd, LONG time, LPCTSTR szFileName )
{
411
static TCHAR text[ 1024 ];
412
TCHAR szTime[ 1024 ];
413
::swprintf( szTime, TEXT(" <已运行 %ld 秒> "), time );
414
::lstrcpy( text, szFileName );
415
::lstrcat( text, szWndNameMid );
416
::lstrcat( text, szTime );
417
::SetWindowText( hWnd, text );
418
}
419![](/Images/OutliningIndicators/None.gif)
420
// 窗口过程函数
421![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
LRESULT CALLBACK WndProc( HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam )
{
422
// 文本
423
static TTEXT text;
424
static TPOSLINE pl;
425
static TPOSCHAR pc;
426![](/Images/OutliningIndicators/InBlock.gif)
427
// 文件
428
static BOOL bModified = FALSE;
429
static BOOL bNamed = FALSE;
430
#define FILE_LEN 1024
431![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
static TCHAR szFileDir[ FILE_LEN ] =
{0};
432![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
static TCHAR szFileName[ FILE_LEN ] =
{0};
433![](/Images/OutliningIndicators/InBlock.gif)
434
// 时间
435
// 误差在200毫秒以内,系统运行 49.7 天以内正确计时
436
static LONG totTime = 0; // 程序运行总时间,单位 秒
437
static DWORD preTick; // 单位 毫秒
438![](/Images/OutliningIndicators/InBlock.gif)
439![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
switch ( uMsg )
{
440
case WM_CREATE :
441
::SendMessage( hWnd, WM_COMMAND, ID_FILE_NEW, 0 );
442
::SetTimer( hWnd, 0, 200, NULL );
443
preTick = ::GetTickCount();
444
::UpdateWindowText( hWnd, totTime, szFileName );
445
return 0;
446![](/Images/OutliningIndicators/InBlock.gif)
447
case WM_TIMER :
448![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
{
449
DWORD cnt = ::GetTickCount();
450![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( cnt - preTick >= 1000 )
{
451
totTime += ( cnt - preTick ) / 1000;
452
::UpdateWindowText( hWnd, totTime, szFileName );
453
preTick = cnt;
454
}
455
}
456
return 0;
457![](/Images/OutliningIndicators/InBlock.gif)
458
case WM_PAINT :
459![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
{
460
::PAINTSTRUCT ps;
461
::HDC hdc;
462![](/Images/OutliningIndicators/InBlock.gif)
463
hdc = ::BeginPaint( hWnd, &ps );
464![](/Images/OutliningIndicators/InBlock.gif)
465
TPOSLINE il;
466
INT leftX, topY, y;
467
::GetLeftTopDelta( hWnd, leftX, topY );
468
y = -topY;
469
HFONT hf = ::CreateFont( 0, 0, 0, 0, 0, 0, 0, 0,
470
DEFAULT_CHARSET, 0, 0, 0, FIXED_PITCH, NULL );
471
HFONT hfOld = (HFONT)::SelectObject( hdc, hf );
472![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( il = text.begin(); il != text.end(); ++il )
{
473
TPOSCHAR ic;
474
TCHAR sz[ 3 ];
475
INT x = -leftX;
476![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( ic = il->begin(); ic != il->end(); ++ic )
{
477
sz[ 0 ] = (*ic);
478
::TextOut( hdc, x, y, sz, 1 );
479
x += ::GetDeltaX( *il, ic );
480
}
481
y += ::GetDeltaY( text, il );
482
}
483
::SelectObject( hdc, hfOld );
484
::DeleteObject( hf );
485![](/Images/OutliningIndicators/InBlock.gif)
486
::EndPaint( hWnd, &ps );
487
}
488
return 0;
489![](/Images/OutliningIndicators/InBlock.gif)
490
// 鼠标选取,点击插入点
491
case WM_LBUTTONDOWN :
492![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
{
493
INT leftX, topY;
494
::GetLeftTopDelta( hWnd, leftX, topY );
495
INT x = leftX + LOWORD(lParam) - ( CX_HALF / 2 ); // 微调,找最近
496
INT y = topY + HIWORD(lParam) - ( CY_HALF / 3 * 2 ); //
.
497
pl = ::GetPosline( text, y );
498
pc = ::GetPoschar( *pl, x );
499
::UpdateCaretPos( hWnd, text, pl, pc );
500
::InvalidateRect( hWnd, NULL, TRUE );
501
}
502
return 0;
503![](/Images/OutliningIndicators/InBlock.gif)
504
// 输入
505
case WM_KEYDOWN :
506![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
switch ( wParam )
{
507
case VK_HOME :
508
pc = pl->begin();
509
break;
510
case VK_END :
511
pc = pl->end();
512
break;
513
case VK_LEFT :
514![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( pc != pl->begin() )
{
515
--pc;
516
}
517![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else if ( pl != text.begin() )
{
518
--pl;
519
pc = pl->end();
520
}
521
break;
522
case VK_RIGHT :
523![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( pc != pl->end() )
{
524
++pc;
525
}
526![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else if ( ++pl != text.end() )
{
527
pc = pl->begin();
528
}
529![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else
{
530
--pl;
531
}
532
break;
533
case VK_UP :
534![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( pl != text.begin() )
{
535
INT x = ::GetX( *pl, pc );
536
--pl;
537
pc = ::GetPoschar( *pl, x );
538
}
539
break;
540
case VK_DOWN :
541![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ++pl != text.end() )
{
542
--pl;
543
INT x = ::GetX( *pl, pc );
544
++pl;
545
pc = ::GetPoschar( *pl, x );
546
}
547![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else
{
548
--pl;
549
}
550
break;
551
case VK_DELETE :
552![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
{
553
TPOSLINE pln = pl;
554
++pln;
555![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( pc != pl->end() )
{
556
pc = pl->erase( pc );
557
}
558![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else if ( pln != text.end() )
{
559
INT x = ::GetX( *pl, pc );
560
INT y = ::GetY( text, pl );
561
TPOSCHAR pcn;
562![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( pcn = pln->begin(); pcn != pln->end(); ++pcn )
{
563
pl->push_back( *pcn );
564
}
565
text.erase( pln );
566
pl = ::GetPosline( text, y );
567
pc = ::GetPoschar( *pl, x );
568
}
569
bModified = TRUE;
570
::UpdateScrollBar( hWnd, text );
571
}
572
break;
573
case VK_RETURN :
574![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
{
575
TLINE line( pc, pl->end() );
576
pl->erase( pc, pl->end() );
577
++pl;
578![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( pl == text.end() )
{
579
text.push_back( line );
580
pl = text.end();
581
--pl;
582
pc = pl->begin();
583
}
584![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else
{
585
pl = text.insert( pl, line );
586
pc = pl->begin();
587
}
588
bModified = TRUE;
589
::UpdateScrollBar( hWnd, text );
590
}
591
break;
592
}
593
::OnTextChange( hWnd, text, pl, pc );
594
return 0;
595![](/Images/OutliningIndicators/InBlock.gif)
596
case WM_CHAR :
597![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
switch ( wParam )
{
598
case TEXT('\b') :
599![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( pc != pl->begin() )
{
600
::SendMessage( hWnd, WM_KEYDOWN, VK_LEFT, 1 );
601
::SendMessage( hWnd, WM_KEYDOWN, VK_DELETE, 1 );
602
}
603
break;
604
case TEXT('\t') :
605![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
{
606
TPOSCHAR p;
607
INT ip = 0;
608![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
for ( p = pl->begin(); (p!=pl->end())&&(p!=pc); ++p )
{
609
++ip;
610
}
611
--ip;
612![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
do
{
613
++ip;
614
::SendMessage( hWnd, WM_CHAR, TEXT(' '), 1 );
615
} while ( ip % 8 != 7 );
616
bModified = TRUE;
617
::UpdateScrollBar( hWnd, text );
618
}
619
break;
620
case TEXT('\r') :
621
break;
622
case TEXT('\n') :
623
break;
624
case TEXT('\x1B') :
625
break;
626
default :
627![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
{
628
TCHAR ch = wParam;
629![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( pc == pl->end() )
{
630
pl->push_back( ch );
631
pc = pl->end();
632
}
633![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else
{
634
pc = pl->insert( pc, ch );
635
++pc;
636
}
637
bModified = TRUE;
638
::UpdateScrollBar( hWnd, text );
639
}
640
break;
641
}
642
::OnTextChange( hWnd, text, pl, pc );
643
return 0;
644![](/Images/OutliningIndicators/InBlock.gif)
645
// 滚动
646
case WM_HSCROLL :
647
::OnScroll( hWnd, SB_HORZ, wParam, text, pl, pc );
648
return 0;
649
case WM_VSCROLL :
650
::OnScroll( hWnd, SB_VERT, wParam, text, pl, pc );
651
return 0;
652
case WM_MOUSEWHEEL :
653![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
{
654
SHORT delta = HIWORD(wParam);
655![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( delta > 0 )
{
656
::SendMessage( hWnd, WM_VSCROLL, SB_LINEUP, 0 );
657
}
658![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else if ( delta < 0 )
{
659
::SendMessage( hWnd, WM_VSCROLL, SB_LINEDOWN, 0 );
660
}
661
}
662
return 0;
663![](/Images/OutliningIndicators/InBlock.gif)
664
case WM_SIZE :
665
::UpdateScrollBar( hWnd, text );
666
::UpdateCaretPos( hWnd, text, pl, pc );
667
::InvalidateRect( hWnd, NULL, TRUE );
668
return 0;
669![](/Images/OutliningIndicators/InBlock.gif)
670
// 输入焦点
671
case WM_SETFOCUS :
672
::CreateCaret( hWnd, NULL, 2, ::GetDeltaY( *pl, pc ) );
673
::UpdateCaretPos( hWnd, text, pl, pc );
674
::ShowCaret( hWnd );
675
return 0;
676
case WM_KILLFOCUS :
677
::HideCaret( hWnd );
678
::DestroyCaret();
679
return 0;
680![](/Images/OutliningIndicators/InBlock.gif)
681
// 菜单命令
682
case WM_COMMAND :
683![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
switch ( LOWORD(wParam) )
{
684
// 文件
685
case ID_FILE_NEW :
686![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( bModified )
{
687
// 已修改
688
INT res = ::MessageBox( hWnd, TEXT("文件已修改,是否保存?"), TEXT("文件已修改"), MB_YESNOCANCEL | MB_ICONQUESTION );
689![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( IDYES == res )
{
690![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ! ::SendMessage( hWnd, WM_COMMAND, ID_FILE_SAVE, 0 ) )
{
691
// 保存文件时放弃
692
return 0;
693
}
694
}
695![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else if ( IDCANCEL == res )
{
696
// 放弃
697
return 0;
698
}
699
}
700
text.clear();
701
text.push_back( TLINE() );
702
pl = text.begin();
703
pc = pl->begin();
704
::lstrcpy( szFileName, TEXT("未命名.txt") );
705
bNamed = FALSE;
706
bModified = FALSE;
707
::UpdateScrollBar( hWnd, text, TRUE );
708
::UpdateCaretPos( hWnd, text, pl, pc );
709
::InvalidateRect( hWnd, NULL, TRUE );
710
// 成功
711
return 1;
712![](/Images/OutliningIndicators/InBlock.gif)
713
case ID_FILE_OPEN :
714![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( bModified )
{
715
// 已修改
716
INT res = ::MessageBox( hWnd, TEXT("文件已修改,是否保存?"), TEXT("文件已修改"), MB_YESNOCANCEL | MB_ICONQUESTION );
717![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( IDYES == res )
{
718![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ! ::SendMessage( hWnd, WM_COMMAND, ID_FILE_SAVE, 0 ) )
{
719
// 保存文件时放弃
720
return 0;
721
}
722
}
723![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else if ( IDCANCEL == res )
{
724
// 放弃
725
return 0;
726
}
727
}
728![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ::GetFileName( hWnd, szFileDir, szFileName, FILE_LEN, TRUE ) )
{
729![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ::LoadFile( text, szFileDir, szFileName ) )
{
730
bModified = FALSE;
731
bNamed = TRUE;
732
pl = text.begin();
733
pc = pl->begin();
734
::UpdateScrollBar( hWnd, text, TRUE );
735
::UpdateCaretPos( hWnd, text, pl, pc );
736
::InvalidateRect( hWnd, NULL, TRUE );
737
// 成功
738
return 1;
739
}
740
// 读入文件失败
741
return 0;
742
}
743
// 打开时放弃
744
return 0;
745![](/Images/OutliningIndicators/InBlock.gif)
746
case ID_FILE_SAVE :
747![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( bNamed )
{
748
// 已命名
749![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( bModified )
{
750
// 已修改
751![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ::SaveFile( text, szFileDir, szFileName ) )
{
752
bModified = FALSE;
753
// 成功
754
return 1;
755
}
756
// 保存失败
757
return 0;
758
}
759
// 未修改
760
return 1;
761
}
762
// 尚未命名
763
return ::SendMessage( hWnd, WM_COMMAND, ID_FILE_SAVE_AS, 0 );
764![](/Images/OutliningIndicators/InBlock.gif)
765
case ID_FILE_SAVE_AS :
766![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ::GetFileName( hWnd, szFileDir, szFileName, FILE_LEN, FALSE ) )
{
767![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ::SaveFile( text, szFileDir, szFileName ) )
{
768
bModified = FALSE;
769
bNamed = TRUE;
770
// 成功
771
return 1;
772
}
773
// 保存失败
774
return 0;
775
}
776
// 放弃
777
return 0;
778![](/Images/OutliningIndicators/InBlock.gif)
779
case ID_FILE_CLOSE :
780![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( bModified )
{
781
INT res = ::MessageBox( hWnd, TEXT("文件已修改,是否保存?"), TEXT("文件已修改"), MB_YESNOCANCEL | MB_ICONQUESTION );
782![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( IDYES == res )
{
783![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ! ::SendMessage( hWnd, WM_COMMAND, ID_FILE_SAVE, 0 ) )
{
784
// 保存时放弃
785
return 0;
786
}
787
}
788![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
else if ( IDCANCEL == res )
{
789
// 放弃
790
return 0;
791
}
792
}
793
::DestroyWindow( hWnd );
794
return 0;
795
}
796
break;
797![](/Images/OutliningIndicators/InBlock.gif)
798
case WM_CLOSE :
799
::SendMessage( hWnd, WM_COMMAND, ID_FILE_CLOSE, 0 );
800
return 0;
801![](/Images/OutliningIndicators/InBlock.gif)
802
case WM_DESTROY :
803
::KillTimer( hWnd, 0 );
804
::PostQuitMessage( 0 );
805
return 0;
806
}
807
return ::DefWindowProc( hWnd, uMsg, wParam, lParam );
808
}
809![](/Images/OutliningIndicators/None.gif)
810![](/Images/OutliningIndicators/None.gif)
811![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
INT APIENTRY WinMain( HINSTANCE hInst, HINSTANCE hPrevInst, LPSTR szCmd, INT iShowCmd )
{
812
WNDCLASSEX wc;
813
wc.cbClsExtra = 0;
814
wc.cbSize = sizeof(wc);
815
wc.cbWndExtra = 0;
816
wc.hbrBackground = (HBRUSH)::GetStockObject( WHITE_BRUSH );
817
wc.hCursor = ::LoadCursor( NULL, IDC_IBEAM );
818
wc.hIcon = ::LoadIcon( NULL, IDI_APPLICATION );
819
wc.hIconSm = ::LoadIcon( NULL, IDI_APPLICATION );
820
wc.hInstance = hInst;
821
wc.lpfnWndProc = WndProc;
822
wc.lpszClassName = szClassName;
823
wc.lpszMenuName = MAKEINTRESOURCE( IDR_MENU );
824
wc.style = CS_HREDRAW | CS_VREDRAW;
825![](/Images/OutliningIndicators/InBlock.gif)
826![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ! ::RegisterClassEx( &wc ) )
{
827
::MessageBox( NULL, TEXT("RegisterClassEx Failed"), TEXT("ERROR"), MB_OK | MB_ICONERROR );
828
return 0;
829
}
830![](/Images/OutliningIndicators/InBlock.gif)
831
HWND hWnd = ::CreateWindowEx( 0, szClassName, szWndNameMid,
832
WS_OVERLAPPEDWINDOW | WS_HSCROLL | WS_VSCROLL,
833
100, 30, 800, 600,
834
NULL, NULL, wc.hInstance, NULL );
835![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ! hWnd )
{
836
::MessageBox( NULL, TEXT("CreateWindowEx Failed"), TEXT("ERROR"), MB_OK | MB_ICONERROR );
837
return 0;
838
}
839
::ShowWindow( hWnd, iShowCmd );
840
::UpdateWindow( hWnd );
841![](/Images/OutliningIndicators/InBlock.gif)
842
MSG msg;
843
HACCEL hAcce = ::LoadAccelerators( hInst, MAKEINTRESOURCE(IDR_ACCE) );
844![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
while ( ::GetMessage( &msg, NULL, 0, 0 ) )
{
845![](/Images/OutliningIndicators/ExpandedSubBlockStart.gif)
if ( ! ::TranslateAccelerator( hWnd, hAcce, &msg ) )
{
846
::TranslateMessage( &msg );
847
::DispatchMessage( &msg );
848
}
849
}
850
return msg.wParam;
851
}
852![](/Images/OutliningIndicators/None.gif)