Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

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.


Comment on Re: Win32::FileOp window positioning?
Download Code
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?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://337928]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (15)
As of 2014-08-27 19:55 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (252 votes), past polls