home *** CD-ROM | disk | FTP | other *** search
/ Netrunner 2004 October / NETRUNNER0410.ISO / regular / ActivePerl-5.8.4.810-MSWin32-x86.msi / _b759a77e28fda038c3f31c56888d8f96 < prev    next >
Encoding:
Text File  |  2004-06-01  |  1.4 KB  |  64 lines
  1. =head1 NAME
  2.  
  3. Tk::FBox - a file dialog
  4.  
  5. =for pm Tk/FBox.pm
  6.  
  7. =for category Popups and Dialogs
  8.  
  9. =head1 SYNOPSIS
  10.  
  11.     use Tk::FBox;
  12.     $file = $mw->FBox(...)->Show;
  13.  
  14. =head1 DESCRIPTION
  15.  
  16. C<Tk::FBox> is the dialog implementation behind the C<getOpenFile> and
  17. C<getSaveFile> method calls in the Unix/X11 world. As such, it
  18. supports all options for these methods and additionally:
  19.  
  20. =over
  21.  
  22. =item -sortcmd => sub { $_[0] cmp $_[1] }
  23.  
  24. Specified a callback for changing the sorting of the icons in the
  25. C<IconList> widget. By default, perl's C<cmp> operator will be used.
  26.  
  27. From the source code:
  28.  
  29.   # Using -sortcmd is really strange :-(
  30.   # $top->getOpenFile(-sortcmd => sub { package Tk::FBox; uc $b cmp uc $a});
  31.   # or, un-perlish, but useable (now activated in code):
  32.   # $top->getOpenFile(-sortcmd => sub { uc $_[1] cmp uc $_[0]});
  33.  
  34. This is an experimental option!
  35.  
  36. =item -type => $type
  37.  
  38. Type should be "open" (default) or "save".
  39.  
  40. =item -filter => $glob
  41.  
  42. To be documented...
  43.  
  44. =item -force => $bool
  45.  
  46. If true, then there will be no dialog if a file already exists.
  47.  
  48. =back
  49.  
  50. =head1 COPYRIGHT
  51.  
  52. The original tkfbox.tcl from Tcl/Tk is:
  53.  
  54. Copyright (c) 1994-1996 Sun Microsystems, Inc.
  55.  
  56. See the file "license.terms" for information on usage and redistribution
  57. of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  58.  
  59. Translated to Perl/Tk by Slaven Rezic <slaven.rezic@berlin.de>.
  60.  
  61. =head1 SEE ALSO
  62.  
  63. Tk::getOpenFile, Tk::IconList.
  64.