Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

309 lines
8.8 KiB

//+-------------------------------------------------------------------------
//
// Microsoft Windows
//
// Copyright (C) Microsoft Corporation, 1999 - 1999
//
// File: about.cpp
//
//--------------------------------------------------------------------------
#include "stdafx.h"
#include "about.h"
#include "bitmap.h"
#define EDIT_CONTROL_CRLF _T("\r\r\n")
//
// This file implements the About Properties used by the snap-in manager
//
CSnapinAbout::CSnapinAbout()
{
TRACE_METHOD(CSnapinAbout, CSnapinAbout);
CommonContruct();
}
void CSnapinAbout::CommonContruct()
{
m_bBasicInfo = FALSE;
m_bFullInfo = FALSE;
m_cMask = RGB(0,0,0);
m_hrObjectStatus = S_OK;
}
BOOL CSnapinAbout::GetInformation(CLSID& clsid, int nType)
{
TRACE_METHOD(CSnapinAbout, GetInformation);
if (m_bFullInfo == TRUE || m_bBasicInfo == TRUE)
{
TRACE(_T("Destroying old Snapin information\n"));
// Preserve the snapin name, it can't be reloaded from
// the snapin ISnapinAbout interface
LPOLESTR strTemp = m_lpszSnapinName.Detach();
CSnapinAbout::~CSnapinAbout();
m_lpszSnapinName.Attach(strTemp);
}
m_bFullInfo = m_bBasicInfo = FALSE;
// Create the interface and get the snap-in information
ISnapinAboutPtr spAboutInfo;
m_hrObjectStatus = spAboutInfo.CreateInstance(clsid, NULL, MMC_CLSCTX_INPROC);
if (FAILED(m_hrObjectStatus))
return FALSE;
// Basic info (required to display snapin node)
HBITMAP hbmSmallImage;
HBITMAP hbmSmallImageOpen;
HBITMAP hbmLargeImage;
if (SUCCEEDED(spAboutInfo->GetStaticFolderImage (&hbmSmallImage,
&hbmSmallImageOpen,
&hbmLargeImage,
&m_cMask)))
{
/*
* Bug 249817: The bitmaps are out parameters, so the caller (MMC)
* should own them and be responsible for destroying them.
* Unfortunately, the docs for ISnapinAbout::GetStaticFolderImage
* specifically instruct the snap-in to destroy them when the
* ISnapinAbout interface is released. We have to make copies instead.
*/
m_SmallImage = CopyBitmap (hbmSmallImage);
m_SmallImageOpen = CopyBitmap (hbmSmallImageOpen);
m_LargeImage = CopyBitmap (hbmLargeImage);
}
m_bBasicInfo = TRUE;
if (nType == BASIC_INFO)
return TRUE;
// Full information (required for About box)
HICON hTemp;
/*
* Bug 249817: The icon is an out parameter, so the caller (MMC)
* should own it and be responsible for destroying it.
* Unfortunately, the docs for ISnapinAbout::GetSnapinImage
* specifically instruct the snap-in to destroy it when the
* ISnapinAbout interface is released. We have to make a copy instead.
*/
if (SUCCEEDED(spAboutInfo->GetSnapinImage(&hTemp)))
m_AppIcon.Attach(CopyIcon(hTemp));
LPOLESTR strTemp;
if (SUCCEEDED(spAboutInfo->GetSnapinDescription(&strTemp)))
m_lpszDescription.Attach(strTemp);
if (SUCCEEDED(spAboutInfo->GetProvider(&strTemp)))
m_lpszCompanyName.Attach(strTemp);
if (SUCCEEDED(spAboutInfo->GetSnapinVersion(&strTemp)))
m_lpszVersion.Attach(strTemp);
m_bFullInfo = TRUE;
return TRUE;
}
void CSnapinAbout::ShowAboutBox()
{
TRACE_METHOD(CSnapinAbout, Show);
CSnapinAboutDialog dlg(this);
dlg.DoModal();
}
/////////////////////////////////////////////////////////////////////////////
// CSnapinAboutPage message handlers
LRESULT CSnapinAboutDialog::OnInitDialog(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL& bHandled)
{
// hook up controls
DECLARE_SC(sc, TEXT("CSnapinAboutDialog::OnInitDialog"));
sc = ScCheckPointers(m_pAboutInfo, E_UNEXPECTED);
if (sc)
return TRUE;
// Title should be set "About <SnapinName>"
// Raid# 661363: This does not work for some languages
// where the <SnapinName> needs to appear after the equivalent
// for "About". The fix is to obtain the title not by concatenation
// but by string construction using the IDS_ABOUT resource as
// a format specifier. For English, for example, the format
// specifier is "About %s"
// Format Specifier
tstring szfmtAbout;
bool bRet = szfmtAbout.LoadString(GetStringModule(), IDS_ABOUT);
if (!bRet)
return TRUE;
USES_CONVERSION;
// <Snapin Name>
tstring szSnapin;
LPCOLESTR lpszSnapinName = m_pAboutInfo->GetSnapinName();
if (lpszSnapinName)
{
szSnapin = OLE2CT(lpszSnapinName);
}
else
{
bRet = szSnapin.LoadString(GetStringModule(), IDS_SNAPINSTR);
if (!bRet)
return TRUE;
}
// Construct the title
WTL::CString szTitle;
szTitle.Format (szfmtAbout.data(), szSnapin.data());
SetWindowText(szTitle);
HWND hwndSnapinInfo = ::GetDlgItem(*this, IDC_SNAPIN_INFO);
sc = ScCheckPointers(hwndSnapinInfo, E_UNEXPECTED);
if (sc)
return TRUE;
m_SnapinInfo.Attach(hwndSnapinInfo);
if (lpszSnapinName)
{
m_SnapinInfo.AppendText(OLE2CT(lpszSnapinName));
m_SnapinInfo.AppendText(EDIT_CONTROL_CRLF);
}
LPCOLESTR lpszCompanyName = m_pAboutInfo->GetCompanyName();
if (lpszCompanyName)
{
m_SnapinInfo.AppendText(OLE2CT(lpszCompanyName));
m_SnapinInfo.AppendText(EDIT_CONTROL_CRLF);
}
LPCOLESTR lpszVersion = m_pAboutInfo->GetVersion();
if (lpszVersion)
{
tstring szVersion;
bRet = szVersion.LoadString(GetStringModule(), IDS_VERSION);
if (!bRet)
return TRUE;
m_SnapinInfo.AppendText(szVersion.data());
m_SnapinInfo.AppendText(OLE2CT(lpszVersion));
}
HWND hwndSnapinDesc = ::GetDlgItem(*this, IDC_SNAPIN_DESC);
sc = ScCheckPointers(hwndSnapinDesc, E_UNEXPECTED);
if (sc)
return TRUE;
m_SnapinDesc.Attach(hwndSnapinDesc);
LPCOLESTR lpszDescription = m_pAboutInfo->GetDescription();
sc = ScSetDescriptionUIText(m_SnapinDesc, lpszDescription ? OLE2CT(lpszDescription) : _T(""));
if (sc)
return TRUE;
// App icon
HICON hAppIcon = m_pAboutInfo->GetSnapinIcon();
if (hAppIcon)
{
HWND const icon = ::GetDlgItem(*this, IDC_APPICON);
ASSERT(icon != NULL);
m_hIcon.Attach(icon);
m_hIcon.SetIcon(hAppIcon);
}
return TRUE;
}
LRESULT
CSnapinAboutDialog::OnOK(WORD wNotifyCode, WORD wID, HWND hWndCtl, BOOL& bHandled)
{
EndDialog(IDOK);
return TRUE;
}
LRESULT
CSnapinAboutDialog::OnCancel(WORD wNotifyCode, WORD wID, HWND hWndCtl, BOOL& bHandled)
{
EndDialog(IDCANCEL);
return FALSE;
}
//+-------------------------------------------------------------------
//
// Member: ScSetDescriptionUIText
//
// Synopsis: Given a edit control window & description text. Insert
// the text into the control and enable scrollbar if needed.
//
// Arguments: [hwndSnapinDescEdit] - The edit control window handle.
// [lpszDescription] - The description text (cant be NULL).
//
// Returns: SC
//
//--------------------------------------------------------------------
SC ScSetDescriptionUIText(HWND hwndSnapinDescEdit, LPCTSTR lpszDescription)
{
DECLARE_SC(sc, TEXT("ScSetDescriptionUIText"));
sc = ScCheckPointers(hwndSnapinDescEdit, lpszDescription);
if (sc)
return sc;
// 1. Attach the window to WTL::CEdit object.
WTL::CEdit wndsnapinDesc(hwndSnapinDescEdit);
// 2. Insert the text into the window.
wndsnapinDesc.SetWindowText(lpszDescription);
/*
* 3. The description control may need scroll bar.
* This is determined below, if ( (# of lines * height of one line) > rectangle-height).
*/
// 3a) turn-off scroll & do the calculation, so that scroll-bar width does not
// modify linecount below.
wndsnapinDesc.ShowScrollBar(SB_VERT, FALSE);
WTL::CDC dc(wndsnapinDesc.GetWindowDC());
if (dc.IsNull())
return (sc = E_UNEXPECTED);
TEXTMETRIC tm;
// 3b) Calculate height of a single line.
HFONT hOldFont = dc.SelectFont(wndsnapinDesc.GetFont());
dc.GetTextMetrics(&tm);
int cyLineHeight = tm.tmHeight + tm.tmExternalLeading;
// 3c) Calculate edit box dimensions in logical units.
WTL::CRect rect;
wndsnapinDesc.GetRect(&rect);
dc.DPtoLP(&rect);
int nLines = wndsnapinDesc.GetLineCount();
// 3d) If the total text height exceeds edit box height so turn on scroll.
if ( (nLines * cyLineHeight) > rect.Height())
wndsnapinDesc.ShowScrollBar(SB_VERT, TRUE);
dc.SelectFont(hOldFont);
wndsnapinDesc.SetSel(0, 0);
return sc;
}