1 #############################################################################
2 ## Name: XS/DirDialog.xs
3 ## Purpose: XS for Wx::DirDialog
4 ## Author: Mattia Barbon
7 ## RCS-ID: $Id: DirDialog.xs 2057 2007-06-18 23:03:00Z mbarbon $
8 ## Copyright: (c) 2000-2001, 2003-2004, 2006 Mattia Barbon
9 ## Licence: This program is free software; you can redistribute it and/or
10 ## modify it under the same terms as Perl itself
11 #############################################################################
13 #include <wx/dirdlg.h>
15 MODULE=Wx PACKAGE=Wx::DirDialog
18 wxDirDialog::new( parent, message = wxFileSelectorPromptStr, defaultPath = wxEmptyString, style = 0, pos = wxDefaultPosition )
26 wxDirDialog::GetPath()
29 wxDirDialog::GetMessage()
31 #if WXPERL_W_VERSION_LT( 2, 7, 0 )
34 wxDirDialog::GetStyle()
39 wxDirDialog::SetMessage( message )
43 wxDirDialog::SetPath( path )
46 #if WXPERL_W_VERSION_LT( 2, 7, 0 )
49 wxDirDialog::SetStyle( style )
55 wxDirDialog::ShowModal()
57 MODULE=Wx PACKAGE=Wx PREFIX=wx
60 wxDirSelector( message, default_path = wxEmptyString, style = 0, pos = wxDefaultPosition, parent = 0 )