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

NAME

Tk::PathEntry::Dialog - File dialog using Tk::PathEntry

SYNOPSIS

Using as a replacement for getOpenFile and getSaveFile:

    use Tk::PathEntry::Dialog qw(as_default);
    $filename = $mw->getOpenFile;

Using as a normal module:

    use Tk::PathEntry::Dialog;
    $filename = $mw->PathEntryDialog(-autocomplete => 1)->Show;

DESCRIPTION

This module provides a dialog window with a Tk::PathEntry widget, an OK button and a Cancel button.

With this module, the Tk::PathEntry can also be used as a standard Tk file dialog. You are allowed to select a directory.

OPTIONS

Options of getOpenFile and getSaveFile

You cannot use the options -filetypes, -defaultextension, and -multiple. So the only remaining options are -initialdir, -initialfile, and -title.

Options of PathEntryDialog

PathEntryDialog supports all options of Tk::PathEntry. The additional options are:

-title

Sets the window title.

-create

If this is set to a true value, you will be warned when you select an existing file.

NOTES

Surprisingly this module also works on Microsoft Windows.

BUGS

The following bug is known for PathEntryDialog on Microsoft Windows: Directly after klicking on a choice in the choices listbox which displays below the PathEntryDialog window, the OK and Cancel buttons don't respond to mouse clicks. Workaround: Move the mouse cursor out of the button and back. Or use the Enter resp. Escape keys in place of the buttons.

The following bug is known for PathEntryDialog on Knoppix: PathEntryDialog will often abort immediately with the error message

        *** glibc detected *** malloc(): memory corruption: 0x08495514 ***

Workaround: Do something that causes PathEntryDialog to start at a different memory location, e. g. open or close a Konqueror window (beleave me, this may help).

SEE ALSO

Tk::PathEntry (3), Tk::getOpenFile (3).

AUTHOR

Slaven Rezic <srezic@cpan.org>

COPYRIGHT

Copyright (c) 2001 Slaven Rezic. All rights reserved. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.