]> git.saurik.com Git - wxWidgets.git/blobdiff - src/generic/filedlgg.cpp
the bitmaps in wxPropertyList are created on demand: this speeds up the
[wxWidgets.git] / src / generic / filedlgg.cpp
index ad39eb36b639a26c5d0a15629c769727bb4141cd..cce6ea3eb77c8dea0de7dabaf922eb88cbcf56b5 100644 (file)
@@ -6,7 +6,7 @@
 // Created:     12/12/98
 // RCS-ID:      $Id$
 // Copyright:   (c) Robert Roebling
-// Licence:    wxWindows licence
+// Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
 #ifdef __GNUG__
 #endif
 
 #include "wx/filedlg.h"
-#include "wx/dnd.h"
 #include "wx/debug.h"
 #include "wx/log.h"
 #include "wx/intl.h"
 #include "wx/msgdlg.h"
 #include "wx/sizer.h"
+#include "wx/bmpbuttn.h"
+#include "wx/tokenzr.h"
 
-#include "sys/types.h"
-#include "sys/stat.h"
-#include "dirent.h"
-#include "pwd.h"
-#include "grp.h"
-#include "time.h"
+#if wxUSE_TOOLTIPS
+    #include "wx/tooltip.h"
+#endif
+
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <dirent.h>
+#include <pwd.h>
+#include <grp.h>
+#include <time.h>
+#include <unistd.h>
+
+#include "wx/generic/home.xpm"
+#include "wx/generic/listview.xpm"
+#include "wx/generic/repview.xpm"
+#include "wx/generic/new_dir.xpm"
+#include "wx/generic/dir_up.xpm"
+
+/* XPM */
+static char * folder_xpm[] = {
+/* width height ncolors chars_per_pixel */
+"16 16 6 1",
+/* colors */
+"         s None        c None",
+".        c #000000",
+"+        c #c0c0c0",
+"@        c #808080",
+"#        c #ffff00",
+"$        c #ffffff",
+/* pixels */
+"                ",
+"   @@@@@        ",
+"  @#+#+#@       ",
+" @#+#+#+#@@@@@@ ",
+" @$$$$$$$$$$$$@.",
+" @$#+#+#+#+#+#@.",
+" @$+#+#+#+#+#+@.",
+" @$#+#+#+#+#+#@.",
+" @$+#+#+#+#+#+@.",
+" @$#+#+#+#+#+#@.",
+" @$+#+#+#+#+#+@.",
+" @$#+#+#+#+#+#@.",
+" @@@@@@@@@@@@@@.",
+"  ..............",
+"                ",
+"                "};
+
+// ----------------------------------------------------------------------------
+// private functions
+// ----------------------------------------------------------------------------
 
-#include "wx/generic/folder.xpm"
-#include "wx/generic/txt.xpm"
-#include "wx/generic/list.xpm"
-#include "wx/generic/find.xpm"
+static
+int ListCompare( long data1, long data2, long WXUNUSED(data) )
+{
+     wxFileData *fd1 = (wxFileData*)data1 ;
+     wxFileData *fd2 = (wxFileData*)data2 ;
+     if (fd1->GetName() == _T("..")) return -1;
+     if (fd2->GetName() == _T("..")) return 1;
+     if (fd1->IsDir() && !fd2->IsDir()) return -1;
+     if (fd2->IsDir() && !fd1->IsDir()) return 1;
+     return strcmp( fd1->GetName(), fd2->GetName() );
+}
 
 //-----------------------------------------------------------------------------
 //  wxFileData
@@ -76,7 +128,7 @@ wxFileData::wxFileData( const wxString &name, const wxString &fname )
     m_day = t->tm_mday;
     m_year = t->tm_year;
 
-    m_permissions.sprintf( "%c%c%c", 
+    m_permissions.sprintf( "%c%c%c",
      ((( buff.st_mode & S_IRUSR ) == S_IRUSR ) ? 'r' : '-'),
      ((( buff.st_mode & S_IWUSR ) == S_IWUSR ) ? 'w' : '-'),
      ((( buff.st_mode & S_IXUSR ) == S_IXUSR ) ? 'x' : '-') );
@@ -117,7 +169,7 @@ wxString wxFileData::GetHint() const
     return s;
 };
 
-wxString wxFileData::GetEntry( const int num )
+wxString wxFileData::GetEntry( int num )
 {
     wxString s;
     switch (num)
@@ -134,7 +186,7 @@ wxString wxFileData::GetEntry( const int num )
             if (m_day < 10) s = _T("0"); else s = _T("");
             s += IntToString( m_day );
             s += _T(".");
-            if (m_month < 10) s += _T("0"); 
+            if (m_month < 10) s += _T("0");
             s += IntToString( m_month );
             s += _T(".");
             if (m_year < 10) s += _T("0"); // this should happen real soon...
@@ -177,26 +229,10 @@ long wxFileData::GetSize()
     return m_size;
 }
 
-bool wxFileData::NewNameIsLegal( const wxString &s )
+void wxFileData::SetNewName( const wxString &name, const wxString &fname )
 {
-    wxString fileName = wxPathOnly( m_fileName );
-    fileName += _T("/");
-    fileName += s;
-    return (!wxFileExists( fileName ));
-}
-
-bool wxFileData::Rename( const wxString &s )
-{
-    wxString fileName = wxPathOnly( m_fileName );
-    fileName += _T("/");
-    fileName += s;
-    bool ret = wxRenameFile( m_fileName, fileName );
-    if (ret)
-    {
-        m_fileName = fileName;
-        m_name = s;
-    }
-    return ret;
+    m_name = name;
+    m_fileName = fname;
 }
 
 void wxFileData::MakeItem( wxListItem &item )
@@ -205,6 +241,7 @@ void wxFileData::MakeItem( wxListItem &item )
     item.m_colour = wxBLACK;
     if (IsExe()) item.m_colour = wxRED;
     if (IsDir()) item.m_colour = wxBLUE;
+    if (IsDir()) item.m_image = 0; else item.m_image = -1;
     if (IsLink())
     {
         wxColour *dg = wxTheColourDatabase->FindColour( "MEDIUM GREY" );
@@ -212,7 +249,7 @@ void wxFileData::MakeItem( wxListItem &item )
     }
     item.m_data = (long)this;
 }
-  
+
 //-----------------------------------------------------------------------------
 //  wxFileCtrl
 //-----------------------------------------------------------------------------
@@ -220,6 +257,8 @@ void wxFileData::MakeItem( wxListItem &item )
 IMPLEMENT_DYNAMIC_CLASS(wxFileCtrl,wxListCtrl);
 
 BEGIN_EVENT_TABLE(wxFileCtrl,wxListCtrl)
+    EVT_LIST_DELETE_ITEM(-1, wxFileCtrl::OnListDeleteItem)
+    EVT_LIST_END_LABEL_EDIT(-1, wxFileCtrl::OnListEndLabelEdit)
 END_EVENT_TABLE()
 
 wxFileCtrl::wxFileCtrl()
@@ -228,25 +267,20 @@ wxFileCtrl::wxFileCtrl()
     m_showHidden = FALSE;
 }
 
-wxFileCtrl::wxFileCtrl( wxWindow *win, wxWindowID id, const wxString &dirName,
+wxFileCtrl::wxFileCtrl( wxWindow *win, wxWindowID id,
+    const wxString &dirName, const wxString &wild,
     const wxPoint &pos, const wxSize &size,
     long style, const wxValidator &validator, const wxString &name ) :
   wxListCtrl( win, id, pos, size, style, validator, name )
 {
-    SetItemSpacing( 40 );
-    wxImageList *imageList = new wxImageList( 30, 30 );
+    wxImageList *imageList = new wxImageList( 16, 16 );
     imageList->Add( wxBitmap( folder_xpm ) );
-    imageList->Add( wxBitmap( txt_xpm ) );
-    imageList->Add( wxBitmap( list_xpm ) );
-    imageList->Add( wxBitmap( find_xpm ) );
-  
-    SetImageList( imageList, wxIMAGE_LIST_NORMAL );
-  
+    SetImageList( imageList, wxIMAGE_LIST_SMALL );
+
     m_dirName = dirName;
+    m_wild = wild;
     m_showHidden = FALSE;
     Update();
-  
-//  SetDropTarget( new wxFileDropTarget() );
 }
 
 void wxFileCtrl::ChangeToListMode()
@@ -273,22 +307,31 @@ void wxFileCtrl::ShowHidden( bool show )
     Update();
 }
 
-int ListCompare( const long data1, const long data2, const long WXUNUSED(data) )
+long wxFileCtrl::Add( wxFileData *fd, wxListItem &item )
 {
-     wxFileData *fd1 = (wxFileData*)data1 ;
-     wxFileData *fd2 = (wxFileData*)data2 ;
-     if (fd1->IsDir() && !fd2->IsDir()) return -1;
-     if (fd2->IsDir() && !fd1->IsDir()) return 1;
-     return strcmp( fd1->GetName(), fd2->GetName() );
+    long ret = -1;
+    item.m_mask = wxLIST_MASK_TEXT + wxLIST_MASK_DATA + wxLIST_MASK_IMAGE;
+    fd->MakeItem( item );
+    long my_style = GetWindowStyleFlag();
+    if (my_style & wxLC_REPORT)
+    {
+        ret = InsertItem( item );
+        for (int i = 1; i < 5; i++) SetItem( item.m_itemId, i, fd->GetEntry( i) );
+    }
+    else if (my_style & wxLC_LIST)
+    {
+        ret = InsertItem( item );
+    }
+    return ret;
 }
 
 void wxFileCtrl::Update()
-{ 
+{
     ClearAll();
     long my_style = GetWindowStyleFlag();
     if (my_style & wxLC_REPORT)
     {
-        InsertColumn( 0, _("Name"), wxLIST_FORMAT_LEFT, 110 );
+        InsertColumn( 0, _("Name"), wxLIST_FORMAT_LEFT, 130 );
         InsertColumn( 1, _("Size"), wxLIST_FORMAT_LEFT, 60 );
         InsertColumn( 2, _("Date"), wxLIST_FORMAT_LEFT, 55 );
         InsertColumn( 3, _("Time"), wxLIST_FORMAT_LEFT, 50 );
@@ -296,148 +339,117 @@ void wxFileCtrl::Update()
     }
     wxFileData *fd = (wxFileData *) NULL;
     wxListItem item;
-    item.m_mask = wxLIST_MASK_TEXT + wxLIST_MASK_DATA;
-    if (my_style & wxLC_ICON) item.m_mask += wxLIST_MASK_IMAGE;
     item.m_itemId = 0;
     item.m_col = 0;
-    wxString s;
+
+    if (m_dirName != _T("/"))
+    {
+        wxString p( wxPathOnly(m_dirName) );
+        if (p.IsEmpty()) p = _T("/");
+        fd = new wxFileData( _T(".."), p );
+        Add( fd, item );
+        item.m_itemId++;
+    }
+
     wxString res = m_dirName + _T("/*");
-    wxString f( wxFindFirstFile( res.GetData(), 0 ) );
+    wxString f( wxFindFirstFile( res.GetData(), wxDIR ) );
     while (!f.IsEmpty())
     {
         res = wxFileNameFromPath( f );
         fd = new wxFileData( res, f );
-        s = fd->GetName();
-        if (m_showHidden || (s[0] != '.'))
+        wxString s = fd->GetName();
+        if (m_showHidden || (s[0] != _T('.')))
         {
-            fd->MakeItem( item );
-            if (my_style & wxLC_REPORT)
-            {
-                InsertItem( item );
-                for (int i = 1; i < 5; i++) SetItem( item.m_itemId, i, fd->GetEntry( i) );
-            }
-            else if (my_style & wxLC_LIST)
-            {
-                InsertItem( item );
-            } 
-            else if (my_style & wxLC_ICON)
-            {
-                if (fd->IsDir()) item.m_image = 0; else item.m_image = 1;
-                InsertItem( item );
-            } 
+            Add( fd, item );
             item.m_itemId++;
         }
         f = wxFindNextFile();
     }
-    SortItems( ListCompare, 0 );
-}
 
-int wxFileCtrl::FillList( wxStringList &list )
-{
-    long index = -1;
-    int count = 0;
-    wxString s;
-    for (;;)
-    {
-        index = GetNextItem( index, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED );
-        if (index == -1) break;
-        wxListItem item;
-        item.m_itemId = index;
-        GetItem( item );
-        wxFileData *fd = (wxFileData*)item.m_data;
-        list.Add( fd->GetFullName() );
-        index++;
-        count++;
-    }
-    if (count == 0)
+    res = m_dirName + _T("/") + m_wild;
+    f = wxFindFirstFile( res.GetData(), wxFILE );
+    while (!f.IsEmpty())
     {
-        index = GetNextItem( -1, wxLIST_NEXT_ALL, wxLIST_STATE_FOCUSED );
-        if (index == -1) return 0;
-        wxListItem item;
-        item.m_itemId = index;
-        GetItem( item );
-        wxFileData *fd = (wxFileData*)item.m_data;
-        list.Add( fd->GetFullName() );
-        count = 1;
+        res = wxFileNameFromPath( f );
+        fd = new wxFileData( res, f );
+        wxString s = fd->GetName();
+        if (m_showHidden || (s[0] != _T('.')))
+        {
+            Add( fd, item );
+            item.m_itemId++;
+        }
+        f = wxFindNextFile();
     }
-    return count;
-}
 
-void wxFileCtrl::DeleteFiles()
-{
-/*
-  wxStringList list;
-  int count = FillList( list );
-  if (count > 0)
-  { 
-    wxString s = "Delete ";
-    s += wxIntToString( count );
-    s += " selected file";
-    if (count > 1) s += "s";
-    s += " or director";
-    if (count > 1) s += "ies?"; else s+= "y?";
-    if (wxYES == wxMessageBox( s, "Delete", wxYES_NO ))
-      wxDeleteStatusDia( NULL, &list );
-  };
-*/
+    SortItems( ListCompare, 0 );
 }
 
-void wxFileCtrl::CopyFiles( char *WXUNUSED(dest) )
+void wxFileCtrl::SetWild( const wxString &wild )
 {
-/*
-  wxStringList list;
-  int count = FillList( list );
-  wxString s = dest;
-  int ret = 0; // 0 = nix, 1 = copy, 2 = move
-  wxCopyMoveDia( (wxFrame*)GetParent(), count, &ret, &s );
-  if (ret == 1) 
-    wxCopyStatusDia( NULL, s, &list );
-*/
+    m_wild = wild;
+    Update();
 }
 
-void wxFileCtrl::MoveFiles( char *WXUNUSED(dest) )
+void wxFileCtrl::MakeDir()
 {
-}
+    wxString new_name( _T("NewName") );
+    wxString path( m_dirName );
+    path += _T( "/" );
+    path += new_name;
+    if (wxFileExists(path))
+    {
+        // try NewName0, NewName1 etc.
+        int i = 0;
+        do {
+            new_name = _("NewName");
+            wxString num;
+            num.Printf( _T("%d"), i );
+            new_name += num;
+
+            path = m_dirName;
+            path += _T("/");
+            path += new_name;
+            i++;
+        } while (wxFileExists(path));
+    }
 
-void wxFileCtrl::RenameFile()
-{
-}
+    wxLogNull log;
+    if (!wxMkdir(path))
+    {
+        wxMessageDialog dialog(this, _("Operation not permitted."), _("Error"), wxOK | wxICON_ERROR );
+        dialog.ShowModal();
+        return;
+    }
 
-void wxFileCtrl::MakeDir()
-{
-/*
-  wxString s = wxGetTextFromUser( "Enter new directory name:", "Make directory" );
-  if (s.IsNull()) return;
-  if (s == "") return;
-  if ((s == ".") || (s == ".."))
-  {
-    wxMessageBox( "This was obviously an invalid directory name.", "Go away." );
-    return;
-  };
-  wxString dir;
-  GetDir( dir );
-  dir += "/";
-  dir += s;
-  if (wxFileExists( dir ))
-  {
-    wxMessageBox( "Filename exists already. Cannot create directoy.", "Make directory" );
-    return;
-  };
-  wxMkdir( dir );
-  Update();
-*/
+    wxFileData *fd = new wxFileData( new_name, path );
+    wxListItem item;
+    item.m_itemId = 0;
+    item.m_col = 0;
+    int id = Add( fd, item );
+
+    if (id != -1)
+    {
+        SortItems( ListCompare, 0 );
+        id = FindItem( 0, (long)fd );
+        EnsureVisible( id );
+        EditLabel( id );
+    }
 }
 
 void wxFileCtrl::GoToParentDir()
 {
-    wxString s = m_dirName;
-    int pos = s.Last( _T('/') );  
-    if ((pos >= 0) && (s != _T("/")))
+    if (m_dirName != _T("/"))
     {
-        s.Remove( pos, s.Length()-pos );
-        if (s.Length() == 0) s = _T("/");
-        m_dirName = s;
+        wxString fname( wxFileNameFromPath(m_dirName) );
+        m_dirName = wxPathOnly( m_dirName );
+        if (m_dirName.IsEmpty()) m_dirName = _T("/");
         Update();
+        int id = FindItem( 0, fname );
+        if (id != -1)
+        {
+            SetItemState( id, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED );
+            EnsureVisible( id );
+        }
     }
 }
 
@@ -446,12 +458,16 @@ void wxFileCtrl::GoToHomeDir()
     wxString s = wxGetUserHome( wxString() );
     m_dirName = s;
     Update();
+    SetItemState( 0, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED );
+    EnsureVisible( 0 );
 }
 
 void wxFileCtrl::GoToDir( const wxString &dir )
 {
     m_dirName = dir;
     Update();
+    SetItemState( 0, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED );
+    EnsureVisible( 0 );
 }
 
 void wxFileCtrl::GetDir( wxString &dir )
@@ -459,110 +475,82 @@ void wxFileCtrl::GetDir( wxString &dir )
     dir = m_dirName;
 }
 
-/*
-void wxFileCtrl::OnDropFiles( int WXUNUSED(n), char **WXUNUSED(data), int WXUNUSED(x), int WXUNUSED(y) )
-{
-  wxString destDir;
-  wxPoint pt( x, y );
-  int flag = wxLIST_HITTEST_ONITEM;
-  long hit = HitTest( pt, flag );
-  if (hit > -1)
-  {
-    wxListItem li;
-    li.m_itemId = hit;
-    GetItem( li );
-    wxFileData *fd = (wxFileData*)li.m_data;
-    if (fd->IsDir()) fd->GetFullName( destDir );
-  };
-  if (destDir.IsNull()) destDir = m_dirName;
-  int ret = 0; // 0 = nix, 1 = copy, 2 = move
-  wxCopyMoveDia( (wxFrame*)GetParent(), n, &ret, &destDir );
-  if (ret == 1)
-  {  
-     wxStringList slist;
-     for (int i = 0; i < n; i++) slist.Add( data[i] );
-     wxCopyStatusDia( NULL, destDir.GetData(), &slist );
-     Update();
-  };
-};
-*/
-
 void wxFileCtrl::OnListDeleteItem( wxListEvent &event )
 {
     wxFileData *fd = (wxFileData*)event.m_item.m_data;
     delete fd;
 }
 
-void wxFileCtrl::OnListKeyDown( wxListEvent &event )
+void wxFileCtrl::OnListEndLabelEdit( wxListEvent &event )
 {
     wxFileData *fd = (wxFileData*)event.m_item.m_data;
-    if (fd->IsDir())
+    wxASSERT( fd );
+
+    if ((event.GetLabel().IsEmpty()) ||
+        (event.GetLabel() == _(".")) ||
+        (event.GetLabel() == _("..")) ||
+        (event.GetLabel().First( _T("/") ) != wxNOT_FOUND))
     {
-        m_dirName = fd->GetFullName();
-        Update();
-        Refresh();
+        wxMessageDialog dialog(this, _("Illegal directory name."), _("Error"), wxOK | wxICON_ERROR );
+        dialog.ShowModal();
+        event.Veto();
         return;
     }
-    if (fd->IsExe())
+
+    wxString new_name( wxPathOnly( fd->GetFullName() ) );
+    new_name += _T("/");
+    new_name += event.GetLabel();
+
+    wxLogNull log;
+
+    if (wxFileExists(new_name))
     {
-        wxExecute( fd->GetFullName() );
-        return;
+        wxMessageDialog dialog(this, _("File name exists already."), _("Error"), wxOK | wxICON_ERROR );
+        dialog.ShowModal();
+        event.Veto();
     }
-}
 
-void wxFileCtrl::OnListEndLabelEdit( wxListEvent &event )
-{
-    wxFileData *fd = (wxFileData*)event.m_item.m_data;
-    wxString newName = event.m_item.m_text;
-    if (fd->NewNameIsLegal( newName ))
+    if (wxRenameFile(fd->GetFullName(),new_name))
     {
-        if (fd->Rename( newName ))
-        {
-            Update();
-        }
-        else
-        {
-            wxString s = _("Could not rename file to ");
-            s += newName;
-            s += ".";
-            wxMessageBox( s, _("File dialog"), wxOK );
-        }
+        fd->SetNewName( new_name, event.GetLabel() );
+        SetItemState( event.GetItem(), wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED );
+        EnsureVisible( event.GetItem() );
     }
     else
     {
-        wxString s = "File name ";
-        s += newName;
-        s += " exists already or is invalid.\n";
-        s += "Could not rename file.";
-        wxMessageBox( s, _("File dialog"), wxOK );
+        wxMessageDialog dialog(this, _("Operation not permitted."), _("Error"), wxOK | wxICON_ERROR );
+        dialog.ShowModal();
+        event.Veto();
     }
-    return;
 }
 
 //-----------------------------------------------------------------------------
 // wxFileDialog
 //-----------------------------------------------------------------------------
 
-/* **** */
-
-#define  ID_LIST_CTRL     5010
-#define  ID_LIST_MODE     5000
-#define  ID_REPORT_MODE   5001
-#define  ID_ICON_MODE     5002
-#define  ID_UP_DIR        5005
-#define  ID_PARENT_DIR    5006
+#define  ID_LIST_MODE     wxID_FILEDLGG
+#define  ID_REPORT_MODE   wxID_FILEDLGG + 1
+#define  ID_UP_DIR        wxID_FILEDLGG + 5
+#define  ID_PARENT_DIR    wxID_FILEDLGG + 6
+#define  ID_NEW_DIR       wxID_FILEDLGG + 7
+#define  ID_CHOICE        wxID_FILEDLGG + 8
+#define  ID_TEXT          wxID_FILEDLGG + 9
+#define  ID_LIST_CTRL     wxID_FILEDLGG + 10
+#define  ID_ACTIVATED     wxID_FILEDLGG + 11
 
 IMPLEMENT_DYNAMIC_CLASS(wxFileDialog,wxDialog)
 
 BEGIN_EVENT_TABLE(wxFileDialog,wxDialog)
         EVT_BUTTON(ID_LIST_MODE, wxFileDialog::OnList)
         EVT_BUTTON(ID_REPORT_MODE, wxFileDialog::OnReport)
-        EVT_BUTTON(ID_ICON_MODE, wxFileDialog::OnIcon)
         EVT_BUTTON(ID_UP_DIR, wxFileDialog::OnUp)
         EVT_BUTTON(ID_PARENT_DIR, wxFileDialog::OnHome)
+        EVT_BUTTON(ID_NEW_DIR, wxFileDialog::OnNew)
         EVT_BUTTON(wxID_OK, wxFileDialog::OnListOk)
         EVT_LIST_ITEM_SELECTED(ID_LIST_CTRL, wxFileDialog::OnSelected)
-       EVT_LIST_ITEM_ACTIVATED(ID_LIST_CTRL, wxFileDialog::OnActivated)
+        EVT_LIST_ITEM_ACTIVATED(ID_LIST_CTRL, wxFileDialog::OnActivated)
+        EVT_CHOICE(ID_CHOICE,wxFileDialog::OnChoice)
+        EVT_TEXT_ENTER(ID_TEXT,wxFileDialog::OnTextEnter)
 END_EVENT_TABLE()
 
 wxFileDialog::wxFileDialog(wxWindow *parent,
@@ -572,62 +560,146 @@ wxFileDialog::wxFileDialog(wxWindow *parent,
                  const wxString& wildCard,
                  long style,
                  const wxPoint& pos ) :
-  wxDialog( parent, -1, message )
+  wxDialog( parent, -1, message, pos, wxDefaultSize, wxDEFAULT_DIALOG_STYLE | wxRESIZE_BORDER )
 {
     wxBeginBusyCursor();
-    
+
     m_message = message;
     m_dialogStyle = style;
     m_dir = defaultDir;
-    if (m_dir.IsEmpty()) m_dir = wxGetUserHome();
+    if (m_dir.IsEmpty())
+    {
+        char buf[200];
+        m_dir = getcwd( buf, sizeof(buf) );
+    }
     m_path = defaultDir;
     m_path += _T("/");
     m_path += defaultFile;
     m_fileName = defaultFile;
     m_wildCard = wildCard;
     m_filterIndex = 0;
-    
+
+    // interpret wildcards
+
+    if (m_wildCard.IsEmpty())
+        m_wildCard = _("All files (*)|*");
+
+    wxStringTokenizer tokens( m_wildCard, _T("|") );
+    wxString firstWild;
+    wxString firstWildText;
+    if (tokens.CountTokens() == 1)
+    {
+        firstWildText = tokens.GetNextToken();
+        firstWild = firstWildText;
+    }
+    else
+    {
+        wxASSERT_MSG( tokens.CountTokens() % 2 == 0, _T("Wrong file type descripition") );
+        firstWildText = tokens.GetNextToken();
+        firstWild = tokens.GetNextToken();
+    }
+
+    // layout
+
     wxBoxSizer *mainsizer = new wxBoxSizer( wxVERTICAL );
-    
+
     wxBoxSizer *buttonsizer = new wxBoxSizer( wxHORIZONTAL );
-    
-    buttonsizer->Add( new wxButton( this, ID_LIST_MODE, "List" ), 0, wxALL, 5 );
-    buttonsizer->Add( new wxButton( this, ID_REPORT_MODE, "Report" ), 0, wxALL, 5 );
-    buttonsizer->Add( new wxButton( this, ID_ICON_MODE, "Icon" ), 0, wxALL, 5 );
-    buttonsizer->Add( 30, 5 );
-    buttonsizer->Add( new wxButton( this, ID_UP_DIR, "Up" ), 0, wxALL, 5 );
-    buttonsizer->Add( new wxButton( this, ID_PARENT_DIR, "Home" ), 0, wxALL, 5 );
-    buttonsizer->Add( new wxButton( this, -1, "New..." ), 0, wxALL, 5 );
-    mainsizer->Add( buttonsizer, 0, wxALL | wxALIGN_RIGHT, 5 );
-    
-    m_list = new wxFileCtrl( this, ID_LIST_CTRL, "/", wxDefaultPosition, wxSize(200,180), 
+
+    wxBitmapButton *but;
+
+    but = new wxBitmapButton( this, ID_LIST_MODE, wxBitmap( listview_xpm ) );
+#if wxUSE_TOOLTIPS
+    but->SetToolTip( _("View files as a list view") );
+#endif
+    buttonsizer->Add( but, 0, wxALL, 5 );
+
+    but = new wxBitmapButton( this, ID_REPORT_MODE, wxBitmap( repview_xpm ) );
+#if wxUSE_TOOLTIPS
+    but->SetToolTip( _("View files as a detailed view") );
+#endif
+    buttonsizer->Add( but, 0, wxALL, 5 );
+
+    buttonsizer->Add( 30, 5, 1 );
+
+    but = new wxBitmapButton( this, ID_UP_DIR, wxBitmap( dir_up_xpm ) );
+#if wxUSE_TOOLTIPS
+    but->SetToolTip( _("Go to parent directory") );
+#endif
+    buttonsizer->Add( but, 0, wxALL, 5 );
+
+    but = new wxBitmapButton( this, ID_PARENT_DIR, wxBitmap(home_xpm) );
+#if wxUSE_TOOLTIPS
+    but->SetToolTip( _("Go to home directory") );
+#endif
+    buttonsizer->Add( but, 0, wxALL, 5);
+
+    buttonsizer->Add( 20, 20 );
+
+    but = new wxBitmapButton( this, ID_NEW_DIR, wxBitmap(new_dir_xpm) );
+#if wxUSE_TOOLTIPS
+    but->SetToolTip( _("Create new directory") );
+#endif
+    buttonsizer->Add( but, 0, wxALL, 5 );
+
+    mainsizer->Add( buttonsizer, 0, wxALL | wxEXPAND, 5 );
+
+    wxBoxSizer *staticsizer = new wxBoxSizer( wxHORIZONTAL );
+    staticsizer->Add( new wxStaticText( this, -1, _("Current directory:") ), 0, wxRIGHT, 10 );
+    m_static = new wxStaticText( this, -1, m_dir );
+    staticsizer->Add( m_static, 1 );
+    mainsizer->Add( staticsizer, 0, wxEXPAND | wxLEFT|wxRIGHT|wxBOTTOM, 10 );
+
+    m_list = new wxFileCtrl( this, ID_LIST_CTRL, m_dir, firstWild, wxDefaultPosition, wxSize(440,180),
       wxLC_LIST | wxSUNKEN_BORDER | wxLC_SINGLE_SEL );
-    mainsizer->Add( m_list, 1, wxEXPAND | wxALL, 10 );
-    
+    mainsizer->Add( m_list, 1, wxEXPAND | wxLEFT|wxRIGHT, 10 );
+
     wxBoxSizer *textsizer = new wxBoxSizer( wxHORIZONTAL );
-    m_text = new wxTextCtrl( this, -1, m_fileName );
-    textsizer->Add( m_text, 1, wxCENTER|wxALL, 10 );
+    m_text = new wxTextCtrl( this, ID_TEXT, m_fileName, wxDefaultPosition, wxDefaultSize, wxPROCESS_ENTER );
+    textsizer->Add( m_text, 1, wxCENTER | wxLEFT|wxRIGHT|wxTOP, 10 );
     textsizer->Add( new wxButton( this, wxID_OK, _("OK") ), 0, wxCENTER | wxLEFT|wxRIGHT|wxTOP, 10 );
     mainsizer->Add( textsizer, 0, wxEXPAND );
 
     wxBoxSizer *choicesizer = new wxBoxSizer( wxHORIZONTAL );
-    m_choice = new wxChoice( this, -1 );
-    m_choice->Append( "*.txt" );
+    m_choice = new wxChoice( this, ID_CHOICE );
     choicesizer->Add( m_choice, 1, wxCENTER|wxALL, 10 );
     choicesizer->Add( new wxButton( this, wxID_CANCEL, _("Cancel") ), 0, wxCENTER | wxALL, 10 );
     mainsizer->Add( choicesizer, 0, wxEXPAND );
 
+    m_choice->Append( firstWildText, (void*) new wxString( firstWild ) );
+    while (tokens.HasMoreTokens())
+    {
+        firstWildText = tokens.GetNextToken();
+        firstWild = tokens.GetNextToken();
+        m_choice->Append( firstWildText, (void*) new wxString( firstWild ) );
+    }
+    m_choice->SetSelection( 0 );
+
     SetAutoLayout( TRUE );
     SetSizer( mainsizer );
-    
+
     mainsizer->Fit( this );
     mainsizer->SetSizeHints( this );
-    
+
     Centre( wxBOTH );
-    
+
+    if (m_fileName.IsEmpty())
+        m_list->SetFocus();
+    else
+        m_text->SetFocus();
+
     wxEndBusyCursor();
 }
 
+wxFileDialog::~wxFileDialog()
+{
+}
+
+void wxFileDialog::OnChoice( wxCommandEvent &event )
+{
+    wxString *str = (wxString*) m_choice->GetClientData( event.GetInt() );
+    m_list->SetWild( *str );
+}
+
 void wxFileDialog::OnActivated( wxListEvent &WXUNUSED(event) )
 {
     wxCommandEvent cevent(wxEVT_COMMAND_BUTTON_CLICKED, wxID_OK);
@@ -635,9 +707,17 @@ void wxFileDialog::OnActivated( wxListEvent &WXUNUSED(event) )
     GetEventHandler()->ProcessEvent( cevent );
 }
 
+void wxFileDialog::OnTextEnter( wxCommandEvent &WXUNUSED(event) )
+{
+    wxCommandEvent cevent(wxEVT_COMMAND_BUTTON_CLICKED, wxID_OK);
+    cevent.SetEventObject( this );
+    GetEventHandler()->ProcessEvent( cevent );
+}
+
 void wxFileDialog::OnSelected( wxListEvent &event )
 {
-    m_text->SetValue( event.m_item.m_text );
+    if (FindFocus() == m_list)
+        m_text->SetValue( event.m_item.m_text );
 }
 
 void wxFileDialog::OnListOk( wxCommandEvent &event )
@@ -646,18 +726,66 @@ void wxFileDialog::OnListOk( wxCommandEvent &event )
     wxString dir;
     m_list->GetDir( dir );
     if (filename.IsEmpty()) return;
-    
-    dir += _T("/");
-    dir += filename;
-    filename = dir;
-    
+    if (filename == _T(".")) return;
+
+    if (filename == _T(".."))
+    {
+        m_list->GoToParentDir();
+        m_list->SetFocus();
+        m_list->GetDir( dir );
+        m_static->SetLabel( dir );
+        return;
+    }
+
+    if (filename == _T("~"))
+    {
+        m_list->GoToHomeDir();
+        m_list->SetFocus();
+        m_list->GetDir( dir );
+        m_static->SetLabel( dir );
+        return;
+    }
+
+    if (filename[0] == _T('~'))
+    {
+        filename.Remove( 0, 1 );
+        wxString tmp( wxGetUserHome() );
+        tmp += _T('/');
+        tmp += filename;
+        filename = tmp;
+    }
+
+    if ((filename.Find(_T('*')) != wxNOT_FOUND) ||
+        (filename.Find(_T('?')) != wxNOT_FOUND))
+    {
+        if (filename.Find(_T('/')) != wxNOT_FOUND)
+        {
+            wxMessageBox(_("Illegal file specification."), _("Error"), wxOK | wxICON_ERROR );
+            return;
+        }
+        m_list->SetWild( filename );
+        return;
+    }
+
+    if (dir != _T("/")) dir += _T("/");
+    if (filename[0] != _T('/'))
+    {
+        dir += filename;
+        filename = dir;
+    }
+
     if (wxDirExists(filename))
     {
         m_list->GoToDir( filename );
-       m_text->SetValue( _T("") );
-       return;
+        if (filename == _T("/"))
+            m_text->SetValue( _T("") );
+        else
+            m_text->SetValue( _T("..") );
+        m_list->GetDir( dir );
+        m_static->SetLabel( dir );
+        return;
     }
-    
+
     if ( (m_dialogStyle & wxSAVE) && (m_dialogStyle & wxOVERWRITE_PROMPT) )
     {
         if (wxFileExists( filename ))
@@ -674,8 +802,7 @@ void wxFileDialog::OnListOk( wxCommandEvent &event )
     {
         if ( !wxFileExists( filename ) )
         {
-            wxMessageBox(_("Please choose an existing file."), _("Error"), wxOK);
-
+            wxMessageBox(_("Please choose an existing file."), _("Error"), wxOK | wxICON_ERROR );
             return;
         }
     }
@@ -687,26 +814,36 @@ void wxFileDialog::OnListOk( wxCommandEvent &event )
 void wxFileDialog::OnList( wxCommandEvent &WXUNUSED(event) )
 {
     m_list->ChangeToListMode();
+    m_list->SetFocus();
 }
 
 void wxFileDialog::OnReport( wxCommandEvent &WXUNUSED(event) )
 {
     m_list->ChangeToReportMode();
-}
-
-void wxFileDialog::OnIcon( wxCommandEvent &WXUNUSED(event) )
-{
-    m_list->ChangeToIconMode();
+    m_list->SetFocus();
 }
 
 void wxFileDialog::OnUp( wxCommandEvent &WXUNUSED(event) )
 {
     m_list->GoToParentDir();
+    m_list->SetFocus();
+    wxString dir;
+    m_list->GetDir( dir );
+    m_static->SetLabel( dir );
 }
 
 void wxFileDialog::OnHome( wxCommandEvent &WXUNUSED(event) )
 {
     m_list->GoToHomeDir();
+    m_list->SetFocus();
+    wxString dir;
+    m_list->GetDir( dir );
+    m_static->SetLabel( dir );
+}
+
+void wxFileDialog::OnNew( wxCommandEvent &WXUNUSED(event) )
+{
+    m_list->MakeDir();
 }
 
 void wxFileDialog::SetPath( const wxString& path )
@@ -717,14 +854,14 @@ void wxFileDialog::SetPath( const wxString& path )
     {
         wxString ext;
         wxSplitPath(path, &m_dir, &m_fileName, &ext);
-       if (!ext.IsEmpty())
-       {
-           m_fileName += _T(".");
+        if (!ext.IsEmpty())
+        {
+            m_fileName += _T(".");
             m_fileName += ext;
-       }
+        }
     }
 }
-    
+
 // ----------------------------------------------------------------------------
 // global functions
 // ----------------------------------------------------------------------------