The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Tk::Wizard::FileSystem - Tk::Wizard pages to allow end-user filesystem access

SYNOPSIS

Currently automatically loaded by Tk::Wizard, though this behaviour is deprecated and is expected to change in 2008.

DESCRIPTION

Adds a number of methods to Tk::Wizard, to allow the end-user to access the filesystem.

METHODS

addDirSelectPage

  $wizard->addDirSelectPage ( -variable => \$chosen_dir )

Adds a page (Tk::Frame) that contains a scrollable tree list of all directories including, on Win32, logical drives.

Supply in -variable a reference to a variable to set the initial directory, and to have set with the chosen path.

Supply -nowarnings with a value of 1 to list only drives which are accessible, thus avoiding Tk::DirTree warnings on Win32 where removable drives have no media.

Supply in -nowarnings a value other than 1 to avoid listing drives which are both inaccessible and - on Win32 - are either fixed drives, network drives, or RAM drives (that is types 3, 4, and 6, according to "GetDriveType" in Win32API::File).

You may also specify the -title, -subtitle and -text parameters, as in "blank_frame".

An optional -background argument is used as the background of the Entry and DirTree widgets (default is white).

Also see "callback_dirSelect".

callback_dirSelect

A callback to check that the directory, passed as a reference in the sole argument, exists, or can and should be created.

Will not allow the Wizard to continue unless a directory has been chosen. If the chosen directory does not exist, a messageBox will ask if it should be created. If the user affirms, it is created; otherwise the user is again asked to choose a directory.

Returns a Boolean value.

addFileSelectPage

  $wizard->addFileSelectPage(
                             -directory => 'C:/Windows/System32',
                             -variable => \$chosen_file,
                            );

Adds a page (Tk::Frame) that contains a "Browse" button which pops up a file-select dialog box. The selected file will be displayed in a read-only Entry widget.

Supply in -directory the full path of an existing folder where the user's search shall begin.

Supply in -variable a reference to a variable to have set with the chosen file name.

You may also specify the -title, -subtitle and -text parameters, as in "blank_frame".

An optional -background argument is used as the background of the Entry widget (default is white).

AUTHOR

Lee Goddard (lgoddard@cpan.org).

COPYRIGHT

Copyright (C) Lee Goddard, 11/2002 - 01/2008 ff.

Made available under the same terms as Perl itself.