Navigation in Listbox: a la Windows "speichern unter.." - #42108 (Graphische Oberflächen)

tomlong

2004-05-17 14:58

User since
2003-08-04
93 Artikel
BenutzerIn
[default_avatar]

Code: (dl )

1
2
3

$window->getSaveFile(-filetypes => \@types,
        -initialfile => 'Untitled',
        -defaultextension => '.htm');

und

Code: (dl )

$file = $window->getOpenFile(-filetypes => \@types);

@types im Format:

Code: (dl )

my @types =
      (["HTML Dokumente", [qw/.htm .html/]],
       ["Scripte", [qw/.cgi .php .php3 .pl .asp/]],
       ["Text Files", '.txt'],
       ["All Files", '*']);

Live long and prosper!
42;