use Win32::GUI;
my $file = "*.txt\0" . " " x 256;
my @files = GUI::GetOpenFileName(
-owner => $W,
-directory => "C:\\",
-title => "Create ASN File - Specify Output File",
-file => $file,
-multisel => 1,
);
print @files;
in 0.0.665 if you use multisel => 1 it will bring up an ugly 3.1 style box.
I'm attempting to use Win32::GUI along with the
GetOpenFileName API call to open multiple files via
this GUI interface. I'm able to select one file with
the following Perl code, but I can't figure out how to
modify this code so that I can select multiple files
at one time. Thanks for any assistance
2 matches
Mail list logo