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])

Displays the DirSelect widget and returns the user selected directory or undef if the operation is canceled.

Takes one optional argument -- the initial directory to display. If not specified, the current directory will be used instead.

DEPENDENCIES

  • Perl 5.004

  • 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.