In this article we will look at using the Office Web Components (OWC) to create an Excel spreadsheet via ASP code based on the results from a database query! All of this complexity is encapsulated in a (rather basic) class. In the upcoming weeks I plan to expound on this class. Currently it just dumps the contents of a Recordset into a spreadsheet, but in future weeks I'd like to show how to add nifty formatting, apply formulas, pivot tables, and all that other jazzy stuff.

Licensing Issues
Microsoft has some pretty strict licensing issues on using Office Web Components in the Internet-world (as well as on an intranet). Before you begin using Office Web Components on your Web site be sure to read Microsoft's Licensing Agreement for OWCs.

Getting Started
To get started using Office Web Components you must have (at minimum) the Office Web Components section of Office 2000 installed on the Web server. (If you are wanting to create Excel spreadsheets and graphs without requiring Excel's presence on the Web server be sure to check out SoftArtisan's ExcelWriter component.) (For more on OWC requirements and installation information check out: Requirements for Office Web Components!)

Creating a Spreadsheet
In this article we will look only at the basics of creating a spreadsheet, setting various cell values, and saving the spreadsheet to disk. In future articles we will look at prettying up the display and working with some of the more advanced features...

Since the spreadsheet aspect of the Office Web Components is a simple COM object, you can create an instance of the spreadsheet component through your ASP page just as you would create an instance of any other COM component:

'Create an instance of the Spreadsheet component from OWC Dim objSpreadsheet Set objSpreadsheet = Server.CreateObject("OWC.Spreadsheet")

Simple enough. Once you have a Spreadsheet object to work with you can set the values of the spreadsheet's cells using the Cells property of the Spreadsheet object like so:

objSpreadsheet.Cells(Row, Column).Value = SomeValue

Finally, to save the Spreadsheet as an Excel file you must use the Export method of the Worksheet object. (The ActiveSheet property of the Spreadsheet object returns a valid Worksheet object instance.) The Export method expects two parameters: a full physical file name and an SheetExportActionEnum constant. The file name parameter specifies the specific location to save the Excel spreadsheet; the export action indicates if the file should be saved to disk or piped directly to Excel. Since we are running all of this code on the server-side, if we try to pipe the spreadsheet contents directly to Excel, we will be trying to open Excel on the Web server - not what we want to do. In fact, this setting is only useful if you are using the Spreadsheet object as an ActiveX control, since then it will be executing on the client's machine as opposed to on the Web server. Therefore, when using the Export method in server-side script, always specify a value of 0 for the export action, which indicates to the Export method to simply save the spreadsheet to disk and to not try to pipe the contents straight to Excel.

objSpreadsheet.ActiveSheet.Export("C:\Inetpub\wwwroot\FooBar.xls", 0)

Keep in mind that the IUSR_machinename account must have Write permissions on the directory that you wish to write the Excel file to. If the IUSR_machinename account has inadequate permissions you will receive an error when trying to use the Export method... (Check out this FAQ for more information...)

Now that we've covered the basics of creating / filling / saving an Excel spreadsheet through ASP, we're ready to look at a nifty Excel spreadsheet generation class I wrote that will help this process. In Part 2 we'll examine this class in detail!

In Part 1 we looked at some very basic code for creating, populating, and saving an Excel spreadsheet all from an ASP page! In this part we'll look at the implementation of a class that will allow you to dump the results of a Recordset object to a spreadsheet!  

Creating the Class
I chose to encapsulate the complexity of creating/populating/saving a spreadsheet into a VBScript class. That means that you will need VBScript version 5.0 or higher installed on your Web server. To find out what version of VBScript you are currently using, check out: Determining the Server-Side Scripting Language and Version. Also, for more information on the ins and outs of classes be sure to read Mark Lidstone's excellent article: Using Classes within VBScript.

Our class contains three private properties: objSpreadsheet, iColOffset, and iRowOffset. In the Class_Initialize() event handler, an instance of the Spreadsheet COM component is instantiated and referenced by objSpreadsheet; iColOffset and iRowOffset, which specify the how many columns over and rows down we should start inserting the database results, are initialized to values of 2.

Class ExcelGen Private objSpreadsheet Private iColOffset Private iRowOffset Sub Class_Initialize() Set objSpreadsheet = Server.CreateObject("OWC.Spreadsheet") iRowOffset = 2 iColOffset = 2 End Sub Sub Class_Terminate() Set objSpreadsheet = Nothing 'Clean up End Sub ... End Class

Next, two Property Let constructs are defined to allow users of this class to programmatically set the row and column offsets. These Property Let statements ensure that the offsets attempted to be set are greater than zero.

Class ExcelGen ... Public Property Let ColumnOffset(iColOff) If iColOff > 0 then iColOffset = iColOff Else iColOffset = 2 End If End Property Public Property Let RowOffset(iRowOff) If iRowOff > 0 then iRowOffset = iRowOff Else iRowOffset = 2 End If End Property ... End Class

Our ExcelGen class contains only two methods: one to insert the contents of a Recordset into the spreadsheet and another to save the spreadsheet to an Excel file on the Web server's filesystem. We'll examine both of these methods, as well as how to use this class through an ASP page, in Part 3.

Download the ExcelGen class (in text format)
Visit the technical docs
Read Enhancing the ExcelGen Class (for Creating Excel Spreadsheets) 
 

　　当终端服务这个基于图形界面访问的服务推出之后，现在已经很少有人利用Telnet服务进行远程访问和远程办公了。但是Telnet服务却摇身一变成为了黑客的最爱。据统计，被黑客利用得最多的一个系统服务，就是Telnet服务。

　　黑客为什么不喜欢使用同样基于远程访问，并且更加方便直观的终端服务，而偏爱Telnet服务呢?难道因为黑客就喜欢在黑乎乎的命令窗口中操作吗?NO，当然不是这样。因为使用Telnet服务进行远程控制更加隐蔽，对系统的资源消耗也非常小，并且只需要一个命令即可开启和关闭它。所以对于网络安全来讲Telnet服务是一个非常危险的服务。

　　Telnet服务使用Telnet协议传输，在系统中使用的默认端口为TCP23端口。由于Telnet协议是集成在TCP/IP协议中的，所以我们无法使用删除协议的办法来禁止Telnet服务。在我们讲防御Telnet服务之前，首先来看看黑客是如何利用Telnet服务的(笔者系统为Windows2000)。

　　攻 利用Telnet服务入侵

　　1.开启Telnet服务

　　要想利用系统当中的Telnet服务必须先开启Telnet服务，因为在默认情况下Telnet服务是被系统所禁止的。所以当黑客使用缓冲溢出，IPC等方法拿到远程主机的Shell之后，必须开启Telnet服务。

　　在命令行方式下开启Telnet服务的方法非常简单，只要在命令行当中键入“net start telnet”命令，即可开启系统中的Telnet服务。这是黑客使用得最多的一种开启Telnet服务的手法(图1)。

图

　　2.利用Telnet服务

　　那么是不是启动了Telnet服务，黑客就可以利用Telnet服务连接到远程主机中去了呢?在命令行窗口中键入“telnet IP”命令，如telnet 192.168.0.3，这时命令行窗口会出现如图2所示的情况。

图

　　在这个窗口中，无论用户选择“Y”还是“N”都会出现“失去了跟主机的连接”提示。

　　这是因为用户没有通过远程主机的NTLM验证。正是利用NTLM这个基于WorkGroup网络当中的身份验证协议，使得黑客不能轻易地利用到Telnet服务，这时即使黑客知道了Telnet服务器的管理员用户名和密码，他仍然通不过NTLM验证，这无疑给系统带给了一定的安全性。
3.突破NTLM验证

　　既然入侵者无法通过NTLM验证，那么Telnet服务就安全了?其实黑客有非常多的方法可以突破NTLM验证。

　　比如黑客知道了Telnet服务器上的一个管理员组的用户名和密码(如用户名为xiewei,密码为12345)，那么黑客可以在自己的系统中建立一个用户名和密码与之相同的管理员组用户。然后按住“Shift”键不放，找到“开始→程序→附件”中的“命令提示符”，右击“命令提示符”选项，可以在右键菜单中看到一个“运行方式”选项，打开它就可以看到一个选择用户打开程序的选项，勾上“下列用户”，黑客就可以在选项中填入刚刚建立的与Telnet服务器上等同的管理员组用户(图3)， 确定之后在打开的命令行窗口中，连接Telnet服务器，就可以非常顺利地通过NTLM验证。

图3

　　这只是突破NTLM验证方法中的一种，黑客如果拿到了远程系统的CmdShell，可以上传一些第三方的工具，如Ntlm.exe，然后执行这一工具也可以删除NTLM验证。

　　在系统中用户其实也可以手动地更改NTLM验证的设置，在“Telnet服务管理器”中就提供了修改NTLM验证的选项。用户可以在“程序→控制面板→管理工具”中找到“Telnet服务管理”选项，单击就可以打开。或者用在命令行窗口下键入“tlntadmn.exe”也可以打开“Telnet服务管理器”。用户可以看到“Telnet服务管理器”是以命令行的方式出现的。选择当中的选项3“显示 / 更改注册表设置” (图4)，用户可以看到会出现一个选项的列表，总共有八个选项。

图4

　　大家可以发现，选项7是针对NTLM验证的，它的默认值是“2”，其中还有两个值可以选择，分别是“0”和“1”。“0”的意思是不使用 NTLM 身份验证;“1”则表示先尝试 NTLM 身份验证，如果失败，再使用用户名和密码;“2”的意思是只使用 NTLM 身份验证。

　　如果把NTLM的值改为“0”或者“1”，在Telnet连接的时候，我们都可以顺利地通过NTLM验证。所以接下来的步骤，选择列表中的“(7)NTML”，并且选择“Y”更改默认值，最后把NTLM验证的值改为“0”或者“1”即可(图5)。从图5中可以看到“Telnet服务管理器”提示，只有当Telnet服务重新启动之后配置才能够生效。用户可以在命令行窗口下键入“net stop telnet”和“net start telnet”即可重新启动Telnet服务。

图5

　　接下来远程用户就可以使用“telnet IP”连接到Telnet服务器上了，虽然没有了NTLM验证的限制，但是访问用户必须键入Telnet服务器的管理员组用户名和密码方能访问到。当访问到时，用户就可以执行Windows SHELL命令来管理远程主机了。
防 全面封锁Telnet服务

　　知道了黑客利用Telnet服务的手法，那么针对Telnet服务的防御办法自然也就有了。根据黑客利用Telnet服务的思路，笔者总结了防御Telnet服务四种方法。

　　1.管理好用户的密码

　　最简单的方法，管理好本机系统当中的用户名和密码，如果用户名和密码无法被黑客取得，那么黑客将很难利用到Telnet服务。

　　2.修改服务端口

　　从前面的内容中大家可以了解到Telnet服务使用的是系统的23端口，如果我们修改了Telnet服务的默认端口，无疑隐藏了Telnet服务的入口点，给系统带来了一定的安全保障。修改方法非常简单，首先打开“Telnet服务管理器”，同样选择当中的选项3“显示 / 更改注册表设置”，打开Telnet服务管理列表，选择当中的选项8“TelnetPort”，选择“Y”更改Telnet服务的默认端口23，把Telnet服务的端口改为1024或1024以上的端口，确定即可。接着重新启动Telnet服务，配置即可生效。以后用户只要键入“telnet IP 1024”即可访问到Telnet服务器。

　　3.禁用Telnet服务

　　大家知道要想使用Telnet服务必须开启Telnet服务，假如黑客利用缓冲溢出或者其它方法拿到了用户的CmdShell，那么他只要在中CmdShell下键入“net start telnet”即可启动Telnet服务，并且可以利用Telnet服务作为用户系统中的后门使用。有什么办法才能够阻止黑客开启Telnet服务呢?其实办法非常简单，禁用Telnet服务即可实现。用户打开“控制面板→管理工具→服务”在当中找到Telnet服务选项，双击就可以进入“Telnet服务属性”对话框，在“启动类型”中选择“已禁用”，单击“确定”按钮即可。

　　4.终极Telnet服务防御

　　禁用服务并不是防御Telnet服务的终极办法，针对这一限制，黑客专门有一些第三方工具，只要拿到了远程主机的CmdShell，他只须上传该工具到远程主机并运行它就可以突破禁用服务这一限制，开启Telnet服务。

　　所以针对这个问题，笔者最后给大家介绍一种最完美的防御方法。

　　首先打开“Telnet服务管理器”，同样选择选项3“显示 / 更改注册表设置”，进入Telnet服务管理列表，大家可以看到其中的选项4“DefaultShell”，前面我们已经介绍过这个选项的具体含义，“显示Telnet服务所对应的程序。默认值是: %Systemroot%\System32\Cmd.exe /q /k”，这个含义的具体意思是什么呢?为什么当我们通过Telnet验证的时候能够取得远程主机的命令控制权限呢?

　　因为我们可以看到Telnet服务对应的默认程序是“%Systemroot%\System32\Cmd.exe /q /k”也就是系统根目录WinNT(或Windows)下System32目录下的Cmd.exe，我们都知道Cmd.exe是系统中的命令行窗口，那么当远程用户通过了Telnet验证的话，远程系统就会把自己的Cmd.exe调给远程用户使用，这就是为什么使用Telnet能够拿到远程主机命令控制权限的最根本原因。

　　讲到这里似乎防御方法也出来了，其实思路很简单，我们把Telnet服务所对应的默认程序改为一个未知的程序，这样即使黑客知道了远程主机的管理员用户和密码，突破了NTLM验证对方仍然无法拿到对主机的命令控制权，因为Telnet服务对应的默认程序已经不再是Cmd.exe。有了好思路我们就来具体使用这个方法。

　　选择Telnet服务管理列表中的选项4“DefaultShell”，就会提示我们是否更改Telnet服务的默认设置，选择“Y”，并且把Telnet服务对应的默认程序改为一个未知的文件，如:%SystemRoot%\system32\xiewei.exe，我的系统中根目录下根本不存在xiewei.exe文件，设置好之后重新启动服务。

　　设置好之后，我们来看一下它的效果。假如现在黑客知道这台系统的管理员用户Administrator，密码为12345，并且这台系统开启了Telnet服务，NTLM验证也被突破，那么使用 “Telnet IP”连接到这台系统，这时会提示键入远程系统的用户名和密码，证明已经通过了NTLM验证，在正确地输入用户名密码之后，系统仍然提示“失去了跟主机的连接”。

　　通过对这种方法，用户可以全面禁止系统中的Telnet服务。

　　（2） 确定应用程序的路径

Use GetModuleFileName 获得应用程序的路径，然后去掉可执行文件名。 　　Example: 　　TCHAR 　　exeFullPath[MAX_PATH] // MAX_PATH在API中定义了吧，好象是 　　128 　　GetModuleFileName(NULL,exeFullPath,MAX_PATH)

　　（3） 如何在程序中获得其他程序的图标?
　　两种方法:
　　(1) SDK函数 SHGetFileInfo 或使用 ExtractIcon获得图标资源的 handle,
　　(2) SDK函数 SHGetFileInfo 获得有关文件的很多信息,如大小图标,属性, 类型等.
　　Example(1):
　　在程序窗口左上角显示 NotePad图标.

void CSampleView: 　　OnDraw(CDC * pDC) 　　{ 　　if( :: SHGetFileInfo(_T("c:\\pwin95\\notepad.exe"),0, 　　&stFileInfo,sizeof(stFileInfo),SHGFI_ICON)) 　　{ 　　pDC ->DrawIcon(10,10,stFileInfo.hIcon) 　　} 　　} 　　Example(2):同样功能,Use ExtractIcon Function 　　void CSampleView:: OnDraw(CDC *pDC) 　　{ 　　HICON hIcon=:: ExtractIcon(AfxGetInstanceHandle(),_T 　　("NotePad.exe"),0) 　　if (hIcon &&hIcon!=(HICON)-1) 　　pDC->DrawIcon(10,10,hIcon) 　　}

　　说明: 获得notepad.exe的路径正规上来说用GetWindowsDirectory函数得到, 如果是调用 win95下的画笔，应该用访问注册表的方法获得其路径，要作成一个比较考究的程序，考虑应该全面点.

　　（4）获得各种目录信息
　　Windows目录: Use "GetWindowsDirectory"
　　Windows下的system目录: Use "GetSystemDirectory"
　　temp目录: Use "GetTempPath"
　　当前目录: Use "GetCurrentDirectory"

　　请注意前两个函数的第一个参数为目录变量名，后一个为缓冲区后两个相反.

　　（5）如何自定义消息
　　(1) 手工定义消息，可以这么写

#define WM_MY_MESSAGE(WM_USER+100),

　　MS 推荐的至少是 WM_USER+100

　　(2)写消息处理函数,用

WPARAM,LPARAM返回LRESULT. 　　LRESULT CMainFrame::OnMyMessage(WPARAM wparam,LPARAM lParam) 　　{ 　　temp目录: Use "GetTempPath" 　　//加入你的处理函数 irectory" 　　}

　　（6） 如何改变窗口的图标?
　　向窗口发送 WM_SECTION消息。

Example: 　　HICON hIcon=AfxGetApp() ->LoadIcon(IDI_ICON) 　　ASSERT(hIcon) 　　AfxGetMainWnd() ->SendMessage(WM_SECTION,TRUE,(LPARAM)hIcon)

　　（7） 如何改变窗口的缺省风格?
　　重载 CWnd:: PreCreateWindow 并修改CREATESTRUCT结构来指定窗口风格和其他创建信息.

Example: Delete "Max" Button and Set Original 　　Window's Position and Size 　　BOOL CMainFrame:: PreCreateWindow 　　(CREATESTRUCT &cs) 　　{ 　　cs.style &=~WS_MAXINIZEMOX 　　cs.x=cs.y=0 　　cs.cx=GetSystemMetrics(SM_CXSCREEN/2) 　　cs.cy=GetSystemMetrics(SM_CYSCREEN/2) 　　return CMDIFramewnd ::PreCreateWindow(cs) 　　}

　　（9） 如何让窗口和 MDI窗口一启动就最大化和最小化?
　　先说窗口。
　　在 InitStance 函数中设定 m_nCmdShow的取值.

m_nCmdShow=SW_SHOWMAXMIZED //最大化 　　m_nCmdShow=SW_SHOWMINMIZED //最小化 　　m_nCmdShow=SW_SHOWNORMAL //正常方式

　　MDI窗口:
　　如果是创建新的应用程序,可以用MFC AppWizard 的Advanced 按钮并在MDI子窗口风格组中检测最大化或最小化还可以重载 MDI Window 的PreCreateWindow函数，设置WS_MAXMIZE or WS_MINMIZE

　　如果从 CMDIChildWnd派生,调用 OnInitialUpdate函数中的 CWnd::Show Window来指定 MDI Child Window的风格。

　　（10） 如何限制窗口的大小?
　　也就是 FixedDialog形式。 Windows发送 WM_GETMAXMININFO消息来跟踪, 响应它,在 OnGetMAXMININFO 中写代码:

　　（11） 如何使窗口不可见？
　　很简单,用SW_HIDE 隐藏窗口，可以结合 FindWindow,ShowWindow控制.

　　（12） 如何创建一个字回绕的CEditView
　　重载CWnd : : PreCreateWindow和修改CREATESTRUCT结构，关闭CEditView对象的ES_AUTOHSCROLL和WS_HSCROLL风格位， 由于CEditView : : PreCreateWindow显示设置cs. style，调用基类函数后要修改cs . style。

BOOL CSampleEDitView : : PreCreateWindow (CREATESTRUCT&cs) 　　{ 　　//First call basse class function . 　　BOOL bResutl =CEditView : : PreCreateWindow (cs) 　　// Now specify the new window style . 　　cs.style &= ~ (ES_AUTOHSCROLL ｜WS_HSCROLL) 　　return bResult 　　}

　　（13） 如何使程序保持极小状态?
　　这么办: 在恢复程序窗体大小时，Windows会发送WM_QUERY-OPEN消息，用 ClassWizard设置成员函数

OnQueryOpen() ,add following code: 　　Bool CMainFrame:: OnQueryOpen( ) 　　{ 　　Return false 　　}

　　（14） 移动窗口
　　调用CWnd : : SetWindowPos并指定SWP_NOSIZE标志。目的位置与父窗口有关（顶层窗口与屏幕有关）。调用CWnd : : MoveWindow时必须要指定窗口的大小。

//Move window to positoin 100 , 100 of its parent window . 　　SetWindowPos (NULL, 100 , 100 , 0 , 0 , SWP_NOSIZE ｜SWP_NOAORDER)

　　（15） 通用控件的显示窗口
　　MFC提供了几个CView派生的视窗类， 封装了通用控件的功能，但仍然使用工作框文档显示窗口体系结构：CEditView封装了编辑控件，CTreeView保持了树列表控件，CListView封装了列表显示窗口控件，CRichEditView可以处理多种编辑控件。
       （16） 重置窗口的大小
　　调用CWnd: : SetWindowPos并指定SWP_NOMOVE标志， 也可调用CWnd : : MoveWindow 但必须指定窗口的位置。

// Get the size of the window . 　　Crect reWindow 　　GetWindowRect (reWindow ) 　　//Make the window twice as wide and twice as tall . 　　SetWindowPos (NULL , 0 , 0 , reWindow . Width ( ) *2, 　　reWindow . Height () * 2, 　　SWP_NOMOVE ｜SWP_NOZORDER )

　　（17） 如何单击除了窗口标题栏以外的区域使窗口移动
　　当窗口需要确定鼠标位置时Windows向窗口发送WM_NCHITTEST信息，可以处理该信息使Windows认为鼠标在窗口标题上。对于对话框和基于对话的应用程序，可以使用ClassWizard处理该信息并调用基类函数， 如果函数返回HTCLIENT 则表明鼠标在客房区域，返回HTCAPTION表明鼠标在Windows的标题栏中。

UINT CSampleDialog : : OnNcHitTest (Cpoint point ) 　　{ 　　UINT nHitTest =Cdialog: : OnNcHitTest (point ) 　　return (nHitTest = =HTCLIENT)? HTCAPTION : nHitTest 　　}

　　上述技术有两点不利之处，
　　其一是在窗口的客户区域双击时，窗口将极大；
　　其二， 它不适合包含几个视窗的主框窗口。
　　还有一种方法，当用户按下鼠标左键使主框窗口认为鼠标在其窗口标题上，使用ClassWizard在视窗中处理WM_LBUTTODOWN信息并向主框窗口发送一个WM_NCLBUTTONDOWN信息和一个单击测试HTCAPTION。

void CSampleView : : OnLButtonDown (UINT nFlags , Cpoint point 　　) 　　{ 　　CView : : OnLButtonDow (nFlags , pont ) 　　//Fool frame window into thinking somene clicked 　　on 　　its caption bar . 　　GetParentFrame ( ) —> PostMessage ( 　　WM_NCLBUTTONDOWN , 　　HTCAPTION , MAKELPARAM (poitn .x , point .y) ) 　　}

　　该技术也适用于对话框和基于对的应用程序，只是不必调用

CWnd: :GetParentFrame 。 　　void CSampleDialog : : OnLbuttonDown (UINT nFlags, Cpoint point ) 　　{ 　　Cdialog : : OnLButtonDow (nFlags, goint ) 　　//Fool dialog into thinking simeone clicked on its 　　caption bar . 　　PostMessage (WM_NCLBUTTONDOWN , HTCAPTION , MAKELPARM (point.x 　　, point. y 　　) ) 　　}

　　（18） 如何改变视窗的背景颜色
　　Windows向窗口发送一个WM_ERASEBKGND消息通知该窗口擦除背景，可以使用ClassWizard重载该消息的缺省处理程序来擦除背景（实际是画），并返回TRUE以防止Windows擦除窗口。

//Paint area that needs to be erased. 　　BOOL CSampleView : : OnEraseBkgnd (CDC* pDC) 　　{ 　　// Create a pruple brush. 　　CBrush Brush (RGB (128 , 0 , 128) ) 　　// Select the brush into the device context . 　　CBrush* pOldBrush = pDC—>SelcetObject (&brush) 　　// Get the area that needs to be erased . 　　CRect reClip 　　pDC—>GetCilpBox (&rcClip) 　　//Paint the area. 　　pDC—> PatBlt (rcClip.left , rcClip.top , rcClip.Width ( ) , rcClip.Height( ) , PATCOPY ) 　　//Unselect brush out of device context . 　　pDC—>SelectObject (pOldBrush ) 　　// Return nonzero to half fruther processing . 　　return TRUE 　　}

　　（20） 如何防止主框窗口在其说明中显示活动的文档名
　　创建主框窗口和MDI子窗口进通常具有FWS_ADDTOTITLE风格位，如果不希望在说明中自动添加文档名， 必须禁止该风格位， 可以使用ClassWizard重置
　　CWnd: : PreCreateWindow并关闭FWS_ADDTOTITLE风格。

BOOL CMainFrame : : PreCreateWindow (CREATESTRUCT&cs) 　　{ 　　//Turn off FWS_ADDTOTITLE in main frame . 　　cs.styel & = ~FWS_ADDTOTITLE 　 　　return CMDIFrameWnd : : PreCreateWindow (cs ) 　　}

　　关闭MDI子窗口的FWS _ADDTOTITLE风格将创建一个具有空标题的窗口，可以调用CWnd: : SetWindowText来设置标题。记住自己设置标题时要遵循接口风格指南。

　　（21） 如何获取有关窗口正在处理的当前消息的信息
　　调用CWnd: : GetCurrentMessage可以获取一个MSG指针。例如，可以使用ClassWizard将几个菜单项处理程序映射到一个函数中，然后调用GetCurrentMessage来确定所选中的菜单项。

viod CMainFrame : : OnCommmonMenuHandler ( ) 　　{ 　　//Display selected menu item in debug window . 　　TRACE ("Menu item %u was selected . \n" ,

　　（22） 如何在代码中获取工具条和状态条的指针
　　缺省时， 工作框创建状态条和工具条时将它们作为主框窗口的子窗口，状态条有一个AFX_IDW_STATUS_BAR标识符，工具条有一个AFX_IDW_TOOLBAR标识符，下例说明了如何通过一起调用CWnd: : GetDescendantWindow和AfxGetMainWnd来获取这些子窗口的指针：

//Get pointer to status bar . 　　CStatusBar * pStatusBar = (CStatusBar *) AfxGetMainWnd ( ) 　　—> GetDescendantWindow(AFX_IDW_STUTUS_BAR) 　　//Get pointer to toolbar . 　　CToolBar * pToolBar = (CToolBar * ) AfxGetMainWnd ( ) 　　—> GetDescendantWindow(AFX_IDW_TOOLBAR)

　　（23） 如何使能和禁止工具条的工具提示
　　如果设置了CBRS_TOOLTIPS风格位，工具条将显示工具提示，要使能或者禁止工具提示，需要设置或者清除该风格位。下例通过调用CControlBar : : GetBarStyle和CControlBar : : SetBarStyle建立一个完成此功能的成员函数：

void CMainFrame : : EnableToolTips ( BOOL bDisplayTips ) 　　{ 　　ASSERT_VALID (m_wndToolBar) 　　DWORD dwStyle = m _wndToolBar.GetBarStyle ( ) 　　if (bDisplayTips) dwStyle ｜=CBRS_TOOLTIPS 　　else 　　dwStyle & = ~CBRS_TOOLTIPS 　　m_wndToolBar.SetBarStyle (dwStyle ) 　　}

　　通过建立区域和调用SetWindowRgn，已经建立一个不规则形状的窗口，下面的例子程序是修改OnPaint函数使窗口形状看起来象一个球形体。

voik CRoundDlg : : OnPaint ( ) 　　{ 　　CPaintDC de (this) // device context for painting 　　. 　　//draw ellipse with out any border 　　dc. SelecStockObject (NULL_PEN) 　　//get the RGB colour components of the sphere color 　　COLORREF color= RGB( 0 , 0 , 255) 　　BYTE byRed =GetRValue (color) 　　BYTE byGreen = GetGValue (color) 　　BYTE byBlue = GetBValue (color) 　　// get the size of the view window 　　Crect rect 　　GetClientRect (rect) 　　// get minimun number of units 　　int nUnits =min (rect.right , rect.bottom ) 　　//calculate he horiaontal and vertical step size 　　float fltStepHorz = (float) rect.right /nUnits 　　float fltStepVert = (float) rect.bottom /nUnits 　　int nEllipse = nUnits/3 // calculate how many to 　　draw 　　int nIndex 　　// current ellipse that is being draw 　　CBrush brush 　　// bursh used for ellipse fill color 　　CBrush *pBrushOld // previous 　　brush that was selected into dc 　　//draw ellipse , gradually moving towards upper-right 　　corner 　　for (nIndex = 0 nIndes < + nEllipse nIndes++) 　　{ 　　//creat solid brush 　　brush . CreatSolidBrush (RGB ( ( (nIndex*byRed ) /nEllipse ). 　　( ( nIndex * byGreen ) /nEllipse ), ( (nIndex * byBlue) 　　/nEllipse ) ) ) 　　//select brush into dc 　　pBrushOld= dc .SelectObject (&brhsh) 　　//draw ellipse 　　dc .Ellipse ( (int) fltStepHorz * 2, (int) fltStepVert * nIndex , 　　rect. right -( (int) fltStepHorz * nIndex )+ 1, 　　rect . bottom -( (int) fltStepVert * (nIndex *2) ) +1) 　　//delete the brush 　　brush.DelecteObject ( ) 　　} 　　}

　　最后，处理WM_NCHITTEST消息，使当击打窗口的任何位置时能移动窗口。

UINT CRoundDlg : : OnNchitTest (Cpoint point ) 　　{ 　　//Let user move window by clickign anywhere on thewindow . 　　UINT nHitTest = CDialog : : OnNcHitTest (point) 　　rerurn (nHitTest = = HTCLIENT)? HTCAPTION: nHitTest 　　}

　　（25） 如何获取应用程序的 实例句柄?
　　应用程序的实例句柄保存在CWinApp m_hInstance 中,可以这么调用AfxGetInstancdHandle获得句柄.

Example: HANDLE hInstance=AfxGetInstanceHandle()

　　还可以创建一个自定义的函数 Terminate Window

void Terminate Window(LPCSTR pCaption) 　　{ 　　CWnd *pWnd=Cwnd::FindWindow(NULL,pCaption) 　　if (pWnd) 　　pWnd ->SendMessage(WM_CLOSE) 　　}

　　说明: FindWindow函数不是提倡的做法，因为它无法处理标题栏自动改变，比如我们要检测 Notepad是不是已运行而事先不知道Notepad的标题栏,这时FindWindow就无能为力了，可以通过枚举 windows任务列表的办法来实现。在机械出版社"Windows 95 API开发人员指南"一书有比较详细的介绍,这里就不再多说乐。

　　（27） 如何创建和使用无模式对话框
　　MFC将模式和无模式对话封装在同一个类中，但是使用无模式对话需要几个对话需要几个额处的步骤。首先，使用资源编辑器建立对话资源并使用ClassWizard创建一个CDialog的派生类。模式和无模式对话的中止是不一样的：模式对话通过调用CDialog : : EndDialog 来中止，无模式对话则是调用CWnd: : DestroyWindow来中止的，函数CDialog : : OnOK和CDialog : : OnCancel调用EndDialog ,所以需要调用DestroyWindow并重置无模式对话的函数。

void CSampleDialog : : OnOK ( ) 　　{ 　　// Retrieve and validate dialog data . 　　if (! UpdateData (TRUE) ) 　　{ 　　// the UpdateData rountine 　　will set focus to correct item TRACEO (" UpdateData failed during dialog termination .\n") 　　return 　　} 　　//Call DestroyWindow instead of EndDialog . 　　DestroyWindow ( ) 　　} 　　void CSampleDialog : : OnCancel ( ) 　　{ 　　//Call DestroyWindow instead of EndDialog . 　　DestroyWindow ( ) 　　}

　　其次，需要正确删除表示对话的C++对象。对于模式对来说，这很容易，需要创建函数返回后即可删除C++对象；无模式对话不是同步的，创建函数调用后立即返回，因而用户不知道何时删除C++对象。撤销窗口时工作框调用CWnd : : PostNcDestroy，可以重置该函数并执行清除操作，诸如删除this指针。

void CSampleDialog : : PostNcDestroy ( ) 　　{ 　　// Declete the C++ object that represents this dialog. 　　delete this

　　最后，要创建无模式对话。可以调用CDialog : : DoModal创建一个模式对放，要创建一个无模式对话则要调用CDialog: : Create。下面的例子说明 了应用程序是如何创建无模式对话的： 象；无模式对话不是同步的，创建函数调用后立即返回，

void CMainFrame : : OnSampleDialog ( ) 　　{ 　　//Allocate a modeless dialog object . 　　CSampleDilog * pDialog =new CSampleDialog 　　ASSERT_VALID (pDialog) Destroy ( ) 　　//Create the modeless dialog . represents this dialog. 　　BOOL bResult = pDialog —> Creste (IDD_IDALOG) 　　ASSERT (bResult ) 　　}

　　（28） 如何防止主框窗口在其说明中显示活动的文档名
　　创建主框窗口和MDI子窗口进通常具有FWS_ADDTOTITLE风格位，如果不希望在说明中自动添加文档名， 必须禁止该风格位， 可以使用ClassWizard重置

CWnd: : PreCreateWindow并关闭FWS_ADDTOTITLE风格。 　　BOOL CMainFrame : : PreCreateWindow (CREATESTRUCT&cs) 　　{ 　　//Turn off FWS_ADDTOTITLE in main frame . 　　cs.styel & = ~FWS_ADDTOTITLE 　 　　return CMDIFrameWnd : : PreCreateWindow (cs ) 　　}

　　关闭MDI子窗口的FWS _ADDTOTITLE风格将创建一个具有空标题的窗口，可以调用CWnd: : SetWindowText来设置标题。记住自己设置标题时要遵循接口风格指南。
        （29） 如何在代码中获取工具条和状态条的指针
　　缺省时， 工作框创建状态条和工具条时将它们作为主框窗口的子窗口，状态条有一个AFX_IDW_STATUS_BAR标识符，工具条有一个AFX_IDW_TOOLBAR标识符，下例说明了如何通过一起调用CWnd: : GetDescendantWindow和AfxGetMainWnd来获取这些子窗口的指针：

//Get pointer to status bar . 　　CStatusBar * pStatusBar = (CStatusBar *) AfxGetMainWnd ( ) 　　—> GetDescendantWindow(AFX_IDW_STUTUS_BAR) 　　//Get pointer to toolbar . 　　CToolBar * pToolBar = (CToolBar * ) AfxGetMainWnd ( ) 　　—> GetDescendantWindow(AFX_IDW_TOOLBAR)

　　（30） 怎样加载其他的应用程序?
　　三个SDK函数 winexec, shellexecute,createprocess可以使用。
　　WinExec最简单，两个参数，前一个指定路径，后一个指定显示方式.后一个参数值得说一下，比如泥用 SW_SHOWMAXMIZED方式去加载一个无最大化按钮的程序，就是Neterm,calc等等，就不会出现正常的窗体，但是已经被加到任务列表里了。

　　ShellExecute较 WinExex灵活一点，可以指定工作目录,下面的Example就是直接打开 c:\temp\1.txt,而不用加载与 txt文件关联的应用程序,很多安装程序完成后都会打开一个窗口，来显示Readme or Faq,我猜就是这么作的啦.

ShellExecute(NULL,NULL,_T("1.txt"),NULL,_T("c:\\temp"),SW_SHOWMAXMIZED)

　　CreateProcess最复杂，一共有十个参数，不过大部分都可以用NULL代替，它可以指定进程的安全属性，继承信息，类的优先级等等.来看个很简单的Example:

STARTUPINFO stinfo 　　//启动窗口的信息 　　PROCESSINFO procinfo //进程的信息 　　CreateProcess(NULL,_T("notepad.exe"),NULL,NULL.FALSE, 　　NORMAL_PRIORITY_ 　　CLASS,NULL,NULL, &stinfo,&procinfo)

　　（31） 如何在代码中获取工具条和状态条的指针
　　缺省时， 工作框创建状态条和工具条时将它们作为主框窗口的子窗口，状态条有一个AFX_IDW_STATUS_BAR标识符，工具条有一个AFX_IDW_TOOLBAR标识符，下例说明了如何通过一起调用CWnd: : GetDescendantWindow和AfxGetMainWnd来获取这些子窗口的指针：

//Get pointer to status bar . 　　CStatusBar * pStatusBar = (CStatusBar *) AfxGetMainWnd ( ) 　　—> GetDescendantWindow(AFX_IDW_STUTUS_BAR)

　　（32） 如何使能和禁止工具条的工具提示
　　如果设置了CBRS_TOOLTIPS风格位，工具条将显示工具提示，要使能或者禁止工具提示，需要设置或者清除该风格位。下例通过调用CControlBar : : GetBarStyle和CControlBar : : SetBarStyle建立一个完成此功能的成员函数：

void CMainFrame : : EnableToolTips ( BOOL bDisplayTips ) 　　{ 　　ASSERT_VALID (m_wndToolBar) 　　DWORD dwStyle = m _wndToolBar.GetBarStyle ( ) 　　if (bDisplayTips) dwStyle ｜=CBRS_TOOLTIPS 　　else 　　dwStyle & = ~CBRS_TOOLTIPS 　　m_wndToolBar.SetBarStyle (dwStyle ) 　　} 　　//Get pointer to toolbar . 　　CToolBar * pToolBar = (CToolBar * ) AfxGetMainWnd ( ) 　　—> GetDescendantWindow(AFX_IDW_TOOLBAR)

　　（33） 如何设置工具条标题
　　工具条是一个窗口，所以可以在调用CWnd : : SetWindowText来设置标题，例子如下：

int CMainFrame : : OnCreate (LPCREATESTRUCT lpCreateStruct ) 　　{ 　　… 　　// Set the caption of the toolbar . 　　m_wndToolBar.SetWindowText (_T "Standdard")

Example: 　　void ToggleTopMost( 　　CWnd *pWnd) 　　{ 　　ASSERT_VALID(pWnd) 　　pWnd ->SetWindowPos(pWnd-> GetStyle( ) &WS_EX_TOPMOST)? 　　&wndNoTopMOST: &wndTopMost,0,0,0,0,SSP_NOSIZE|WSP_NOMOVE) 　　}

　　（35） 如何在对话框中显示一个位图
　　这要归功于Win 32先进的静态控件和Microsoft的资源编辑器，在对话框中显示位图是很容易的， 只需将图形控件拖到对话中并选择适当属性即可，用户也可以显示图标、位图以及增强型元文件。

　　（36） 如何改变对话或窗体视窗的背景颜色
　　调用CWinApp : : SetDialogBkColor可以改变所有应用程序的背景颜色。第一个参数指定了背景颜色，第二个参数指定了文本颜色。下例将应用程序对话设置为蓝色背景和黄色文本。

BOOL CSampleApp : : InitInstance ( ) 　　{ 　　… 　　//use blue dialog with yellow text . 　　SetDialogBkColor (RGB (0, 0, 255 ), RGB ( 255 ,255 , 0 ) ) 　　… 　　}

　　需要重画对话（或对话的子控件）时，Windows向对话发送消息WM_CTLCOLOR，通常用户可以让Windows选择绘画背景的刷子，也可重置该消息指定刷子。下例说明了创建一个红色背景对话的步骤。

　　首先，给对话基类增加一人成员变量

CBursh :class CMyFormView : public CFormView 　　{ 　　… 　　private : 　　CBrush m_ brush // background brush 　　… 　　}

　　其次， 在类的构造函数中将刷子初始化为所需要的背景颜色。

CMyFormView : : CMyFormView ( ) 　　{ 　　// Initialize background brush . 　　m_brush .CreateSolidBrush (RGB ( 0, 0, 255) ) 　　}

　　最后，使用ClassWizard处理WM_CTLCOLOR消息并返回一个用来绘画对话背景的刷子句柄。注意：由于当重画对话控件时也要调用该函数，所以要检测nCtlColor参量。

HBRUSH CMyFormView : : OnCtlColor (CDC* pDC , CWnd*pWnd , UINT nCtlColor 　　) 　　{ 　　// Determine if drawing a dialog box . If we are, return +handle to 　　//our own background brush . Otherwise let windows handle it . 　　if (nCtlColor = = CTLCOLOR _ DLG ) 　　return (HBRUSH) m_brush.GetSafeHandle ( ) 　　return CFormView : : OnCtlColor (pDC, pWnd , nCtlColor 　　) 　　}

　　（37） 如何获取一个对话控件的指针
　　有两种方法。其一，调用CWnd: : GetDlgItem，获取一个CWnd*指针调用成员函数。下例调用GetDlgItem，将返回值传给一个CSpinButtonCtrl*以便调用CSpinButtonCtrl : : SetPos 函数：

BOOL CSampleDialog : : OnInitDialog ( ) 　　{ 　　CDialog : : OnInitDialog ( ) 　　//Get pointer to spin button . 　　CSpinButtonCtrl * pSpin - ( CSpinButtonCtrl *) GetDlgItem(IDC_SPIN) 　　ASSERT _ VALID (pSpin) 　　//Set spin button's default position . 　　pSpin —> SetPos (10) 　　return TRUE 　　}

　　（38） 如何禁止和使能控件
　　控件也是窗口，所以可以调用CWnd : : EnableWindow使能和禁止控件。

//Disable button controls . 　　m_wndOK.EnableWindow (FALSE ) 　　m_wndApply.EnableWindow (FALSE )

　　（39） 如何改变控件的字体
　　由于控件是也是窗口，用户可以调用CWnd: : SetFont指定新字体。该函数用一个Cfont指针，要保证在控件撤消之前不能撤消字体对象。下例将下压按钮的字体改为8点Arial字体：

//Declare font object in class declaration (.H file ). 　　private : Cfont m_font 　　// Set font in class implementation (.Cpp file ). Note m_wndButton is a 　　//member variable added by ClassWizard.DDX routines hook the member 　　//variable to a dialog button contrlo. 　　BOOL CSampleDialog : : OnInitDialog ( ) 　　{ 　　… 　　//Create an 8-point Arial font 　　m_font . CreateFont (MulDiv (8 , -pDC 　　—> GetDeviceCaps(LOGPIXELSY) ,72). 0 , 0 , 0 , FW_NORMAL , 0 , 0,0, ANSI_CHARSER, OUT_STROKE_PRECIS , 　　CLIP_STROKE _PRECIS , DRAFT _QUALITY 　　VARIABLE_PITCH ｜FF_SWISS, _T("Arial") ) 　　//Set font for push button . 　　m_wndButton . SetFont (&m _font ) 　　… 　　}

　　（40） 如何在OLE控件中使用OLE_COLOR数据类型
　　诸如COleControl : : GetFortColor和COleControl : : GetBackColor等函数返回OLE _COLOR数据类型的颜色，而GDI对象诸如笔和刷子使用的是COLORREF数据类型，调用COleControl : : TranslateColor可以很容易地将OLE_COLOR类型改为COLORREF类型。下例创建了一个当前背景颜色的刷子：

void CSampleControl : : OnDraw (CDC* pdc 　　const Crect& rcBounds , const Crect& rcInvalid 　　) 　　{ 　　//Create a brush of the cuttent background color. 　　CBrush brushBack (TranslateColor (GetBackColor () ) ) 　　//Paint the background using the current backgroundcolor . 　　pdc—> FilllRect (rcBounds , &brushBack) 　　//other drawign commands 　　… 　　}

　　（41） 在不使用通用文件打开对话的情况下如何显示一个文件列表
　　调用CWnd: : DlgDirList或者CWnd: : DlgDirListComboBox，Windows 将自动地向列表框或组合框填充可用的驱动器名或者指定目录中的文件，下例将Windows目录中的文件填充在组合框中：

BOOL CSampleDig : : OnInitDialog ( ) 　　{ 　　CDialog : : OnInitDialog ( ) 　　TCHAR szPath [MAX_PATH] = {"c:\\windows"} 　　int nReslt = DlgDirListComboBox (szPath, IDC_COMBO , IDC_CURIDIR, DDL_READWRITE ｜DDL_READONLY｜DDL_HIDDEN｜ DDL_SYSTEM｜DDL_ARCHIVE) 　　return TRUE 　　}

　　（42） 为什么旋转按钮控件看起来倒转
　　需要调用CSpinCtrl : : SetRange 设置旋转按钮控件的范围，旋转按钮控件的缺省上限为0，缺省下限为100，这意味着增加时旋转按控件的值由100变为0。下例将旋转按钮控件的范围设置为0到100：

BOOL CAboutDlg : : OnInitDialog ( ) 　　{ 　　CDialog : : OnInitDialog ( ) 　　//set the lower and upper limit of the spin button 　　m_wndSpin . SetRange ( 0 ,100 ) 　　return TRUE 　　}

　　Visual C++ 4.0 Print对话中的Copise旋转按钮控件也有同样的问题：按下Up按钮时拷贝的数目减少，而按下Down 按钮时拷贝的数目增加。
        （43） 为什么旋转按钮控件不能自动地更新它下面的编辑控件
　　如果使用旋转按钮的autu buddy特性， 则必须保证在对话的标记顺序中buddy窗口优先于旋转按钮控件。从Layout菜单中选择Tab Order菜单项（或者按下Crtl+D）可以设置对话的标签顺序。

　　（44） 如何用位图显示下压按钮
　　Windows 95按钮有几处新的创建风格，尤其是BS_BITMAP和BS_ICON，要想具有位图按钮，创建按钮和调用CButton : : SetBitmap或CButton : : SetIcon时要指定BS_BITMAP或BS_ICON风格。

　　首先，设置按钮的图标属性。然后，当对话初始化时调用CButton: : SetIcon。注意：下例用图标代替位图，使用位图时要小心，因为不知道背景所有的颜色——并非每个人都使用浅灰色。

BOOL CSampleDlg : : OnInitDialog ( ) 　　{ 　　CDialog : : OnInitDialog ( ) 　　//set the images for the push buttons . 　　BOOL CSampleDlg : : OnInitDialog ( ) 　　{ 　　CDialog : : OnInitDialog ( ) 　　//set the images for the push buttons . 　　m_wndButton1.SetIcon (AfxGetApp ( ) —> LoadIcon (IDI _ IPTION1)) 　　m_wndButton2.SetIcon (AfxGetApp ( ) —> LoadIcon (IDI _ IPTION2)) 　　m_wndButton3.SetIcon (AfxGetApp ( ) —> LoadIcon (IDI _ IPTION3)) 　　return TRUE 　　}

　　（45） 如何一个创建三态下压按钮
　　可以使用新的BS_PUSHBUTTON 风格位和检测框以及按钮来创建一个三态下压按钮。这很容易，只需将检测框和按钮拖拉到对话中并指定属性Push—like即可。不用任何附加程序就可以成为三态下压按钮。

　　（46） 如何动态创建控件
　　分配一个控件对象的实例并调用其Create成员函数。开发者最容易忽略两件事：忘记指定WS_VISBLE标签和在栈中分配控件对象。下例动态地创建一个下压按钮控件：

//In class declaration (.H file ). 　　private : CButton* m _pButton 　　//In class implementation (.cpp file ) . 　　m_pButton =new CButton 　　ASSERT_VALID (m_pButton) 　　m_pButton —>Create (_T ("Button Title ") , WS_CHILD ｜WS_VISIBLE ｜BS_PUSHBUTTON. Crect ( 0, 0, 100 , 24) , this , IDC _MYBUTTON )

　　（47） 如何限制编辑框中的准许字符
　　如果用户在编辑控件中只允许接收数字，可以使用一个标准的编辑控件并指定新的创建标志ES_NUMBERS,它是Windows 95新增加的标志，该标志限制 编辑控件只按收数字字符。如果用户需要复杂的编辑控件，可以使用Microsoft 的屏蔽编辑控件，它是一个很有用的OLE定制控件。
如果希望不使用OLE 定制控件自己处理字符，可以派生一个CEdit类并处理WM_CHAR消息，然后从编辑控件中过滤出特定的字符。首先，使用ClassWizard建立一个 CEdit的派生类，其次，在对话类中指定一个成员变量将编辑控件分类在OnInitdialog 中调用CWnd: : SubclassDlgItem .

//In your dialog class declaration (.H file ) 　　private : CMyEdit m_wndEdit // Instance of your new edit control . 　　//In you dialog class implementation (.CPP file ) 　　BOOL CSampleDialog : : OnInitDialog ( ) 　　{ 　　… 　　//Subclass the edit lontrod . 　　m_wndEdit .SubclassDlgItem (IDC_EDIT,this) 　　… 　　}

　　使用ClassWizard处理WM_CHAR消息，计算nChar参量并决定所执行的操作，用户可以确定是否修改、传送字符。下例说明了如何显示字母字符，如果字符是字母字符，则调用CWnd OnChar，否则不调用OnChar.

//Only display alphabetic dharacters . 　　void CMyEdit : : OnChar (UINT nChar , UINT nRepCnt , UITN nFlags ) 　　{ 　　//Determine if nChar is an alphabetic character. 　　if (: : IsCharAlpha ( ( TCHAR) nChar ) ) 　　CEdit : : OnChar (nChar, nRepCnt , nFlags ) 　　}

　　如果要修改字符，则不能仅仅简单地用修改过的nChar调用CEdit: : OnChar，然后CEdit: : OnChar调用CWnd: : Default获取原来的wParam 和lParam 的值，这样是不行的。要修改一个字符，需要首先修改nChar，然后用修改过的nChar调用CWnd: : DefWindowProc。下例说明了如何将字符转变为大写：

//Make all characters uppercase 　　void CMyEdit : : OnChar (UINT nChar , UINT nRepCnt , UINT nFlags ) 　　{ 　　//Make sure character is uppercase . 　　if (: : IsCharAlpha ( .( TCHAR) nChar) 　　nChar=: : CharUpper(nChar ) 　　//Bypass default OnChar processing and directly call 　　//default window proc. 　　DefWindProc (WM_CHAR, nChar , MAKELPARAM (nRepCnt, nFlags )) 　　}

mciSendString("Set cdAudio door open wait",NULL,0,NULL);

二、关闭CD_ROM

mciSendString("Set cdAudio door closed wait",NULL,0,NULL);

三、关闭计算机

OSVERSIONINFO OsVersionInfo; //包含操作系统版本信息的数据结构
OsVersionInfo.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
GetVersionEx(&OsVersionInfo); //获取操作系统版本信息
if(OsVersionInfo.dwPlatformId == VER_PLATFORM_WIN32_WINDOWS)
{
    //Windows98,饔肊xitWindowsEx()函数重新启动计算机
    DWORD dwReserved;
    ExitWindowsEx(EWX_REBOOT,dwReserved); //可以改变第一个参数，实现注销用户、
    //关机、关闭电源等操作
    // 退出前的一些处理程序
}

四、重启计算机

typedef int (CALLBACK *SHUTDOWNDLG)(int); //显示关机对话框函数的指针
HINSTANCE hInst = LoadLibrary("shell32.dll"); //装入shell32.dll
SHUTDOWNDLG ShutDownDialog; //指向shell32.dll库中显示关机对话框函数的指针
if(hInst != NULL)
{
    //获得函数的地址并调用之
    ShutDownDialog = (SHUTDOWNDLG)GetProcAddress(hInst,(LPSTR)60);
   
    (*ShutDownDialog)(0);
}

五、枚举所有字体

LOGFONT lf;
lf.lfCharSet = DEFAULT_CHARSET; // Initialize the LOGFONT structure
strcpy(lf.lfFaceName,"");
CClientDC dc (this);
// Enumerate the font families
::EnumFontFamiliesEx((HDC) dc,&lf, (FONTENUMPROC) EnumFontFamProc,(LPARAM) this,0);
//枚举函数
int CALLBACK EnumFontFamProc(LPENUMLOGFONT lpelf,
                             LPNEWTEXTMETRIC lpntm,DWORD nFontType,long lparam)
                 
{
    // Create a pointer to the dialog window
    CDay7Dlg* pWnd = (CDay7Dlg*) lparam;
    // add the font name to the list box
    pWnd ->m_ctlFontList.AddString(lpelf ->elfLogFont.lfFaceName);
    // Return 1 to continue font enumeration
    return 1;
}
//其中m_ctlFontList是一个列表控件变量

六、一次只运行一个程序实例，如果已运行则退出

if( FindWindow(NULL,"程序标题")) exit(0);

七、得到当前鼠标所在位置

CPoint pt;
GetCursorPos(&pt); //得到位置

八、上下文菜单事件触发事件

OnContextMenu事件

九、显示和隐藏程序菜单

CWnd *pWnd=AfxGetMainWnd();
if(b_m) //隐藏菜单
{
    pWnd->SetMenu(NULL);
    pWnd->DrawMenuBar();
    b_m=false;
}
else
{
    CMenu menu;
    menu.LoadMenu(IDR_MAINFRAME); ////显示菜单 也可改变菜单项
    pWnd->SetMenu(&menu);
    pWnd->DrawMenuBar();
    b_m=true;
    menu.Detach();
}

十、获取可执行文件的图标

HICON hIcon=::ExtractIcon(AfxGetInstanceHandle(),_T("NotePad.exe"),0);
if (hIcon &&hIcon!=(HICON)-1)
{
    pDC->DrawIcon(10,10,hIcon);
   
}
DestroyIcon(hIcon);

十一、窗口自动靠边程序演示

BOOL AdjustPos(CRect* lpRect)
{//自动靠边
    int iSX=GetSystemMetrics(SM_CXFULLSCREEN);
    int iSY=GetSystemMetrics(SM_CYFULLSCREEN);
    RECT rWorkArea;
    BOOL bResult = SystemParametersInfo(SPI_GETWORKAREA, sizeof(RECT), &rWorkAre
        a, 0);
    CRect rcWA;
    if(!bResult)
    {//如果调用不成功就利用GetSystemMetrics获取屏幕面积
        rcWA=CRect(0,0,iSX,iSY);
    }
    else
        rcWA=rWorkArea;
    int iX=lpRect->left;
    int iY=lpRect->top;
   
    if(iX < rcWA.left + DETASTEP && iX!=rcWA.left)
    {//调整左
        //pWnd->SetWindowPos(NULL,rcWA.left,iY,0,0,SWP_NOSIZE);
        lpRect->OffsetRect(rcWA.left-iX,0);
        AdjustPos(lpRect);
        return TRUE;
    }
    if(iY < rcWA.top + DETASTEP && iY!=rcWA.top)
    {//调整上
        //pWnd->SetWindowPos(NULL ,iX,rcWA.top,0,0,SWP_NOSIZE);
        lpRect->OffsetRect(0,rcWA.top-iY);
        AdjustPos(lpRect);
        return TRUE;
    }
    if(iX + lpRect->Width() > rcWA.right - DETASTEP && iX !=rcWA.right-lpRect->Width())
    {//调整右
        //pWnd->SetWindowPos(NULL ,rcWA.right-rcW.Width(),iY,0,0,SWP_NOSIZE);
        lpRect->OffsetRect(rcWA.right-lpRect->right,0);
        AdjustPos(lpRect);
        return TRUE;
    }
    if(iY + lpRect->Height() > rcWA.bottom - DETASTEP && iY !=rcWA.bottom-lpRect
        ->Height())
    {//调整下
        //pWnd->SetWindowPos(NULL ,iX,rcWA.bottom-rcW.Height(),0,0,SWP_NOSIZE);
        lpRect->OffsetRect(0,rcWA.bottom-lpRect->bottom);
        return TRUE;
    }
    return FALSE;
}
//然后在ONMOVEING事件中使用所下过程调用
CRect r=*pRect;
AdjustPos(&r);
*pRect=(RECT)r;

十二、给系统菜单添加一个菜单项

　　给系统菜单添加一个菜单项需要进行下述三个步骤：

　　首先，使用Resource Symbols对话（在View菜单中选择Resource Symbols．．．可以显示该对话）定义菜单项ID，该ID应大于0x0F而小于0xF000；
　　其次，调用CWnd::GetSystemMenu获取系统菜单的指针并调用CWnd:: Appendmenu将菜单项添加到菜单中。下例给系统菜单添加两个新的

int CMainFrame:: OnCreate (LPCREATESTRUCT lpCreateStruct)
{
    //…
    //Make sure system menu item is in the right range.
    ASSERT(IDM_MYSYSITEM<0xF000);
    //Get pointer to system menu.
    CMenu* pSysMenu=GetSystemMenu(FALSE);
    ASSERT_VALID(pSysMenu);
    //Add a separator and our menu item to system menu.
    CString StrMenuItem(_T ("New menu item"));
    pSysMenu->AppendMenu(MF_SEPARATOR);
    pSysMenu->AppendMenu(MF_STRING, IDM_MYSYSITEM, StrMenuItem);
    //…
}

十三、运行其它程序

　　1、运行EMAIL或网址

char szMailAddress[80];
strcpy(szMailAddress,"mailto:netvc@21cn.com");
ShellExecute(NULL, "open", szMailAddress, NULL, NULL, SW_SHOWNORMAL);

　　2、运行可执行程序

WinExec("notepad.exe",SW_SHOW); //运行计事本

十四、动态增加或删除菜单

1、 增加菜单
添加

CMenu *mainmenu;
mainmenu=AfxGetMainWnd()->GetMenu(); //得到主菜单
(mainmenu->GetSubMenu (0))->AppendMenu (MF_SEPARATOR);//添加分隔符
(mainmenu->GetSubMenu (0))->AppendMenu(MF_STRING,ID_APP_ABOUT,
                                        _T("Always on &Top")); //添加新的菜单项
                                        DrawMenuBar(); //重画菜单

2、 删除菜单

删除

CMenu *mainmenu;
mainmenu=AfxGetMainWnd()->GetMenu(); //得到主菜单

CString str ;
for(int i=(mainmenu->GetSubMenu (0))->GetMenuItemCount()-1;i>=0;i--) //取得菜单的项数。
{
    (mainmenu->GetSubMenu (0))->GetMenuString(i,str,MF_BYPOSITION);
    //将指定菜单项的标签拷贝到指定的缓冲区。MF_BYPOSITION的解释见上。
    if(str=="Always on &Top") //如果是刚才我们增加的菜单项，则删除。
    {
        (mainmenu->GetSubMenu (0))->DeleteMenu(i,MF_BYPOSITION);
        break;
    }
}

十五、改变应用程序的图标静态更改：

　　修改图标资源IDR_MAINFRAME。它有两个图标，一个是16*16的，另一个是32*32的，注意要一起修改。

　　动态更改： 向主窗口发送WM_SETICON消息.代码如下：

HICON hIcon=AfxGetApp()->LoadIcon(IDI_ICON);
ASSERT(hIcon);
AfxGetMainWnd()->SendMessage(WM_SETICON,TRUE,(LPARAM)hIcon);

十六、另一种改变窗口标题的方法

　　使用语句 CWnd* m_pCWnd = AfxGetMainWnd( )，然后，再以如下形式调用SetWindowText()函数：

SetWindowText( *m_pCWnd,(LPCTSTR)m_WindowText);// m_WindowText可以是一个CString类的变量。

十七、剪切板上通过增强元文件拷贝图像数据

　　下面代码拷贝通过元文件拷贝图像数据到任何应用程序，

//其可以放置在CView派生类的函数中。

CMetaFileDC * m_pMetaDC = new CMetaFileDC();
m_pMetaDC->CreateEnhanced(GetDC(),NULL,NULL,"whatever");
//draw meta file
//do what ever you want to do: bitmaps, lines, text...
//close meta file dc and prepare for clipboard;
HENHMETAFILE hMF = m_pMetaDC->CloseEnhanced();
//copy to clipboard
OpenClipboard();
EmptyClipboard();
::SetClipboardData(CF_ENHMETAFILE,hMF);
CloseClipboard();

//DeleteMetaFile(hMF);
delete m_pMetaDC;

十八、剪切板上文本数据的传送把文本放置到剪接板上：

CString source;
//put your text in source
if(OpenClipboard())
{
    HGLOBAL clipbuffer;
    char * buffer;
    EmptyClipboard();
    clipbuffer = GlobalAlloc(GMEM_DDESHARE, source.GetLength()+1);
    buffer = (char*)GlobalLock(clipbuffer);
    strcpy(buffer, LPCSTR(source));
    GlobalUnlock(clipbuffer);
    SetClipboardData(CF_TEXT,clipbuffer);
    CloseClipboard();
}

//从剪接板上获取文本：

char * buffer;
if(OpenClipboard())
{
    buffer = (char*)GetClipboardData(CF_TEXT);
    //do something with buffer here
    //before it goes out of scope
}
CloseClipboard();

十九、将捕捉屏幕图像到剪切版中

void CShowBmpInDlgDlg::OnCutScreen()
{
    ShowWindow(SW_HIDE);
    RECT r_bmp={0,0,::GetSystemMetrics(SM_CXSCREEN),
        ::GetSystemMetrics(SM_CYSCREEN)};
    HBITMAP hBitmap;
    hBitmap=CopyScreenToBitmap(&r_bmp);
   
    //hWnd为程序窗口句柄
    if (OpenClipboard())
    {
        EmptyClipboard();
        SetClipboardData(CF_BITMAP, hBitmap);
        CloseClipboard();
    }
    ShowWindow(SW_SHOW);
}
HBITMAP CShowBmpInDlgDlg::CopyScreenToBitmap(LPRECT lpRect)
{
    //lpRect 代表选定区域
    {
        HDC hScrDC, hMemDC;
        // 屏幕和内存设备描述表
        HBITMAP hBitmap, hOldBitmap;
        // 位图句柄
        int nX, nY, nX2, nY2;
        // 选定区域坐标
        int nWidth, nHeight;
        // 位图宽度和高度
        int xScrn, yScrn;
        // 屏幕分辨率
       
        // 确保选定区域不为空矩形
        if (IsRectEmpty(lpRect))
            return NULL;
        //为屏幕创建设备描述表
        hScrDC = CreateDC("DISPLAY", NULL, NULL, NULL);
        //为屏幕设备描述表创建兼容的内存设备描述表
        hMemDC = CreateCompatibleDC(hScrDC);
        // 获得选定区域坐标
        nX = lpRect->left;
        nY = lpRect->top;
        nX2 = lpRect->right;
        nY2 = lpRect->bottom;
        // 获得屏幕分辨率
        xScrn = GetDeviceCaps(hScrDC, HORZRES);
        yScrn = GetDeviceCaps(hScrDC, VERTRES);
        //确保选定区域是可见的
        if (nX<0)
           
            nX = 0;
        if (nY<0)
            nY = 0;
        if (nX2>xScrn)
            nX2 = xScrn;
        if (nY2>yScrn)
            nY2 = yScrn;
        nWidth = nX2 - nX;
        nHeight = nY2 - nY;
        // 创建一个与屏幕设备描述表兼容的位图
        hBitmap = CreateCompatibleBitmap
            (hScrDC, nWidth, nHeight);
        // 把新位图选到内存设备描述表中
        hOldBitmap =(HBITMAP)SelectObject(hMemDC, hBitmap);
        // 把屏幕设备描述表拷贝到内存设备描述表中
        BitBlt(hMemDC, 0, 0, nWidth, nHeight, hScrDC, nX, nY, SRCCOPY);
        //得到屏幕位图的句柄
        hBitmap = (HBITMAP)SelectObject(hMemDC, hOldBitmap);
       
        //清除
        DeleteDC(hScrDC);
        DeleteDC(hMemDC);
        // 返回位图句柄
        return hBitmap;
    }
}

二十、如何将位图缩放显示在Static控件中

//在Staic控件内显示位图
void CShowBmpInDlgDlg::ShowBmpInStaic()
{
    CBitmap hbmp;
    HBITMAP hbitmap;
    //将pStatic指向要显示的地方
    CStatic *pStaic;
    pStaic=(CStatic*)GetDlgItem(IDC_IMAGE);
    //装载资源 MM.bmp是我的一个文件名，用你的替换
    hbitmap=(HBITMAP)::LoadImage (::AfxGetInstanceHandle(),"MM.bmp",
        IMAGE_BITMAP,0,0,LR_LOADFROMFILE|LR_CREATEDIBSECTION);
   
    hbmp.Attach(hbitmap);
    //获取图片格式
    BITMAP bm;
    hbmp.GetBitmap(&bm);
    CDC dcMem;
    dcMem.CreateCompatibleDC(GetDC());
    CBitmap *poldBitmap=(CBitmap*)dcMem.SelectObject(hbmp);
    CRect lRect;
    pStaic->GetClientRect(&lRect);
    //显示位图
    pStaic->GetDC()->StretchBlt(lRect.left ,lRect.top ,lRect.Width(),lRect.Height(),
        &dcMem,0 ,0,bm.bmWidth,bm.bmHeight,SRCCOPY);
    dcMem.SelectObject(&poldBitmap);
}