Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number

Re: Win32::FileOp window positioning?

by didier (Vicar)
on Mar 19, 2004 at 09:03 UTC ( #337928=note: print w/replies, xml ) Need Help??

in reply to Win32::FileOp window positioning?

You cannot use anchor popup to do that.
But there are work around, for example you can draw the dialog box like this at 50x50 screen coord*:
use Tk; $mw = MainWindow -> new; $openbutton = $mw -> Button ( -text => 'Open', -command => \&opensub, )-> pack; sub opensub { $top = $mw ->Toplevel; $top -> wm('geometry', '0x0+50+50'); $top->overrideredirect(1); $type_file = [['GIF Image', '.gif'], ['JPG Image', '.jpg']]; $file_openned = $top->getOpenFile(-filetypes => $type_file, -title => 'Choose an image', -defaultextension => \$type_file); } MainLoop;

Hope this help.

Replies are listed 'Best First'.
Re: Re: Win32::FileOp window positioning?
by spikey_wan (Scribe) on Mar 19, 2004 at 11:50 UTC
    Wow, thanks Didier, that's a really neat trick! I can see lots of uses for that already! The problem is, though, you used getOpenFile, and I need to use the OpenDialog, SaveAsDialog, and BrowseForFolder. Still a neat trick, though.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://337928]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (4)
As of 2018-07-22 16:56 GMT
Find Nodes?
    Voting Booth?
    It has been suggested to rename Perl 6 in order to boost its marketing potential. Which name would you prefer?

    Results (454 votes). Check out past polls.