CFolderDialog - Selecting Folders

// FolderDialogDemoDlg.cpp : implementation file
//

#include "stdafx.h"
#include "FolderDialogDemo.h"
#include "FolderDialogDemoDlg.h"

#ifdef _DEBUG
	#define new DEBUG_NEW
	#undef THIS_FILE
	static char THIS_FILE[] = __FILE__;
#endif

#ifndef __FOLDERDLG_H__
	#include "FolderDlg.h"
#endif

/////////////////////////////////////////////////////////////////////////////
// CFolderDialogDemoDlg dialog

CFolderDialogDemoDlg::CFolderDialogDemoDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CFolderDialogDemoDlg::IDD, pParent)
	, m_strFolderPath( _T( "" ) )
	, m_strFolderName( _T( "" ) )
{
	//{{AFX_DATA_INIT(CFolderDialogDemoDlg)		
	//}}AFX_DATA_INIT

	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CFolderDialogDemoDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CFolderDialogDemoDlg)
	DDX_Control(pDX, IDC_PIC_FOLDER, m_wndIcon);
	DDX_Control(pDX, IDC_LNK_MAIL, m_wndLink);
	DDX_Text(pDX, IDC_TXT_FOLDERDISPNAME, m_strFolderName);
	DDV_MaxChars(pDX, m_strFolderName, MAX_PATH);
	DDX_Text(pDX, IDC_TXT_FOLDERPATH, m_strFolderPath);
	DDV_MaxChars(pDX, m_strFolderPath, MAX_PATH);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CFolderDialogDemoDlg, CDialog)
	//{{AFX_MSG_MAP(CFolderDialogDemoDlg)	
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()	
	ON_BN_CLICKED(IDC_CMD_BROWSE, OnCmdBrowse)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CFolderDialogDemoDlg message handlers

BOOL CFolderDialogDemoDlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	// Set the icon for this dialog.  The framework does this automatically
	//  when the application's main window is not a dialog
	SetIcon(m_hIcon, TRUE);			// Set big icon
	SetIcon(m_hIcon, FALSE);		// Set small icon
	
	// TODO: Add extra initialization here
	
	m_wndLink.SetURL( _T( "mailto:armenh@web.am" ) );

	return TRUE;  // return TRUE  unless you set the focus to a control
}


// If you add a minimize button to your dialog, you will need the code below
//  to draw the icon.  For MFC applications using the document/view model,
//  this is automatically done for you by the framework.

void CFolderDialogDemoDlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // device context for painting

		SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);

		// Center icon in client rectangle
		int cxIcon = GetSystemMetrics(SM_CXICON);
		int cyIcon = GetSystemMetrics(SM_CYICON);
		CRect rect;
		GetClientRect(&rect);
		int x = (rect.Width() - cxIcon + 1) / 2;
		int y = (rect.Height() - cyIcon + 1) / 2;

		// Draw the icon
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}

// The system calls this to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR CFolderDialogDemoDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

void CFolderDialogDemoDlg::OnCmdBrowse() 
{
	UpdateData();
	
	CFolderDialog dlg( _T( "Select the folder you like best of all:" ), 
		m_strFolderPath, this, BIF_RETURNONLYFSDIRS | BIF_USENEWUI
	);
	 
	if( dlg.DoModal() == IDOK )
	{
		m_strFolderName = dlg.GetFolderName();
		m_strFolderPath = dlg.GetFolderPath();		
		UpdateData( FALSE );
				 
		SHFILEINFO  shfi = { 0 };
		HIMAGELIST  hIml = (HIMAGELIST)::SHGetFileInfo( m_strFolderPath, 0, 
			&shfi, sizeof( SHFILEINFO ), SHGFI_SYSICONINDEX
		);
		
		if( hIml != NULL )
		{
			VERIFY( ::DestroyIcon( m_wndIcon.SetIcon( 
				::ImageList_ExtractIcon( AfxGetResourceHandle(), hIml, shfi.iIcon ) ) )
			);
		}
	}	
}