Create and manipulate filebrowser dialogs
Curses::UI::Widget | +----Curses::UI::Container | +----Curses::UI::Window | +----Curses::UI::Dialog::Dirbrowser
use Curses::UI; my $cui = new Curses::UI; my $win = $cui->add('window_id', 'Window');
# The hard way. # ------------- my $dialog = $win->add( 'mydialog', 'Dialog::Dirbrowser' ); $dialog->focus; my $file = $dialog->get(); $win->delete('mydialog');
# The easy way (see Curses::UI documentation). # -------------------------------------------- $file = $cui->filebrowser(); $file = $cui->loadfilebrowser(); $file = $cui->savefilebrowser();
Curses::UI::Dialog::Dirbrowser is a dirbrowser dialog. This type of dialog can be used to select a directory, anywhere on the filesystem.
See exampes/demo-Curses::UI::Dialog::Dirbrowser in the distribution for a short demo.
-title < \s-1TEXT\s0 > Set the title of the dialog window to \s-1TEXT\s0.
-path < \s-1PATH\s0 > Set the path to start with to \s-1PATH\s0. If this path does not exist, the filebrowser will start in the rootdirectory.
-show_hidden < \s-1BOOLEAN\s0 > If \s-1BOOLEAN\s0 has a true value, hidden files (the filename starts with a dot) will also be shown. By default this option is set to false.
new ( \s-1OPTIONS\s0 )
layout ( )
draw ( \s-1BOOLEAN\s0 )
focus ( ) These are standard methods. See Curses::UI::Container for an explanation of these.
get ( ) This method will return the complete path to the file that was selected using the filebrowser. If no file was selected, this method will return an undefined value.
escape This will invoke the cancel button, so the filebrowser widget returns without selecting any file.
~ If the directory- or filelistbox of the dialog window has the focus and the tilde (~) button is pressed, the filebrowser will chdir to the homedirectory of the current user.
Curses::UI, Curses::UI::Container, Curses::UI::Buttonbox
Copyright (c) 2001-2002 Maurice Makaay. All rights reserved.
Maintained by Marcus Thiesen ([email protected])
This package is free software and is provided \*(L"as is\*(R" without express or implied warranty. It may be used, redistributed and/or modified under the same terms as perl itself.