See the attached file. The "X" icon is about 50% smaller than normal on my Win2k system (not tested elsewhere) using GUI .668 and Perl 5.0.1.
use Win32::GUI;
use strict;
use warnings;
package main;
my $Window = new Win32::GUI::Window (
-name => "Window",
-topmost => 1,
-left => 300,
-dialogui => 1,
-top => 400,
-width => 258,
-height => 280, #235,
-maxsize => [258,280],#[258,235],
-minsize => [258,280],#[258,235],
-text => "No Tool Window",
-maximizebox => 0,
-minimizebox =>1,
-helpbutton => 0,
-resizable =>0,
);
my $Window2 = new Win32::GUI::Window (
-name => "Window2",
-topmost => 1,
-toolwindow => 1
-left => 600,
-dialogui => 1,
-top => 400,
-width => 258,
-height => 280, #235,
-maxsize => [258,280],#[258,235],
-minsize => [258,280],#[258,235],
-text => "With the ToolWindow",
-maximizebox => 0,
-minimizebox =>1,
-helpbutton => 0,
-resizable =>0,
);
sub Window_Terminate
{
return -1;
}
sub Window2_Terminate
{
return -1;
}
$Window2->Enable();
$Window2->Show();
$Window->Enable();
$Window->Show();
Win32::GUI::Dialog();
Note that as of yet, I have not played with the various settings for
-minimizebox, etc. It does look kind of cool with the small button, but I
would just like to know why....
Joe Frazier, Jr.
Technical Support Engineer
Peopleclick Service Support
Tel: +1-800-841-2365
E-Mail: mailto:[EMAIL PROTECTED]
> -----Original Message-----
> From: Frazier, Joe Jr
> Sent: Wednesday, June 25, 2003 4:09 PM
> To: Glenn Linderman; Win32 GUI
> Subject: RE: [perl-win32-gui-users] no taskbar entry for a Win32::GUI
> program
>
>
> I will take a screen shot in .bmp format tomorrow of both to
> show the difference and send to the list.
>
> Joe Frazier, Jr.
> Technical Support Engineer
> Peopleclick Service Support
>
> Tel: +1-800-841-2365
> E-Mail: mailto:[EMAIL PROTECTED]
>
>
> > -----Original Message-----
> > From: Glenn Linderman [mailto:[EMAIL PROTECTED]
> > Sent: Wednesday, June 25, 2003 3:48 PM
> > To: Frazier, Joe Jr; Win32 GUI
> > Subject: Re: [perl-win32-gui-users] no taskbar entry for a
> Win32::GUI
> > program
> >
> >
> > On approximately 6/25/2003 10:39 AM, came the following
> > characters from
> > the keyboard of Frazier, Joe Jr:
> > >> -----Original Message----- From: Glenn Linderman
> > >> [mailto:[EMAIL PROTECTED]
> > >>
> > >> On approximately 6/25/2003 7:04 AM, came the following
> characters
> > >> from the keyboard of Frazier, Joe Jr:
> > >>
> > >>>> -----Original Message----- From: Glenn Linderman
> > >>>> [mailto:[EMAIL PROTECTED] Sent: Tuesday, June 24, 2003 10:07 PM
> > >>>>
> > >>>> From time to time the question has been asked on this list
> > >>>> about how to have a Win32::GUI program running, but have no
> > >>>> entry in the taskbar.
> > >>>>
> > >>>> When hidden and disabled, no entry will appear, but when shown
> > >>>> or enabled, it will come back.
> > >>>
> > >
> > > This bit here, in combination with the first sentance was what
> > > confused me. My solution ( I assume someone on the list
> > presented it
> > > to me over 2 years ago when I created this app) does show
> > the icon on
> > > the task bar when the app is viewable on the screen, but
> not on the
> > > task bar when minimized. I was just unclear that you mean
> > no taskbar
> > > icon "ever". Question? is it the disable or the hide
> that removes
> > > from the taskbar? I have never really played with various
> > > combinations to find out what does what in such a
> > situation and what
> > > happens to the main window compaired to the task bar
> > icon..... Do not
> > > have time to check right now, but would make for more bulk in the
> > > documentation being written....
> >
> > It takes both "hidden" and "disabled" to remove a window's
> entry from
> > the taskbar using this technique. And when you "show" or
> > "enable", the
> > taskbar entry comes back.
> >
> > >>>> Unless, when you create the window, you use:
> > >>>>
> > >>>> -toolwindow => 1,
> > >>>>
> > >>>> There is a more complicated solution, involving creating a
> > >>>
> > >> fake main
> > >>
> > >>>> window, making a real main window with the fake main window as
> > >>>> a parent, and then deleting the fake main window. This
> > >>>> technique also works, but is much more complex than the option
> > >>>> above.
> > >>>
> > >
> > > I just knowticed that this option also seems to get rid of my
> > > Minimize button??
> >
> > Hmm. So it does. And it gets rid of the Maximize button
> > too. Except I
> > see you didn't have a Maximize button already. Looks like
> > -toolwindow
> > overrides -maximizebox, -minimizebox, and -helpbutton,
> > eliminating them
> > all, as well as getting rid of the taskbar entry.
> >
> > > It also makes the "X" to close the
> > > window like real small (1/3-1/2 normal size). This is on Win 2k.
> > > Perl 5.6.1, GUI .668.
> >
> > I'm using Perl 5.8, GUI 0.0.668, for reference.
> >
> > I don't notice an appreciable difference is the size of my
> > close box "X"
> > by adding the -toolwindow, for my window definitions. I
> > didn't try your
> > window definition, though. However, maybe that was due to
> > the fact that
> > I specified the same -font parameter for both cases.
> With a -font
> > parameter, you may be picking up different sized system
> fonts for the
> > two cases.
> >
> > --
> > Glenn -- http://nevcal.com/
> > ===========================
> > Like almost everyone, I receive a lot of spam every day, much of it
> > offering to help me get out of debt or get rich quick. It's
> > ridiculous.
> > -- Bill Gates
> >
> >
> >
>
>
> -------------------------------------------------------
> This SF.Net email is sponsored by: INetU
> Attention Web Developers & Consultants: Become An INetU
> Hosting Partner.
> Refer Dedicated Servers. We Manage Them. You Get 10% Monthly
> Commission!
> INetU Dedicated Managed Hosting http://www.inetu.net/partner/index.php
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>
>
<<attachment: ToolMenu.jpg>>
