ATL / WTL / STL

<br />
class CAtlButton :<br />
    public CTimer<CAtlButton, IAtlButton, &__uuidof(IAtlButton)>, //используется как таймер<br />
    public CComControl<CAtlButton>,<br />
    public CStockPropImpl<CAtlButton, IAtlButton, &__uuidof(IAtlButton), &CAtlModule::m_libid>,<br />
    public ISpecifyPropertyPagesImpl<CAtlButton>,<br />
    public IPersistStreamInitImpl<CAtlButton>,         //??<br />
    public IOleControlImpl<CAtlButton>,<br />
    public IOleObjectImpl<CAtlButton>,<br />
    public IOleInPlaceActiveObjectImpl<CAtlButton>,<br />
    public IViewObjectExImpl<CAtlButton>,<br />
    public IOleInPlaceObjectWindowlessImpl<CAtlButton>,<br />
    public IPersistPropertyBagImpl<CAtlButton>,         //??<br />
    public IPersistStorageImpl<CAtlButton>,         //??<br />
    public IQuickActivateImpl<CAtlButton>,<br />
    public IDataObjectImpl<CAtlButton>,         //??<br />
    public IObjectSafetyImpl<CAtlButton, INTERFACESAFE_FOR_UNTRUSTED_CALLER>         //??<br />
    ,public IPerPropertyBrowsingImpl <CAtlButton>          //??<br />

<br />
       CBPReportCntrItem		*pItem	= NULL;<br />
	CBPReportDoc			*pDoc	= NULL;<br />
	CLSID					clsid;<br />
	TRY<br />
	{<br />
	//Get the document associated with this view, and be sure it's<br />
        //valid.<br />
		pDoc = GetDocument();<br />
        ASSERT_VALID(pDoc);<br />
<br />
		//Create a new item associated with this document, and be sure<br />
        //it's valid.<br />
        pItem = new CBPReportCntrItem(pDoc);<br />
        ASSERT_VALID(pItem);<br />
<br />
		// Get Class ID for Excel sheet.<br />
        // This is used in creation.<br />
        if(FAILED(::CLSIDFromProgID(L"Excel.sheet",&clsid)))<br />
		{<br />
			AfxMessageBox("Failed to create Excel.sheet");<br />
			//Any exception will do. We just need to break out of the<br />
			//TRY statement.<br />
			AfxThrowMemoryException();<br />
		}<br />
<br />
		// Create the Excel embedded item.<br />
        if(!pItem->CreateNewItem(clsid))<br />
		{<br />
			AfxMessageBox("Failed to create the excel embeded item");<br />
			//Any exception will do. We just need to break out of the<br />
			//TRY statement.<br />
			AfxThrowMemoryException();<br />
		}<br />
<br />
        //Make sure the new CContainerItem is valid.<br />
        ASSERT_VALID(pItem);<br />
<br />
		// Launch the server to edit the item.<br />
        pItem->DoVerb(OLEIVERB_SHOW, this);<br />
<br />
		// As an arbitrary user interface design, this sets the<br />
        // selection to the last item inserted.<br />
        m_pSelection = pItem;   // set selection to last inserted item<br />
        pDoc->UpdateAllViews(NULL);<br />
	<br />
		//Query for the dispatch pointer for the embedded object. In<br />
        //this case, this is the Excel worksheet.<br />
        lpDisp = pItem->GetIDispatch();<br />
<br />
	app.AttachDispatch(lpDisp, TRUE);<br />
        	<br />

<br />
                cbPop.AttachDispatch(app.DetachDispatch(), TRUE);<br />
		//cbPop.SetEnabled(FALSE);<br />
		cbPop.SetVisible(FALSE);<br />