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

Filedialog

$fd=Paw::Filedialog-new([$height], [$width], [$name], [$dir])>;

Parameter

     $height    => number of rows [optionally]

     $width     => number of columns [optionally]

     $name      => name of the widget [optionally]

     $dir       => the directory in which the filedialog
                   will be started ("." default) [optionally]

When the filedialogbox is closed by the "ok"-button, it returns an array of all marked filenames (without path)

Example

     $fd=Paw::Filedialog->new(dir=>"/etc");

set_dir($path)

Set the directory where the filedialog will begin.

Example

     $fd->set_dir();       # start in "."
     $fd->set_dir("/etc"); # start in "/etc"

get_dir($scalar)

Returns the path of the filedialogbox.

Example

     $path=$fd->get_dir();  #$path = "/etc" (for example).

draw()

Raises the filedialog. If the box is closed by the "ok-button", it returns an array of all marked filenames (without path). If the box is closed by the "cancel-button", no return of the marked files takes place.

Example

     @files=$fd->draw();

set_border(["shade"])

activates the border of the widget (optionally also with shadows).

Example

     $widget->set_border("shade"); or $widget->set_border();