Indeed, this works. I've long wondered about a way to do it, and I've now
incorporated this into my (only) Win32::GUI program. I am planning to write
some more Win32::GUI programs soon. It seems, though, that this solution isn't
completely general. While I don't personally use it anymore, I recall MS Office
had an optional taskbar that could be docked similarly to the Windows taskbar.
And some laptops have "power management toolbars". etc.
Does anyone know of a more general technique for avoiding all the
toolbars/taskbars that might nibble away at the edges of the desktop?
"Piske, Harald" wrote:
> $_ = Win32::GUI::FindWindow ("Shell_TrayWnd", "");
> @_ = Win32::GUI::GetWindowRect ($_);
>
> $width = $_[2] - $_[0];
> $height = $_[3] - $_[1];
>
> tested on Win2k and Win98. Interestingly, the position of the taskbar is
> slightly off the screen (-2).
>
> Note that the taskbar can be moved to each of the four window edges (eight
> on dual-screen, which would look like off the desktop), so don't put your
> program fixed at (0,0). I have mine upright at the left side instead of flat
> at the bottom. If it takes up less of the vertical extend, which programs
> use for status bars, tool bars, menu bars and so on. Take web browsers for
> instance. Web pages are usually longer than the screen height but less wide
> than the screen width.
>
> Have fun,
> Harald
>
> | -----Original Message-----
> | From: Webmaster CZ [mailto:[EMAIL PROTECTED]
> | Sent: Wednesday, May 23, 2001 12:51
> | To: perl-win32-gui-users@lists.sourceforge.net
> | Subject: [perl-win32-gui-users] Taskbar & perl2exe -gui crash
> |
> |
> | Hi !
> |
> | I have two problems:
> |
> | a)
> | My program start in maximal width & height with this code:
> |
> | ---------Code----------------
> | $screensize = Win32::GUI::GetDesktopWindow();
> | $screensize_width = Win32::GUI::Width($screensize);
> | $screensize_height = Win32::GUI::Height($screensize);
> | ---------Code----------------
> |
> | The problem is, that i must subtract the size of the Taskbar...
> | so how can i read the size (height) of it ????
> |
> |
> | b)
> | If i compile my program with perl2exe and "-gui", then the
> | program crash on exit.... ever: the "exit code" are:
> |
> | -----------Code-----------
> | sub Window_Terminate {
> | return -1;
> | }
> |
> | sub Exit_Click {
> | return -1;
> | }
> | ------------Code---------
> |
> | Any idea ???
> |
> |
> |
> | cu
> | Thorsten Sommer
> |
> |
> | _______________________________________________
> | 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
--
Glenn
=====
Due to the current economic situation, the light at the
end of the tunnel will be turned off until further notice.
