NAME
Tk::DirSelect - Cross-platform directory selection widget.
SYNOPSIS
use Tk::DirSelect;
my $ds = $mw->DirSelect();
my $dir = $ds->Show();
DESCRIPTION
This module provides a cross-platform directory selection widget. For systems running Microsoft Windows, this includes selection of local and mapped network drives.
METHODS
DirSelect([-title => 'title'], [options])
Constructs a new DirSelect widget as a child of the invoking object (usually a MainWindow).
The title for the widget can be set by specifying -title => 'Title'
. Any other options provided will be passed through to the DirTree widget that displays directories, so be sure they're appropriate (e.g. -width
)
Show([directory], [options])
Displays the DirSelect widget and returns the user selected directory or undef
if the operation is canceled.
All arguments are optional. The first argument (if defined) is the initial directory to display. The default is to display the current working directory. Any additional options are passed through to the Popup() method. This means that you can do something like
$ds->Show(undef, -popover => $mw);
to center the dialog over your application.
DEPENDENCIES
Perl 5.004
Tk 800
Win32API::File (under Microsoft Windows only)
AUTHOR
Original author Kristi Thompson <kristi@kristi.ca>
Current maintainer Michael J. Carman <mjcarman@mchsi.com>
This is free software under the terms of the Perl Artistic License.