src/apps/mplayerc/ComPropertySheet.cpp

   1 /*
   2  *      Copyright (C) 2003-2006 Gabest
   3  *      http://www.gabest.org
   4  *
   5  *  This Program is free software; you can redistribute it and/or modify
   6  *  it under the terms of the GNU General Public License as published by
   7  *  the Free Software Foundation; either version 2, or (at your option)
   8  *  any later version.
   9  *
  10  *  This Program is distributed in the hope that it will be useful,
  11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  13  *  GNU General Public License for more details.
  14  *
  15  *  You should have received a copy of the GNU General Public License
  16  *  along with GNU Make; see the file COPYING.  If not, write to
  17  *  the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  18  *  http://www.gnu.org/copyleft/gpl.html
  19  *
  20  */
  21
  22 // ComPropertySheet.cpp : implementation file
  23 //
  24
  25 #include "stdafx.h"
  26 #include "mplayerc.h"
  27 #include "ComPropertySheet.h"
  28 #include "..\..\DSUtil\DSUtil.h"
  29 #include "..\..\filters\InternalPropertyPage.h"
  30
  31 // CComPropertyPageSite
  32
  33 class CComPropertyPageSite : public CUnknown, public IPropertyPageSite
  34 {
  35         IComPropertyPageDirty* m_pPPD;
  36
  37 public:
  38         CComPropertyPageSite(IComPropertyPageDirty* pPPD) : CUnknown(NAME("CComPropertyPageSite"), NULL), m_pPPD(pPPD) {}
  39
  40         DECLARE_IUNKNOWN
  41         STDMETHODIMP NonDelegatingQueryInterface(REFIID riid, void** ppv)
  42         {
  43                 return
  44                         QI(IPropertyPageSite)
  45                         __super::NonDelegatingQueryInterface(riid, ppv);
  46         }
  47
  48         // IPropertyPageSite
  49         STDMETHODIMP OnStatusChange(DWORD flags)
  50         {
  51                 if(m_pPPD)
  52                 {
  53                         if(flags&PROPPAGESTATUS_DIRTY) m_pPPD->OnSetDirty(true);
  54                         if(flags&PROPPAGESTATUS_CLEAN) m_pPPD->OnSetDirty(false);
  55                 }
  56                 return S_OK;
  57         }
  58         STDMETHODIMP GetLocaleID(LCID* pLocaleID)
  59         {
  60                 CheckPointer(pLocaleID, E_POINTER);
  61                 *pLocaleID = ::GetUserDefaultLCID();
  62                 return S_OK;
  63         }
  64         STDMETHODIMP GetPageContainer(IUnknown** ppUnk) {return E_NOTIMPL;}
  65         STDMETHODIMP TranslateAccelerator(LPMSG pMsg) {return E_NOTIMPL;}
  66 };
  67
  68 // CComPropertySheet
  69
  70 IMPLEMENT_DYNAMIC(CComPropertySheet, CPropertySheet)
  71 CComPropertySheet::CComPropertySheet(UINT nIDCaption, CWnd* pParentWnd, UINT iSelectPage)
  72         : CPropertySheet(nIDCaption, pParentWnd, iSelectPage)
  73 {
  74         m_pSite = new CComPropertyPageSite(this);
  75         m_size.SetSize(0, 0);
  76 }
  77
  78 CComPropertySheet::CComPropertySheet(LPCTSTR pszCaption, CWnd* pParentWnd, UINT iSelectPage)
  79         : CPropertySheet(pszCaption, pParentWnd, iSelectPage)
  80 {
  81         m_pSite = new CComPropertyPageSite(this);
  82         m_size.SetSize(0, 0);
  83 }
  84
  85 CComPropertySheet::~CComPropertySheet()
  86 {
  87 }
  88
  89 int CComPropertySheet::AddPages(CComPtr<ISpecifyPropertyPages> pSPP)
  90 {
  91         if(!pSPP) return(0);
  92
  93         CAUUID caGUID;
  94         caGUID.pElems = NULL;
  95         if(FAILED(pSPP->GetPages(&caGUID)))
  96                 return(0);
  97
  98         IUnknown* lpUnk = NULL;
  99         if(FAILED(pSPP.QueryInterface(&lpUnk)))
 100                 return(0);
 101
 102         m_spp.AddTail(pSPP);
 103
 104         CComQIPtr<ISpecifyPropertyPages2> pSPP2 = pSPP;
 105         CComQIPtr<IPersist> pPersist = pSPP;
 106
 107         ULONG nPages = 0;
 108         for(ULONG i = 0; i < caGUID.cElems; i++)
 109         {
 110                 CComPtr<IPropertyPage> pPage;
 111
 112                 HRESULT hr = E_FAIL;
 113
 114                 if(FAILED(hr) && !pPage && pSPP2)
 115                 {
 116                         hr = pSPP2->CreatePage(caGUID.pElems[i], &pPage);
 117                 }
 118
 119                 if(FAILED(hr) && !pPage)
 120                 {
 121                         hr = pPage.CoCreateInstance(caGUID.pElems[i]);
 122                 }
 123
 124                 if(FAILED(hr) && !pPage && pPersist)
 125                 {
 126                         hr = LoadExternalPropertyPage(pPersist, caGUID.pElems[i], &pPage);
 127                 }
 128
 129                 if(SUCCEEDED(hr))
 130                 {
 131                         if(AddPage(pPage, lpUnk))
 132                                 nPages++;
 133                 }
 134         }
 135
 136         if(caGUID.pElems) CoTaskMemFree(caGUID.pElems);
 137         lpUnk->Release();
 138
 139         return(nPages);
 140 }
 141
 142 bool CComPropertySheet::AddPage(IPropertyPage* pPage, IUnknown* pUnk)
 143 {
 144         if(!pPage || !pUnk) return false;
 145
 146         HRESULT hr;
 147         hr = pPage->SetPageSite(m_pSite);
 148         hr = pPage->SetObjects(1, &pUnk);
 149         PROPPAGEINFO ppi;
 150         hr = pPage->GetPageInfo(&ppi);
 151         m_size.cx = max(m_size.cx, ppi.size.cx);
 152         m_size.cy = max(m_size.cy, ppi.size.cy);
 153         CAutoPtr<CComPropertyPage> p(new CComPropertyPage(pPage));
 154         __super::AddPage(p);
 155         m_pages.AddTail(p);
 156
 157         return true;
 158 }
 159
 160 void CComPropertySheet::OnActivated(CPropertyPage* pPage)
 161 {
 162         if(!pPage) return;
 163
 164         CRect bounds(30000,30000,-30000,-30000);
 165
 166         CRect wr, cr;
 167         GetWindowRect(wr);
 168         GetClientRect(cr);
 169         CSize ws = wr.Size(), cs = cr.Size();
 170
 171         CRect twr, tcr;
 172         CTabCtrl* pTC = (CTabCtrl*)GetDlgItem(AFX_IDC_TAB_CONTROL);
 173         pTC->GetWindowRect(twr);
 174         pTC->GetClientRect(tcr);
 175         CSize tws = twr.Size(), tcs = tcr.Size();
 176
 177         if(CWnd* pChild = pPage->GetWindow(GW_CHILD))
 178         {
 179                 pChild->ModifyStyle(WS_CAPTION|WS_THICKFRAME, 0);
 180                 pChild->ModifyStyleEx(WS_EX_DLGMODALFRAME, WS_EX_CONTROLPARENT);
 181
 182                 for(CWnd* pGrandChild = pChild->GetWindow(GW_CHILD); pGrandChild; pGrandChild = pGrandChild->GetNextWindow())
 183                 {
 184                         if(!(pGrandChild->GetStyle()&WS_VISIBLE)) continue;
 185
 186                         CRect r;
 187                         pGrandChild->GetWindowRect(&r);
 188                         pChild->ScreenToClient(r);
 189                         bounds |= r;
 190                 }
 191         }
 192
 193         bounds |= CRect(0,0,0,0);
 194         bounds.SetRect(0, 0, bounds.right + max(bounds.left, 4), bounds.bottom + max(bounds.top, 4));
 195
 196         CRect r = CRect(CPoint(0,0), bounds.Size());
 197         pTC->AdjustRect(TRUE, r);
 198         r.SetRect(twr.TopLeft(), twr.TopLeft() + r.Size());
 199         ScreenToClient(r);
 200         pTC->MoveWindow(r);
 201         pTC->ModifyStyle(TCS_MULTILINE, TCS_SINGLELINE);
 202
 203         CSize diff = r.Size() - tws;
 204
 205         if(!bounds.IsRectEmpty())
 206         {
 207                 if(CWnd* pChild = pPage->GetWindow(GW_CHILD))
 208                         pChild->MoveWindow(bounds);
 209                 CRect r = twr;
 210                 pTC->AdjustRect(FALSE, r);
 211                 ScreenToClient(r);
 212                 pPage->MoveWindow(CRect(r.TopLeft(), bounds.Size()));
 213         }
 214
 215         int _afxPropSheetButtons[] = { IDOK, IDCANCEL, ID_APPLY_NOW, IDHELP };
 216         for(int i = 0; i < countof(_afxPropSheetButtons); i++)
 217         {
 218                 if(CWnd* pWnd = GetDlgItem(_afxPropSheetButtons[i]))
 219                 {
 220                         pWnd->GetWindowRect(r);
 221                         ScreenToClient(r);
 222                         pWnd->MoveWindow(CRect(r.TopLeft() + diff, r.Size()));
 223                 }
 224         }
 225
 226         MoveWindow(CRect(wr.TopLeft(), ws + diff));
 227
 228         Invalidate();
 229 }
 230
 231
 232 BEGIN_MESSAGE_MAP(CComPropertySheet, CPropertySheet)
 233 END_MESSAGE_MAP()
 234
 235
 236 // CComPropertySheet message handlers
 237
 238 BOOL CComPropertySheet::OnInitDialog()
 239 {
 240         BOOL bResult = (BOOL)Default();//CPropertySheet::OnInitDialog();
 241
 242         if (!(GetStyle() & WS_CHILD))
 243                 CenterWindow();
 244
 245         return bResult;
 246 }