750 lines
30 KiB
C++
750 lines
30 KiB
C++
|
//
|
||
|
|
// BrowseDir.cpp
|
||
|
|
//
|
||
|
|
// Functionality for the "Browse Directory" dialog.
|
||
|
|
// Requires dialog resource IDD_BROWSEDIRECTORY.
|
||
|
|
//
|
||
|
|
// History:
|
||
|
|
//
|
||
|
|
// 10/04/95 KenSh Created
|
||
|
|
// 10/09/95 KenSh Fixed bugs, removed globals and statics
|
||
|
|
//
|
||
|
|
|
||
|
|
#include "stdafx.h"
|
||
|
|
#include <dlgs.h>
|
||
|
|
#include <direct.h>
|
||
|
|
|
||
|
|
//*** Custom window messages
|
||
|
|
//
|
||
|
|
#define CM_UPDATEEDIT (WM_USER + 42) // Update text in the edit (sent to the dialog)
|
||
|
|
|
||
|
|
//*** Dialog control IDs
|
||
|
|
//
|
||
|
|
#define IDC_FILENAME edt1 // Edit box w/ current directory
|
||
|
|
#define IDC_FILELIST lst2 // Listbox with current directory hierarchy
|
||
|
|
#define IDC_DRIVECOMBO cmb2 // Combo-box with current drive
|
||
|
|
#define IDC_NETWORK psh14 // Network button (added at runtime)
|
||
|
|
|
||
|
|
//*** Window property names
|
||
|
|
//
|
||
|
|
const TCHAR c_szOFNProp[] = _T("OFNStruct");
|
||
|
|
const TCHAR c_szRedrawProp[] = _T("Redraw");
|
||
|
|
|
||
|
|
//*** Globals
|
||
|
|
//
|
||
|
|
// Note: Use of thse globals assumes that any multiple threads using
|
||
|
|
// our subclass at the same time always have the same original edit/
|
||
|
|
// combo window procs. I think this is true.
|
||
|
|
//
|
||
|
|
WNDPROC g_pfnPrevEditProc; // original edit proc (before subclass)
|
||
|
|
WNDPROC g_pfnPrevComboProc; // original combo proc (before subclass)
|
||
|
|
|
||
|
|
//*** Local function declarations
|
||
|
|
//
|
||
|
|
BOOL CALLBACK BrowseDirDlgHook( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam );
|
||
|
|
BOOL BrowseDir_OnOK( HWND hwnd );
|
||
|
|
|
||
|
|
// This struct is used internally and kept as a window property,
|
||
|
|
// in lieu of using static variables or MFC.
|
||
|
|
typedef struct _OFNINFO
|
||
|
|
{
|
||
|
|
OPENFILENAME ofn; // OFN struct passed to GetOpenFileName
|
||
|
|
TCHAR szLastDirName[_MAX_PATH]; // last known good directory
|
||
|
|
BOOL fAllowSetText; // should we allow WM_SETTEXT for the Edit
|
||
|
|
// BOOL fNetworking; // is Connect Network Drive dialog open
|
||
|
|
} OFNINFO, *LPOFNINFO;
|
||
|
|
|
||
|
|
|
||
|
|
//----------------------------------------------------------------------------
|
||
|
|
// Procedure BrowseForDirectory
|
||
|
|
//
|
||
|
|
// Purpose Displays a dialog that lets the user choose a directory
|
||
|
|
// name, either local or UNC.
|
||
|
|
//
|
||
|
|
// Parameters hwndParent Parent window for the dialog
|
||
|
|
// pszInitialDir Directory to use as the default
|
||
|
|
// pszBuf Where to store the answer
|
||
|
|
// cchBuf Number of characters in this buffer
|
||
|
|
// pszDialogTitle Title for the dialog
|
||
|
|
//
|
||
|
|
// Returns nonzero if successful, zero if not. If successful, pszBuf
|
||
|
|
// will be filled with the full pathname of the chosen directory.
|
||
|
|
//
|
||
|
|
// History 10/06/95 KenSh Created
|
||
|
|
// 10/09/95 KenSh Use lCustData member instead of global
|
||
|
|
//
|
||
|
|
|
||
|
|
CString strSelectDir;
|
||
|
|
|
||
|
|
BOOL BrowseForDirectory(
|
||
|
|
HWND hwndParent,
|
||
|
|
LPCTSTR pszInitialDir,
|
||
|
|
LPTSTR pszBuf,
|
||
|
|
int cchBuf,
|
||
|
|
LPCTSTR pszDialogTitle,
|
||
|
|
BOOL bRemoveTrailingBackslash )
|
||
|
|
{
|
||
|
|
TCHAR szInitialDir[MAX_PATH];
|
||
|
|
OFNINFO ofnInfo;
|
||
|
|
|
||
|
|
pszBuf[0] = _T('\0');
|
||
|
|
|
||
|
|
// Prepare the initial directory... add a backslash if it's
|
||
|
|
// a 2-character path
|
||
|
|
_tcscpy( szInitialDir, pszInitialDir );
|
||
|
|
if( !szInitialDir[2] )
|
||
|
|
{
|
||
|
|
szInitialDir[2] = _T('\\');
|
||
|
|
szInitialDir[3] = _T('\0');
|
||
|
|
}
|
||
|
|
|
||
|
|
if( pszDialogTitle )
|
||
|
|
{
|
||
|
|
ofnInfo.ofn.lpstrTitle = pszDialogTitle;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
MyLoadString( IDS_SELECT_DIR, strSelectDir );
|
||
|
|
|
||
|
|
ofnInfo.ofn.lpstrTitle = (LPCTSTR)strSelectDir;
|
||
|
|
}
|
||
|
|
|
||
|
|
ofnInfo.ofn.lStructSize = sizeof(OPENFILENAME);
|
||
|
|
ofnInfo.ofn.hwndOwner = hwndParent;
|
||
|
|
ofnInfo.ofn.hInstance = (HINSTANCE) g_MyModuleHandle;
|
||
|
|
ofnInfo.ofn.lpstrFilter = NULL;
|
||
|
|
ofnInfo.ofn.lpstrCustomFilter = NULL;
|
||
|
|
ofnInfo.ofn.nMaxCustFilter = 0;
|
||
|
|
ofnInfo.ofn.nFilterIndex = 0;
|
||
|
|
ofnInfo.ofn.lpstrFile = pszBuf;
|
||
|
|
ofnInfo.ofn.nMaxFile = cchBuf;
|
||
|
|
ofnInfo.ofn.lpstrFileTitle = NULL;
|
||
|
|
ofnInfo.ofn.nMaxFileTitle = 0;
|
||
|
|
ofnInfo.ofn.lpstrInitialDir = szInitialDir;
|
||
|
|
ofnInfo.ofn.nFileOffset = 0;
|
||
|
|
ofnInfo.ofn.nFileExtension = 0;
|
||
|
|
ofnInfo.ofn.lpstrDefExt = NULL;
|
||
|
|
ofnInfo.ofn.lCustData = (LPARAM)&ofnInfo;
|
||
|
|
ofnInfo.ofn.lpfnHook = (LPOFNHOOKPROC)BrowseDirDlgHook;
|
||
|
|
ofnInfo.ofn.lpTemplateName = MAKEINTRESOURCE( IDD_BROWSEDIRECTORY );
|
||
|
|
ofnInfo.ofn.Flags = OFN_ENABLEHOOK | OFN_PATHMUSTEXIST |
|
||
|
|
OFN_NONETWORKBUTTON | OFN_ENABLETEMPLATE |
|
||
|
|
OFN_HIDEREADONLY;
|
||
|
|
|
||
|
|
iisDebugOut((LOG_TYPE_TRACE_WIN32_API, _T("comdlg32:GetOpenFileName().Start.")));
|
||
|
|
int nResult = ::GetOpenFileName( &ofnInfo.ofn );
|
||
|
|
iisDebugOut((LOG_TYPE_TRACE_WIN32_API, _T("comdlg32:GetOpenFileName().End.")));
|
||
|
|
|
||
|
|
DWORD dw = 0;
|
||
|
|
if (nResult == 0)
|
||
|
|
{
|
||
|
|
iisDebugOut((LOG_TYPE_TRACE_WIN32_API, _T("comdlg32:CommDlgExtendedError().Start.")));
|
||
|
|
dw = CommDlgExtendedError();
|
||
|
|
iisDebugOut((LOG_TYPE_TRACE_WIN32_API, _T("comdlg32:CommDlgExtendedError().End.")));
|
||
|
|
}
|
||
|
|
|
||
|
|
return (BOOL)( IDOK == nResult );
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
//----------------------------------------------------------------------------
|
||
|
|
// Procedure pszSkipDriveSpec
|
||
|
|
//
|
||
|
|
// Purpose Returns a pointer to whatever comes after the drive part
|
||
|
|
// of a filename. For example:
|
||
|
|
// c:\foo\bar.bat \\server\share\file.txt
|
||
|
|
// ^ ^
|
||
|
|
//
|
||
|
|
// Returns Pointer to the appropriate part of the string, or a pointer
|
||
|
|
// to the end of the string if it's not in the right format
|
||
|
|
//
|
||
|
|
// History 10/06/95 KenSh Created
|
||
|
|
//
|
||
|
|
LPTSTR pszSkipDriveSpec( LPTSTR pszPathName )
|
||
|
|
{
|
||
|
|
LPTSTR pch = NULL;
|
||
|
|
|
||
|
|
if( pszPathName[0] == _T('\\') && pszPathName[1] == _T('\\') )
|
||
|
|
{
|
||
|
|
pch = _tcschr(pszPathName+2, _T('\\'));
|
||
|
|
if( NULL != pch)
|
||
|
|
{
|
||
|
|
LPTSTR pchResult;
|
||
|
|
pchResult = _tcschr( pch, _T('\\') );
|
||
|
|
|
||
|
|
if( pchResult )
|
||
|
|
{
|
||
|
|
pchResult = _tcschr( pchResult+1, _T('\\') );
|
||
|
|
}
|
||
|
|
|
||
|
|
if( pchResult )
|
||
|
|
{
|
||
|
|
return pchResult;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
return _tcschr( pch, _T('\0') );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
return _tcschr( pszPathName, _T('\0') );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
pch = _tcschr( pszPathName, _T(':') );
|
||
|
|
|
||
|
|
if( pch )
|
||
|
|
{
|
||
|
|
return _tcsinc(pch);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
return _tcschr( pszPathName, _T('\0') );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
//----------------------------------------------------------------------------
|
||
|
|
// Procedure BrowseDirEditProc
|
||
|
|
//
|
||
|
|
// Purpose Subclassed window proc for the edit control in the Browse
|
||
|
|
// for Directory dialog. We override the WM_SETTEXT message
|
||
|
|
// to control when the window text can be programatically
|
||
|
|
// changed.
|
||
|
|
//
|
||
|
|
// Parameters standard
|
||
|
|
//
|
||
|
|
// Returns standard
|
||
|
|
//
|
||
|
|
// History 10/06/95 KenSh Created
|
||
|
|
// 10/09/95 KenSh Moved most code into UpdateEditText()
|
||
|
|
//
|
||
|
|
LRESULT CALLBACK BrowseDirEditProc( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam )
|
||
|
|
{
|
||
|
|
switch( message )
|
||
|
|
{
|
||
|
|
// In order to prevent default functionality from setting the Edit's text
|
||
|
|
// to strings like "*.*", we capture WM_SETTEXT and only allow it to occur
|
||
|
|
// if the fAllowSetText flag is specified in the OFNINFO struct.
|
||
|
|
case WM_SETTEXT:
|
||
|
|
{
|
||
|
|
LPOFNINFO lpOFNInfo = (LPOFNINFO)GetProp( GetParent(hwnd), c_szOFNProp );
|
||
|
|
|
||
|
|
if( lpOFNInfo->fAllowSetText )
|
||
|
|
{
|
||
|
|
break; // default processing
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
return 0L; // suppress the urge to change the text
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
default:
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
return CallWindowProc( g_pfnPrevEditProc, hwnd, message, wParam, lParam );
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
//----------------------------------------------------------------------------
|
||
|
|
// Procedure BrowseDirComboProc
|
||
|
|
//
|
||
|
|
// Purpose Subclassed window proc for the combo box in the Browse
|
||
|
|
// Directory dialog. We need to subclass so we can catch the
|
||
|
|
// change to selection after the Network button is used to
|
||
|
|
// switch drives.
|
||
|
|
//
|
||
|
|
// Parameters standard
|
||
|
|
//
|
||
|
|
// Returns standard
|
||
|
|
//
|
||
|
|
// History 10/09/95 KenSh Created
|
||
|
|
//
|
||
|
|
LRESULT CALLBACK BrowseDirComboProc( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam )
|
||
|
|
{
|
||
|
|
switch( message )
|
||
|
|
{
|
||
|
|
// We catch the WM_SETREDRAW message so that we ignore CB_SETCURSEL
|
||
|
|
// messages when the combo is not supposed to be updated. This is
|
||
|
|
// pretty much of a hack due to the ordering of messages after the
|
||
|
|
// Network button is clicked.
|
||
|
|
case WM_SETREDRAW:
|
||
|
|
{
|
||
|
|
if( wParam )
|
||
|
|
{
|
||
|
|
SetProp( hwnd, c_szRedrawProp, (HANDLE)1 );
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
if( GetProp( hwnd, c_szRedrawProp ) )
|
||
|
|
{
|
||
|
|
RemoveProp( hwnd, c_szRedrawProp );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
break; // continue with default processing
|
||
|
|
}
|
||
|
|
|
||
|
|
// We catch CB_SETCURSEL and use it to update our edit box after the
|
||
|
|
// Network button has been pressed.
|
||
|
|
case CB_SETCURSEL:
|
||
|
|
{
|
||
|
|
LPOFNINFO lpOFNInfo = (LPOFNINFO)GetProp( GetParent(hwnd), c_szOFNProp );
|
||
|
|
|
||
|
|
#ifdef NEVER
|
||
|
|
// If "Network" was pressed and redraw has been re-enabled...
|
||
|
|
if( lpOFNInfo->fNetworking && GetProp( hwnd, c_szRedrawProp ) )
|
||
|
|
{
|
||
|
|
TCHAR szBuf[_MAX_PATH];
|
||
|
|
LRESULT lResult = CallWindowProc( g_pfnPrevComboProc, hwnd, message, wParam, lParam );
|
||
|
|
|
||
|
|
// Turn off the networking flag
|
||
|
|
lpOFNInfo->fNetworking = FALSE;
|
||
|
|
|
||
|
|
// Force the selected drive to be the current drive and
|
||
|
|
// get the current directory on that drive
|
||
|
|
GetWindowText( hwnd, szBuf, _MAX_PATH );
|
||
|
|
_chdrive( _totupper(szBuf[0]) - 'A' + 1 );
|
||
|
|
GetCurrentDirectory( _MAX_PATH, szBuf );
|
||
|
|
|
||
|
|
// Update the edit box with the new text.
|
||
|
|
lpOFNInfo->fAllowSetText = TRUE;
|
||
|
|
SetDlgItemText( GetParent(hwnd), IDC_FILENAME, szBuf );
|
||
|
|
lpOFNInfo->fAllowSetText = FALSE;
|
||
|
|
SendDlgItemMessage( GetParent(hwnd), IDC_FILENAME, EM_SETSEL, 0, (LPARAM)-1 );
|
||
|
|
|
||
|
|
return lResult;
|
||
|
|
}
|
||
|
|
#endif
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
case WM_DESTROY:
|
||
|
|
{
|
||
|
|
if( GetProp( hwnd, c_szRedrawProp ) )
|
||
|
|
{
|
||
|
|
RemoveProp( hwnd, c_szRedrawProp );
|
||
|
|
}
|
||
|
|
break; // continue with default processing
|
||
|
|
}
|
||
|
|
|
||
|
|
default:
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
return CallWindowProc( g_pfnPrevComboProc, hwnd, message, wParam, lParam );
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
//----------------------------------------------------------------------------
|
||
|
|
// Procedure UpdateEditText
|
||
|
|
//
|
||
|
|
// Purpose Based on which control has focus and the current state of
|
||
|
|
// the edit control, calculates the new "current directory" and
|
||
|
|
// sets the Edit control's text to match.
|
||
|
|
//
|
||
|
|
// Parameters hwndDlg handle to the dialog window. This function will
|
||
|
|
// access the lpOFNInfo window property.
|
||
|
|
//
|
||
|
|
// Returns nothing
|
||
|
|
//
|
||
|
|
// History 10/09/95 KenSh Created
|
||
|
|
//
|
||
|
|
VOID UpdateEditText( HWND hwndDlg )
|
||
|
|
{
|
||
|
|
HWND hwndLB = GetDlgItem(hwndDlg, IDC_FILELIST);
|
||
|
|
int nCurSel = (int)SendMessage(hwndLB, LB_GETCURSEL, 0, 0);
|
||
|
|
TCHAR szDirName[_MAX_PATH];
|
||
|
|
LPTSTR pchStart = NULL;
|
||
|
|
LPOFNINFO lpOFNInfo = (LPOFNINFO)GetProp( hwndDlg, c_szOFNProp );
|
||
|
|
int i;
|
||
|
|
|
||
|
|
HWND hwndFocus = GetFocus();
|
||
|
|
int idFocus = GetDlgCtrlID( hwndFocus );
|
||
|
|
|
||
|
|
if( idFocus == IDC_FILELIST )
|
||
|
|
// Listbox: build name up through current LB selection
|
||
|
|
{
|
||
|
|
// First get the top entry in the listbox, this will tell us
|
||
|
|
// if it's a connected drive or a UNC drive
|
||
|
|
SendMessage( hwndLB, LB_GETTEXT, 0, (LPARAM)szDirName );
|
||
|
|
|
||
|
|
// Run down the entries in the listbox appending them
|
||
|
|
// and stop when we get to the current selection.
|
||
|
|
if( szDirName[0] == _T('\\') && szDirName[1] == _T('\\') )
|
||
|
|
pchStart = _tcschr(szDirName+2, _T('\0'));
|
||
|
|
else
|
||
|
|
pchStart = _tcsinc(szDirName) + 1; // skip 2 chars, first may be MBCS
|
||
|
|
|
||
|
|
if (NULL != pchStart)
|
||
|
|
{
|
||
|
|
for( i = 1; i <= nCurSel; i++ )
|
||
|
|
{
|
||
|
|
if( *pchStart != _T('\\') )
|
||
|
|
*pchStart = _T('\\');
|
||
|
|
pchStart = _tcsinc(pchStart);
|
||
|
|
SendMessage( hwndLB, LB_GETTEXT, i, (LPARAM)pchStart );
|
||
|
|
pchStart = _tcschr(pchStart, _T('\0'));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else if( idFocus == IDC_DRIVECOMBO )
|
||
|
|
// Combo box: use current working directory
|
||
|
|
{
|
||
|
|
GetCurrentDirectory( _MAX_PATH, szDirName );
|
||
|
|
}
|
||
|
|
else if( idFocus == IDC_FILENAME )
|
||
|
|
// Edit control: build the new path using the edit contents
|
||
|
|
{
|
||
|
|
TCHAR szBuf[_MAX_PATH];
|
||
|
|
|
||
|
|
GetDlgItemText( hwndDlg, IDC_FILENAME, szBuf, _MAX_PATH );
|
||
|
|
|
||
|
|
if( szBuf[0] == _T('\\') )
|
||
|
|
{
|
||
|
|
if( szBuf[1] == _T('\\') )
|
||
|
|
// full UNC path was specified
|
||
|
|
{
|
||
|
|
_tcscpy( szDirName, szBuf );
|
||
|
|
}
|
||
|
|
else
|
||
|
|
// new directory on the current drive
|
||
|
|
{
|
||
|
|
_tcscpy( szDirName, lpOFNInfo->szLastDirName );
|
||
|
|
LPTSTR pch = pszSkipDriveSpec(szDirName);
|
||
|
|
_tcscpy( pch, szBuf );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else if( *_tcsinc(szBuf) == _T(':') )
|
||
|
|
{
|
||
|
|
// Change to the requested drive and use the current directory
|
||
|
|
// on that drive.
|
||
|
|
if( 0 == _chdrive( _totupper(szBuf[0]) - 'A' + 1 ) &&
|
||
|
|
szBuf[2] != _T('\\') )
|
||
|
|
{
|
||
|
|
// It's a legal drive and no directory was specified,
|
||
|
|
// so use the current default.
|
||
|
|
GetCurrentDirectory( _MAX_PATH, szDirName );
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
// A directory was specified or the drive does not exist.
|
||
|
|
// Copy the text verbatim to test it and possibly display
|
||
|
|
// an error message.
|
||
|
|
_tcscpy( szDirName, szBuf );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
// Subdirectory of the current directory
|
||
|
|
{
|
||
|
|
// Start with the current directory
|
||
|
|
_tcscpy( szDirName, lpOFNInfo->szLastDirName );
|
||
|
|
|
||
|
|
// Append a backslash if there isn't already one there
|
||
|
|
LPTSTR pch = _tcsrchr( szDirName, _T('\\') );
|
||
|
|
if (pch)
|
||
|
|
{
|
||
|
|
if( *_tcsinc(pch) )
|
||
|
|
{
|
||
|
|
pch = _tcschr( pch, _T('\0') );
|
||
|
|
if (pch)
|
||
|
|
{
|
||
|
|
*pch = _T('\\');
|
||
|
|
}
|
||
|
|
}
|
||
|
|
pch = _tcsinc(pch);
|
||
|
|
|
||
|
|
// Append the new directory name
|
||
|
|
_tcscpy( pch, szBuf );
|
||
|
|
}
|
||
|
|
|
||
|
|
// Attempt to change into the new directory
|
||
|
|
if( SetCurrentDirectory(szDirName) )
|
||
|
|
{
|
||
|
|
// The directory exists, get the official name and use that
|
||
|
|
// instead of whatever we're using now
|
||
|
|
GetCurrentDirectory( _MAX_PATH, szDirName );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
// Some other control, likely an error message is going on
|
||
|
|
_tcscpy( szDirName, lpOFNInfo->szLastDirName );
|
||
|
|
}
|
||
|
|
|
||
|
|
lpOFNInfo->fAllowSetText = TRUE;
|
||
|
|
SetDlgItemText( hwndDlg, IDC_FILENAME, szDirName );
|
||
|
|
lpOFNInfo->fAllowSetText = FALSE;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
//----------------------------------------------------------------------------
|
||
|
|
// Procedure BrowseDirDlgHook
|
||
|
|
//
|
||
|
|
// Purpose Dialog proc for the Browse for Directory subclassed common
|
||
|
|
// dialog. We spend most of our effort trying to get the right
|
||
|
|
// string into the edit control (IDC_FILENAME).
|
||
|
|
//
|
||
|
|
// Parameters standard
|
||
|
|
//
|
||
|
|
// Returns TRUE to halt further processing, FALSE to do the default.
|
||
|
|
//
|
||
|
|
// History 10/06/95 KenSh Created
|
||
|
|
//
|
||
|
|
BOOL CALLBACK BrowseDirDlgHook( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam )
|
||
|
|
{
|
||
|
|
switch(message)
|
||
|
|
{
|
||
|
|
case WM_INITDIALOG:
|
||
|
|
{
|
||
|
|
LPOFNINFO lpOFNInfo = (LPOFNINFO)((LPOPENFILENAME)lParam)->lCustData;
|
||
|
|
|
||
|
|
// Store the OFN struct pointer as a window property
|
||
|
|
SetProp( hwnd, c_szOFNProp, (HANDLE)lpOFNInfo );
|
||
|
|
|
||
|
|
// Initialize the OFNInfo struct
|
||
|
|
_tcscpy( lpOFNInfo->szLastDirName, lpOFNInfo->ofn.lpstrInitialDir );
|
||
|
|
lpOFNInfo->fAllowSetText = FALSE;
|
||
|
|
//lpOFNInfo->fNetworking = FALSE;
|
||
|
|
|
||
|
|
// Start our edit off with the initial directory
|
||
|
|
SetDlgItemText( hwnd, IDC_FILENAME, lpOFNInfo->ofn.lpstrInitialDir );
|
||
|
|
|
||
|
|
// Subclass the edit to let us display only what we want to display
|
||
|
|
g_pfnPrevEditProc = (WNDPROC)SetWindowLongPtr(
|
||
|
|
GetDlgItem(hwnd, IDC_FILENAME),
|
||
|
|
GWLP_WNDPROC,
|
||
|
|
(LONG_PTR)BrowseDirEditProc );
|
||
|
|
|
||
|
|
// Subclass the combo so we know when the Network button has been used.
|
||
|
|
g_pfnPrevComboProc = (WNDPROC)SetWindowLongPtr(
|
||
|
|
GetDlgItem(hwnd, IDC_DRIVECOMBO),
|
||
|
|
GWLP_WNDPROC,
|
||
|
|
(LONG_PTR)BrowseDirComboProc );
|
||
|
|
|
||
|
|
return TRUE; // set default focus
|
||
|
|
}
|
||
|
|
|
||
|
|
case WM_DESTROY:
|
||
|
|
{
|
||
|
|
// Clean up.
|
||
|
|
RemoveProp( hwnd, c_szOFNProp );
|
||
|
|
return FALSE; // continue with default processing
|
||
|
|
}
|
||
|
|
|
||
|
|
case WM_COMMAND:
|
||
|
|
{
|
||
|
|
switch( LOWORD(wParam) )
|
||
|
|
{
|
||
|
|
case IDOK:
|
||
|
|
{
|
||
|
|
return BrowseDir_OnOK( hwnd );
|
||
|
|
}
|
||
|
|
|
||
|
|
case IDC_FILELIST: //directory listbox.
|
||
|
|
{
|
||
|
|
if( HIWORD(wParam) == LBN_DBLCLK )
|
||
|
|
{
|
||
|
|
// Post this message telling us to change the edit box.
|
||
|
|
PostMessage( hwnd, CM_UPDATEEDIT, 0, 0L );
|
||
|
|
}
|
||
|
|
return FALSE; // continue with default processing.
|
||
|
|
}
|
||
|
|
|
||
|
|
case IDC_DRIVECOMBO: // drive combo box:
|
||
|
|
{
|
||
|
|
if( HIWORD(wParam) == CBN_SELCHANGE )
|
||
|
|
{
|
||
|
|
// Post this message telling us to change the edit box.
|
||
|
|
PostMessage( hwnd, CM_UPDATEEDIT, 0, 0L );
|
||
|
|
}
|
||
|
|
return FALSE; // continue with default processing.
|
||
|
|
}
|
||
|
|
|
||
|
|
#ifdef NEVER
|
||
|
|
case IDC_NETWORK: // "Network..." button
|
||
|
|
{
|
||
|
|
// Set the fNetworking flag which the combo box looks for when
|
||
|
|
// processing CB_SETCURSEL.
|
||
|
|
LPOFNINFO lpOFNInfo = (LPOFNINFO)GetProp( hwnd, c_szOFNProp );
|
||
|
|
lpOFNInfo->fNetworking = TRUE;
|
||
|
|
return FALSE; // default processing.
|
||
|
|
}
|
||
|
|
#endif
|
||
|
|
|
||
|
|
default:
|
||
|
|
return FALSE; // default processing.
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
case CM_UPDATEEDIT: //update edit box with directory
|
||
|
|
{
|
||
|
|
LPOFNINFO lpOFNInfo = (LPOFNINFO)GetProp( hwnd, c_szOFNProp );
|
||
|
|
|
||
|
|
// Change the text of the edit control.
|
||
|
|
UpdateEditText( hwnd );
|
||
|
|
SendDlgItemMessage( hwnd, IDC_FILENAME, EM_SETSEL, 0, (LPARAM)(INT)-1 );
|
||
|
|
|
||
|
|
// Store this text as the "last known good" directory
|
||
|
|
GetDlgItemText( hwnd, IDC_FILENAME, lpOFNInfo->szLastDirName, _MAX_PATH );
|
||
|
|
|
||
|
|
return TRUE;
|
||
|
|
}
|
||
|
|
|
||
|
|
default:
|
||
|
|
return FALSE; //default processing
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
//----------------------------------------------------------------------------
|
||
|
|
// Procedure BrowseDir_OnOK
|
||
|
|
//
|
||
|
|
// Purpose Handles a click of the OK button in the Browse Directory
|
||
|
|
// dialog. We have to do some sneaky stuff here with checking
|
||
|
|
// which control has focus, because we want the dialog to go
|
||
|
|
// away enter when the OK button is clicked directly (i.e. just
|
||
|
|
// hitting Enter doesn't count).
|
||
|
|
//
|
||
|
|
// Parameters hwnd The dialog window
|
||
|
|
//
|
||
|
|
// Returns TRUE if processing should halt, FALSE if default processing
|
||
|
|
// should still happen.
|
||
|
|
//
|
||
|
|
// History 10/09/95 KenSh Created
|
||
|
|
//
|
||
|
|
BOOL BrowseDir_OnOK( HWND hwnd )
|
||
|
|
{
|
||
|
|
LPOFNINFO lpOFNInfo = (LPOFNINFO)GetProp( hwnd, c_szOFNProp );
|
||
|
|
HWND hwndFocus = GetFocus();
|
||
|
|
|
||
|
|
int idFocus = GetDlgCtrlID(hwndFocus);
|
||
|
|
|
||
|
|
if( idFocus != IDC_FILENAME && idFocus != IDC_FILELIST && idFocus != IDC_DRIVECOMBO )
|
||
|
|
{
|
||
|
|
ASSERT( lpOFNInfo->ofn.lpstrFile != NULL );
|
||
|
|
//UpdateEditText( hwnd );
|
||
|
|
GetDlgItemText( hwnd, IDC_FILENAME, lpOFNInfo->ofn.lpstrFile, lpOFNInfo->ofn.nMaxFile );
|
||
|
|
|
||
|
|
EndDialog( hwnd, IDOK );
|
||
|
|
|
||
|
|
return TRUE; // halt processing here.
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
// We don't want the dialog to go away at this point.
|
||
|
|
// Because the default functionality is expecting
|
||
|
|
// a file to be found, not a directory, we must make
|
||
|
|
// sure what's been typed in is actually a directory
|
||
|
|
// before we hand this message to the default handler.
|
||
|
|
|
||
|
|
TCHAR szBuf[_MAX_PATH];
|
||
|
|
|
||
|
|
// Calculate the new current directory and put it into the Edit
|
||
|
|
UpdateEditText( hwnd );
|
||
|
|
|
||
|
|
// Read the newly generated directory name
|
||
|
|
GetDlgItemText( hwnd, IDC_FILENAME, szBuf, _MAX_PATH );
|
||
|
|
|
||
|
|
// Update our "last good" directory
|
||
|
|
_tcscpy( lpOFNInfo->szLastDirName, szBuf );
|
||
|
|
|
||
|
|
// Post this message to update the edit after the default handler
|
||
|
|
// updates the list box
|
||
|
|
PostMessage( hwnd, CM_UPDATEEDIT, 0, 0 );
|
||
|
|
|
||
|
|
return FALSE; // let the original common dialog handle it.
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
BOOL BrowseForFile(
|
||
|
|
HWND hwndParent,
|
||
|
|
LPCTSTR pszInitialDir,
|
||
|
|
LPTSTR pszBuf,
|
||
|
|
int cchBuf)
|
||
|
|
{
|
||
|
|
TCHAR szInitialDir[MAX_PATH];
|
||
|
|
TCHAR szFileExtension[_MAX_PATH] = _T("");
|
||
|
|
LPTSTR p = NULL;
|
||
|
|
TCHAR szFileFilter[_MAX_PATH];
|
||
|
|
CString csTitle;
|
||
|
|
|
||
|
|
OFNINFO ofnInfo;
|
||
|
|
|
||
|
|
// Prepare the initial directory... add a backslash if it's
|
||
|
|
// a 2-character path
|
||
|
|
_tcscpy( szInitialDir, pszInitialDir );
|
||
|
|
if( !szInitialDir[2] )
|
||
|
|
{
|
||
|
|
szInitialDir[2] = _T('\\');
|
||
|
|
szInitialDir[3] = _T('\0');
|
||
|
|
}
|
||
|
|
|
||
|
|
// calculate file extension
|
||
|
|
p = _tcsrchr(pszBuf, _T('.'));
|
||
|
|
if (p) {
|
||
|
|
p = _tcsinc(p);
|
||
|
|
if (*p) {
|
||
|
|
_tcscpy(szFileExtension, _T("*."));
|
||
|
|
_tcscat(szFileExtension, p);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
memset( (PVOID)szFileFilter, 0, sizeof(szFileFilter));
|
||
|
|
p = szFileFilter;
|
||
|
|
if (*szFileExtension) {
|
||
|
|
_tcscpy(p, szFileExtension);
|
||
|
|
p = _tcsninc(p, _tcslen(szFileExtension) + 1);
|
||
|
|
_tcscpy(p, szFileExtension);
|
||
|
|
p = _tcsninc(p, _tcslen(szFileExtension) + 1);
|
||
|
|
}
|
||
|
|
_tcscpy(p, _T("*.*"));
|
||
|
|
p = _tcsninc(p, _tcslen(_T("*.*")) + 1);
|
||
|
|
_tcscpy(p, _T("*.*"));
|
||
|
|
|
||
|
|
// dialog title "Locate File"
|
||
|
|
MyLoadString(IDS_LOCATE_FILE, csTitle);
|
||
|
|
|
||
|
|
// fill in the OFNINFO struct
|
||
|
|
ofnInfo.ofn.lStructSize = sizeof(OPENFILENAME);
|
||
|
|
ofnInfo.ofn.hwndOwner = hwndParent;
|
||
|
|
ofnInfo.ofn.hInstance = (HINSTANCE) g_MyModuleHandle;
|
||
|
|
ofnInfo.ofn.lpstrFilter = szFileFilter; // extention of the file we're looking for
|
||
|
|
ofnInfo.ofn.lpstrCustomFilter = NULL;
|
||
|
|
ofnInfo.ofn.nMaxCustFilter = 0;
|
||
|
|
ofnInfo.ofn.nFilterIndex = 1;
|
||
|
|
ofnInfo.ofn.lpstrFile = pszBuf; // Buffer for file name
|
||
|
|
ofnInfo.ofn.nMaxFile = cchBuf;
|
||
|
|
ofnInfo.ofn.lpstrFileTitle = NULL;
|
||
|
|
ofnInfo.ofn.nMaxFileTitle = 0;
|
||
|
|
ofnInfo.ofn.lpstrInitialDir = szInitialDir;
|
||
|
|
ofnInfo.ofn.lpstrTitle = (LPCTSTR)csTitle;
|
||
|
|
ofnInfo.ofn.Flags = OFN_FILEMUSTEXIST | OFN_HIDEREADONLY | OFN_EXPLORER |
|
||
|
|
OFN_NOCHANGEDIR | OFN_LONGNAMES | OFN_NONETWORKBUTTON;
|
||
|
|
ofnInfo.ofn.nFileOffset = 0;
|
||
|
|
ofnInfo.ofn.nFileExtension = 0;
|
||
|
|
ofnInfo.ofn.lpstrDefExt = NULL;
|
||
|
|
ofnInfo.ofn.lCustData = (LPARAM)&ofnInfo;
|
||
|
|
ofnInfo.ofn.lpfnHook = NULL;
|
||
|
|
ofnInfo.ofn.lpTemplateName = NULL;
|
||
|
|
|
||
|
|
int nResult = ::GetOpenFileName( &ofnInfo.ofn );
|
||
|
|
|
||
|
|
DWORD dw = 0;
|
||
|
|
if (nResult == 0) {
|
||
|
|
dw = CommDlgExtendedError();
|
||
|
|
}
|
||
|
|
|
||
|
|
if (nResult == IDOK) {
|
||
|
|
iisDebugOut((LOG_TYPE_TRACE, _T("pszBuf=%s\n"), pszBuf));
|
||
|
|
*(pszBuf + ofnInfo.ofn.nFileOffset - 1) = _T('\0');
|
||
|
|
}
|
||
|
|
|
||
|
|
return (BOOL)( IDOK == nResult );
|
||
|
|
}
|