X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/516d38cdfda661f0560e8f68820715824b7c51c4..9d5507f7a2701395e1d5c121bd877bb9066ee6ea:/src/mac/carbon/dirdlg.cpp?ds=inline diff --git a/src/mac/carbon/dirdlg.cpp b/src/mac/carbon/dirdlg.cpp index 822047c4df..3b596c9f51 100644 --- a/src/mac/carbon/dirdlg.cpp +++ b/src/mac/carbon/dirdlg.cpp @@ -1,69 +1,97 @@ ///////////////////////////////////////////////////////////////////////////// -// Name: dirdlg.cpp +// Name: src/mac/carbon/dirdlg.cpp // Purpose: wxDirDialog // Author: Stefan Csomor // Modified by: // Created: 1998-01-01 // RCS-ID: $Id$ // Copyright: (c) Stefan Csomor -// Licence: wxWindows licence +// Licence: wxWindows licence ///////////////////////////////////////////////////////////////////////////// -#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA) -#pragma implementation "dirdlg.h" -#endif - #include "wx/wxprec.h" #if wxUSE_DIRDLG -#include "wx/utils.h" -#include "wx/dialog.h" #include "wx/dirdlg.h" -#include "wx/cmndata.h" +#ifndef WX_PRECOMP + #include "wx/utils.h" + #include "wx/dialog.h" + #include "wx/cmndata.h" +#endif // WX_PRECOMP + +#include "wx/filename.h" #include "wx/mac/private.h" #ifdef __DARWIN__ - #include + #include #else - #include + #include #endif IMPLEMENT_CLASS(wxDirDialog, wxDialog) +static pascal void NavEventProc( + NavEventCallbackMessage inSelector, + NavCBRecPtr ioParams, + NavCallBackUserData ioUserData ); + +static NavEventUPP sStandardNavEventFilter = NewNavEventUPP(NavEventProc); + +static pascal void NavEventProc( + NavEventCallbackMessage inSelector, + NavCBRecPtr ioParams, + NavCallBackUserData ioUserData ) +{ + wxDirDialog * data = ( wxDirDialog *) ioUserData ; + if ( inSelector == kNavCBStart ) + { + if (data && !data->GetPath().empty() ) + { + // Set default location for the modern Navigation APIs + // Apple Technical Q&A 1151 + FSRef theFile; + wxMacPathToFSRef(data->GetPath(), &theFile); + AEDesc theLocation = { typeNull, NULL }; + if (noErr == ::AECreateDesc(typeFSRef, &theFile, sizeof(FSRef), &theLocation)) + ::NavCustomControl(ioParams->context, kNavCtlSetLocation, (void *) &theLocation); + } + } +} + wxDirDialog::wxDirDialog(wxWindow *parent, const wxString& message, const wxString& defaultPath, - long style, + long WXUNUSED(style), const wxPoint& WXUNUSED(pos), const wxSize& WXUNUSED(size), const wxString& WXUNUSED(name)) { wxASSERT_MSG( NavServicesAvailable() , wxT("Navigation Services are not running") ) ; m_message = message; - m_dialogStyle = style; m_parent = parent; m_path = defaultPath; } int wxDirDialog::ShowModal() { - NavDialogRef dialog; + NavDialogRef dialog = NULL; NavDialogCreationOptions options; NavReplyRecord reply ; bool disposeReply = false ; OSStatus err = noErr; - + err = NavGetDefaultDialogCreationOptions(&options); - if (err == noErr) + options.optionFlags &= ~kNavAllowMultipleFiles; + if (err == noErr) { wxMacCFStringHolder message(m_message, m_font.GetEncoding()); options.message = message; - err = NavCreateChooseFolderDialog(&options, NULL, NULL, NULL, &dialog); - if (err == noErr) - { + err = NavCreateChooseFolderDialog(&options, sStandardNavEventFilter , NULL, this , &dialog); + if (err == noErr) + { err = NavDialogRun(dialog); if ( err == noErr ) { @@ -72,16 +100,16 @@ int wxDirDialog::ShowModal() } } } - - if ( err == noErr ) - { + + if ( err == noErr ) + { if ( reply.validRecord ) { FSRef folderInfo; AEDesc specDesc ; - + OSErr err = ::AECoerceDesc( &reply.selection , typeFSRef, &specDesc); - if ( err != noErr ) + if ( err != noErr ) { m_path = wxEmptyString ; } @@ -89,10 +117,10 @@ int wxDirDialog::ShowModal() { folderInfo = **(FSRef**) specDesc.dataHandle; m_path = wxMacFSRefToPath( &folderInfo ) ; - if (specDesc.dataHandle != nil) + if (specDesc.dataHandle != nil) { ::AEDisposeDesc(&specDesc); - } + } } } else @@ -100,14 +128,17 @@ int wxDirDialog::ShowModal() err = paramErr ; // could be any error, only used for giving back wxID_CANCEL } } - + if ( disposeReply ) ::NavDisposeReply(&reply); - + // apparently cancelling shouldn't change m_path if ( err != noErr && err != userCanceledErr ) m_path = wxEmptyString ; - + + if ( dialog ) + ::NavDialogDispose(dialog); + return (err == noErr) ? wxID_OK : wxID_CANCEL ; }