CDemoDoc* pDoc = GetDocument(); CPanCtRgn* pRgn = pDoc->GetCurrRgn(); if (pRgn != NULL) { BOOL fClose = TRUE; HWND hCtl = pRgn->GetCtlHandle(); if (hCtl != 0) { DWORD status = PAN_CTLSTATUSIDLE; ::SendMessage(hCtl, PM_CTLGETSTATUS, 0, (LPARAM) &status); ::SendMessage(hCtl, PM_CTLDESTROY, 0, 0); if (status != PAN_CTLSTATUSIDLE) { fClose = FALSE; PostMessage(WM_NULL, 0, 0); PostMessage(WM_NULL, 0, 0); PostMessage(WM_NULL, 0, 0); PostMessage(WM_NULL, 0, 0); PostMessage(WM_COMMAND, ID_FILE_DESTROYCONTROL, 0); } } if (fClose) { pDoc->Delete(pRgn); } }

这段代码的作用是在关闭窗口时销毁控件对象。首先，它获取了当前文档对象（pDoc）和当前区域对象（pRgn）。然后，它检查当前区域对象是否存在。如果存在，它会继续执行以下操作：

1. 获取控件句柄（hCtl）。
2. 如果控件句柄不为0，则发送消息（PM_CTLGETSTATUS）以获取控件状态（status）。
3. 如果控件状态不为PAN_CTLSTATUSIDLE，则设置fClose为FALSE，表示不关闭窗口。
4. 发送多个WM_NULL消息和一个WM_COMMAND消息来销毁控件对象。
5. 如果fClose为TRUE，则调用文档对象的Delete方法删除当前区域对象。

简而言之，这段代码的目的是在关闭窗口时销毁当前区域的控件对象，如果控件状态不是空闲状态，则需要发送一些消息来确保控件被销毁。最后，如果需要关闭窗口，则删除当前区域对象。

相关问题

void CMainFrame::OnSetFocus(CWnd *pOldWnd) { // Set focus to the active control CMDIChildWnd* pMDIChildWnd = MDIGetActive(); if (pMDIChildWnd != NULL) { CView* pView = pMDIChildWnd->GetActiveView(); if (pView != NULL) { CDemoDoc* pDoc = (CDemoDoc *)pView->GetDocument(); if (pDoc != NULL ) { CPanCtRgn* pRgn = pDoc->GetCurrRgn(); if( pRgn != NULL ) { pDoc->Select( pRgn ); } } } } }

这段代码是在应用程序的主窗口类 `CMainFrame` 中的 `OnSetFocus` 函数中执行的。让我逐行解释：

- `CMDIChildWnd* pMDIChildWnd = MDIGetActive();`：获取当前活动的 MDI 子窗口。

- `if (pMDIChildWnd != NULL)`：如果有活动的 MDI 子窗口，则继续执行下面的代码块。

- `CView* pView = pMDIChildWnd->GetActiveView();`：获取当前活动的子窗口的视图对象。

- `if (pView != NULL)`：如果获取到有效的视图对象，则继续执行下面的代码块。

- `CDemoDoc* pDoc = (CDemoDoc *)pView->GetDocument();`：获取视图对象所属的文档对象。

- `if (pDoc != NULL)`：如果获取到有效的文档对象，则继续执行下面的代码块。

- `CPanCtRgn* pRgn = pDoc->GetCurrRgn();`：获取文档对象中当前区域对象。

- `if( pRgn != NULL )`：如果获取到有效的区域对象，则继续执行下面的代码块。

- `pDoc->Select( pRgn );`：调用文档对象的 `Select` 函数，将当前区域设置为选中状态。

该代码的目的是在主窗口获得焦点时，将焦点设置到当前活动子窗口视图中的指定区域，并将其选中。具体来说，它通过获取当前活动子窗口的视图对象和文档对象，获取文档对象中的当前区域对象，然后将该区域设置为选中状态。这可能是应用程序中的一种自定义行为，根据具体需求来设置焦点和选中区域。

void CDemoView::OnFileCreateCtl() { CDemoDoc* pDoc = GetDocument(); if (pDoc->GetCurrRgn() == NULL) { CRect rect(50, 50, 200, 200); CPanCtRgn *pRgn; // Create new region. TRY { pRgn = new CPanCtRgn(this, pDoc->GetCtrlID(), &rect); } CATCH(CMemoryException, memEx) { AfxMessageBox("Out of Memory"); return; } END_CATCH CObList* pList = pDoc->GetPanRgnList(); if (pList != NULL) { // Add region to list. pList->AddHead(pRgn); // Select new region. pDoc->Select(pRgn); } } }

这是一个在 "Create Control" 命令被触发时被调用的函数，用于创建一个新的控件区域。

首先，它获取文档对象的指针 `pDoc`，然后检查当前区域是否为NULL。如果当前区域为NULL，则进入条件语句。

在条件语句中，首先创建一个矩形区域 `rect`，表示新控件的位置和大小。然后，通过使用 `new` 运算符创建一个新的 `CPanCtRgn` 控件区域对象，并传递当前视图对象、控件ID和矩形参数。

接下来，通过异常处理机制（TRY-CATCH）检查内存分配是否成功。如果分配失败，则弹出一个消息框显示 "Out of Memory"，并返回。

如果内存分配成功，获取文档对象中的控件区域列表 `pList`。如果列表不为空，则将新的控件区域添加到列表的头部，并通过 `Select()` 函数选中新创建的区域。

总之，这个函数的作用是创建一个新的控件区域，并将其添加到文档对象的控件区域列表中，并选中新创建的区域。