[perl-win32-gui-users] Window Size Controls & Miscellany ?'s
Is there a way to disable the Maximize button on a window? I've been using -maxwidth and -maxheight in the window creation in order to prevent users from resizing my windows (I don't really want to deal with resizing & repositioning quite yet...) but since the maximize button is active, the window does this ugly (imho) snap to the top left corner when its clicked. Second, I was wondering if any further strides have been made on GOE ( as posted by Harald Piske in late march (3/25 to be exact) ) I've recently been playing with gb109, and have started building a wishlist of my own for a large windows oriented development tool. (along the lines of Visual Basic). Is anyone aware of any Sourceforge projects for this , or is GOE still alive? (the fairymail link I followed didn't work for me) I'd love to see a fully featured windows development tool for perl (with syntax highlighting of course!) and am ready to contribute all I can to that project :). Lastly, I was wondering how the Win32::Gui FAQ was coming along. I've read through the draft that was posted last month (april) and found that its getting some good info in it, and was hoping to see much more added to it in the future. I'd especially like to see some information in it describing locations to look for more information for questions not yet answered ( though that probably isn't in-line with the concept of an FAQ ). I've found that many Win32 API books have helped me with style flags that I have not seen elsewhere (things like MB_YESNOCANCEL and the like). Thank you all for your help, and this great mailing list! -Michael Forhan [EMAIL PROTECTED]
[perl-win32-gui-users] Win32::GUI::Timer memory leak?
Is there a known memory problem with the GUI module and/or the Timer object? I have a script that runs through a _Timer sub once per second and increments a var (like $count++) and writes it to a Label. Just sitting there quietly doing nothing more than that adds 4k to the process' memory every second or two (or three -- it's not very exact). I would expect a *little* more memory to be used but these 4k's add up over time. Just curious. Pete
Re: [perl-win32-gui-users] Window Size Controls & Miscellany ?'s
>Is there a way to disable the Maximize button on a window? I've been using
>-maxwidth and -maxheight in the window creation in order to prevent users
>from resizing my windows (I don't really want to deal with resizing &
>repositioning quite yet...) but since the maximize button is active, the
>window does this ugly (imho) snap to the top left corner when its clicked.
You know, I was hoping for the same thing, with code like this:
$window = new Win32::GUI::Window( -name => '_Window',
-text => $SETTINGS->{app}->{name},
-left => ($screen_width - 600)/2,
-top=> ($screen_height - 400)/2,
-width => 480, -height => 400,
-menu => $menu_bar,
-class => $hwnd_class,
-icon => $icon,
-maximizebox => 0
);
Unfortunately, that dims the maximize box so that it doesn't work, but
still allows people to resize the window by the grab-an-edge-and-pull
routine. I haven't figured out how to disable that. It's probably simple.
Morbus Iff
.sig on other machine.
http://www.disobey.com/
http://www.gamegrene.com/
RE: [perl-win32-gui-users] Window Size Controls & Miscellany ?'s
> -Original Message-
> From: Morbus Iff [mailto:[EMAIL PROTECTED]
> Sent: Thursday, May 31, 2001 14:40
> To: perl-win32-gui-users@lists.sourceforge.net;
> 'perl-win32-gui-users@lists.sourceforge.net'
> Subject: Re: [perl-win32-gui-users] Window Size Controls & Miscellany
> ?'s
>
>
> >Is there a way to disable the Maximize button on a window?
> I've been using
> >-maxwidth and -maxheight in the window creation in order to
> prevent users
> >from resizing my windows (I don't really want to deal with
> resizing &
> >repositioning quite yet...) but since the maximize button
> is active, the
> >window does this ugly (imho) snap to the top left corner
> when its clicked.
>
> You know, I was hoping for the same thing, with code like this:
>
> $window = new Win32::GUI::Window( -name => '_Window',
> -text =>
> $SETTINGS->{app}->{name},
> -left =>
> ($screen_width - 600)/2,
> -top=>
> ($screen_height - 400)/2,
> -width => 480, -height => 400,
> -menu => $menu_bar,
> -class => $hwnd_class,
> -icon => $icon,
> -maximizebox => 0
###add something like :
-maxsize
=> [480,400],
-minsize
=> [480,400],
### this puts a min/max size to the window meaning it cant be
resized with the handle bars
> );
>
> Unfortunately, that dims the maximize box so that it doesn't
> work, but
> still allows people to resize the window by the grab-an-edge-and-pull
> routine. I haven't figured out how to disable that. It's
> probably simple.
>
>
> Morbus Iff
> .sig on other machine.
> http://www.disobey.com/
> http://www.gamegrene.com/
>
>
> ___
> Perl-Win32-GUI-Users mailing list
> Perl-Win32-GUI-Users@lists.sourceforge.net
> http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>
RE: [perl-win32-gui-users] Window Size Controls & Miscellany ?'s
While I haven't been able to get rid of the cursor change (into the resize
arrow), I've prevented people from resizing the box manually by placing the
-maxwidth and -maxheight settings in. Thanks for your tip for -maximize! It
works great, here is my window:
$Name = new Win32::GUI::Window( -name => $Name
,-text => $Main_Title
,-width => $Width
,-height=> $Height
,-left => $Left
,-top => $Top
,-minwidth => $Width
,-minheight => $Height
,-maxwidth => $Width
,-maxheight => $Height
,-menu => $Menu
,-maximizebox => 0
);
-Michael Forhan
[EMAIL PROTECTED]
-Original Message-
From: Morbus Iff [mailto:[EMAIL PROTECTED]
Sent: Thursday, May 31, 2001 11:40 AM
To: perl-win32-gui-users@lists.sourceforge.net;
'perl-win32-gui-users@lists.sourceforge.net'
Subject: Re: [perl-win32-gui-users] Window Size Controls & Miscellany
?'s
>Is there a way to disable the Maximize button on a window? I've been using
>-maxwidth and -maxheight in the window creation in order to prevent users
>from resizing my windows (I don't really want to deal with resizing &
>repositioning quite yet...) but since the maximize button is active, the
>window does this ugly (imho) snap to the top left corner when its clicked.
You know, I was hoping for the same thing, with code like this:
$window = new Win32::GUI::Window( -name => '_Window',
-text => $SETTINGS->{app}->{name},
-left => ($screen_width - 600)/2,
-top=> ($screen_height - 400)/2,
-width => 480, -height => 400,
-menu => $menu_bar,
-class => $hwnd_class,
-icon => $icon,
-maximizebox => 0
);
Unfortunately, that dims the maximize box so that it doesn't work, but
still allows people to resize the window by the grab-an-edge-and-pull
routine. I haven't figured out how to disable that. It's probably simple.
Morbus Iff
.sig on other machine.
http://www.disobey.com/
http://www.gamegrene.com/
___
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
RE: [perl-win32-gui-users] Window Size Controls & Miscellany ?'s
>At 03:06 PM 5/31/01, Frazier, Joe Jr wrote: >At 03:10 PM 5/31/01, Forhan, Michael wrote: Hey, thanks to both of you on the min/max|width/height... worked wonderfully! Morbus Iff .sig on other machine. http://www.disobey.com/ http://www.gamegrene.com/
[perl-win32-gui-users] Opening a *New* Browser Window?
Good day.
Currently, in my code [the opensource AmphetaDesk at
http://www.disobey.com/amphetadesk/], I open a browser window like so:
use Win32::API;
my $ShellExecute = new Win32::API("shell32", "ShellExecuteA",
['N','P', 'P', 'P', 'P', 'I'], 'N');
$ShellExecute->Call(0, "open", $url, 0, 0, 1);
This has the niceness of working with most browsers I've tested that have
been set as the default browser (Netscape, Mozilla, IE, etc.). My problem
is that this code always uses an *existing* browser window if it exists.
This causes some angst - if I'm viewing something, and then suddenly the
program takes over and loses my current page, I get pissed. So, anyways to
always open a *new* window, whether an existing one is there or not?
Morbus Iff
.sig on other machine.
http://www.disobey.com/
http://www.gamegrene.com/
RE: [perl-win32-gui-users] Window Size Controls & Miscellany ?'s
Yea, I just found about the -maximizebox thing. -minimizebox does the opposite. Set both to 0 if you want neither to show. I wonder if -questionbox works the same way for a Win32::GUI::DialogWindow and removes the goofy question mark box? > -Original Message- > From: Morbus Iff [mailto:[EMAIL PROTECTED] > Sent: Thursday, May 31, 2001 16:15 > To: perl-win32-gui-users@lists.sourceforge.net; > perl-win32-gui-users@lists.sourceforge.net > Subject: RE: [perl-win32-gui-users] Window Size Controls & Miscellany > ?'s > > > >At 03:06 PM 5/31/01, Frazier, Joe Jr wrote: > >At 03:10 PM 5/31/01, Forhan, Michael wrote: > > Hey, thanks to both of you on the min/max|width/height... > worked wonderfully! > > > Morbus Iff > .sig on other machine. > http://www.disobey.com/ > http://www.gamegrene.com/ > > > ___ > Perl-Win32-GUI-Users mailing list > Perl-Win32-GUI-Users@lists.sourceforge.net > http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users >
RE: [perl-win32-gui-users] Window Size Controls & Miscellany ?'s
Per your question, I pulled up Microsoft's website on maximizebox settings (I just searched for it from their main page), and linking from there I found information for a 'helpbutton'. After putting -helpbutton => 1 in my window, sure enough, I got one of those '?' boxes. Its amazing what new functionality you can find by just being curious ;) -Michael Forhan -Original Message- From: Frazier, Joe Jr [mailto:[EMAIL PROTECTED] Sent: Thursday, May 31, 2001 1:49 PM To: perl-win32-gui-users@lists.sourceforge.net Subject: RE: [perl-win32-gui-users] Window Size Controls & Miscellany ?'s Yea, I just found about the -maximizebox thing. -minimizebox does the opposite. Set both to 0 if you want neither to show. I wonder if -questionbox works the same way for a Win32::GUI::DialogWindow and removes the goofy question mark box? > -Original Message- > From: Morbus Iff [mailto:[EMAIL PROTECTED] > Sent: Thursday, May 31, 2001 16:15 > To: perl-win32-gui-users@lists.sourceforge.net; > perl-win32-gui-users@lists.sourceforge.net > Subject: RE: [perl-win32-gui-users] Window Size Controls & Miscellany > ?'s > > > >At 03:06 PM 5/31/01, Frazier, Joe Jr wrote: > >At 03:10 PM 5/31/01, Forhan, Michael wrote: > > Hey, thanks to both of you on the min/max|width/height... > worked wonderfully! > > > Morbus Iff > .sig on other machine. > http://www.disobey.com/ > http://www.gamegrene.com/ > > > ___ > Perl-Win32-GUI-Users mailing list > Perl-Win32-GUI-Users@lists.sourceforge.net > http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users > ___ Perl-Win32-GUI-Users mailing list Perl-Win32-GUI-Users@lists.sourceforge.net http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
RE: [perl-win32-gui-users] Opening a *New* Browser Window?
Try this:
use Win32::TieRegistry;
$http = $Registry->{"Classes\\http\\shell\\open\\command"}->{'\\'};
`$http $url`;
I did not try with other browsers, though, just Micro$tuff.
Have fun,
Harald
-Original Message-
From: Morbus Iff [mailto:[EMAIL PROTECTED]
Sent: Donnerstag, 31. Mai 2001 13:18
To: perl-win32-gui-users@lists.sourceforge.net
Subject: [perl-win32-gui-users] Opening a *New* Browser Window?
Good day.
Currently, in my code [the opensource AmphetaDesk at
http://www.disobey.com/amphetadesk/], I open a browser window like so:
use Win32::API;
my $ShellExecute = new Win32::API("shell32", "ShellExecuteA",
['N','P', 'P', 'P', 'P', 'I'], 'N');
$ShellExecute->Call(0, "open", $url, 0, 0, 1);
This has the niceness of working with most browsers I've tested that have
been set as the default browser (Netscape, Mozilla, IE, etc.). My problem
is that this code always uses an *existing* browser window if it exists.
This causes some angst - if I'm viewing something, and then suddenly the
program takes over and loses my current page, I get pissed. So, anyways to
always open a *new* window, whether an existing one is there or not?
Morbus Iff
.sig on other machine.
http://www.disobey.com/
http://www.gamegrene.com/
___
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
RE: [perl-win32-gui-users] Opening a *New* Browser Window?
>use Win32::TieRegistry; Well, now this is odd. I don't seem to have that on my machine, and a PPM says it's not found. Huh. Sigh. Gotta find it now... Morbus Iff .sig on other machine. http://www.disobey.com/ http://www.gamegrene.com/
RE: [perl-win32-gui-users] Opening a *New* Browser Window?
>use Win32::TieRegistry;
>$http = $Registry->{"Classes\\http\\shell\\open\\command"}->{'\\'};
>`$http $url`;
Ok. Well, it certainly opened up new windows on Mozilla, unfortunately, it
didn't pass the URL to Mozilla correctly - I got search results from
NetScape for the term "". Sigh.
Morbus Iff
.sig on other machine.
http://www.disobey.com/
http://www.gamegrene.com/
RE: [perl-win32-gui-users] Opening a *New* Browser Window?
Well, then you just take the best of both ... first, you open a new browser
window and then you do what you did before. I pretty sure that the
ShellExecute will target this new browser. At least, when I click a link in
a mail in this rotten !#^%$Outlook, it does the very same &^%!# thing of
navigating away from the most important web site I happen to have been
looking at. So, I first open a new browser and then click the link - voila.
-Original Message-
From: Morbus Iff [mailto:[EMAIL PROTECTED]
Sent: Donnerstag, 31. Mai 2001 14:56
To: perl-win32-gui-users@lists.sourceforge.net;
'perl-win32-gui-users@lists.sourceforge.net'
Subject: RE: [perl-win32-gui-users] Opening a *New* Browser Window?
>use Win32::TieRegistry;
>$http = $Registry->{"Classes\\http\\shell\\open\\command"}->{'\\'};
>`$http $url`;
Ok. Well, it certainly opened up new windows on Mozilla, unfortunately, it
didn't pass the URL to Mozilla correctly - I got search results from
NetScape for the term "". Sigh.
Morbus Iff
.sig on other machine.
http://www.disobey.com/
http://www.gamegrene.com/
___
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
Re: [perl-win32-gui-users] Opening a *New* Browser Window?
| So, I first open a new browser and then click the link - voila.
Side topic: hold shift and press the left mouse button on any link and it will
open a new browser with that address.
regards,
erick
- Original Message -
From: Piske, Harald <[EMAIL PROTECTED]>
To:
Sent: Thursday, May 31, 2001 3:10 PM
Subject: RE: [perl-win32-gui-users] Opening a *New* Browser Window?
| Well, then you just take the best of both ... first, you open a new browser
| window and then you do what you did before. I pretty sure that the
| ShellExecute will target this new browser. At least, when I click a link in
| a mail in this rotten !#^%$Outlook, it does the very same &^%!# thing of
| navigating away from the most important web site I happen to have been
| looking at. So, I first open a new browser and then click the link - voila.
|
| -Original Message-
| From: Morbus Iff [mailto:[EMAIL PROTECTED]
| Sent: Donnerstag, 31. Mai 2001 14:56
| To: perl-win32-gui-users@lists.sourceforge.net;
| 'perl-win32-gui-users@lists.sourceforge.net'
| Subject: RE: [perl-win32-gui-users] Opening a *New* Browser Window?
|
|
| >use Win32::TieRegistry;
| >$http = $Registry->{"Classes\\http\\shell\\open\\command"}->{'\\'};
| >`$http $url`;
|
| Ok. Well, it certainly opened up new windows on Mozilla, unfortunately, it
| didn't pass the URL to Mozilla correctly - I got search results from
| NetScape for the term "". Sigh.
|
|
| Morbus Iff
| .sig on other machine.
| http://www.disobey.com/
| http://www.gamegrene.com/
|
|
| ___
| Perl-Win32-GUI-Users mailing list
| Perl-Win32-GUI-Users@lists.sourceforge.net
| http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
|
| ___
| Perl-Win32-GUI-Users mailing list
| Perl-Win32-GUI-Users@lists.sourceforge.net
| http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
|
