Here's how I'm doing it.  The code is borrowed from someone else, perhaps
Aldo's examples.

$SCR_WIDTH  = Win32::GUI::GetSystemMetrics(0);
$SCR_HEIGHT = Win32::GUI::GetSystemMetrics(1);

$WIDTH  = 350;    # Window Width
$HEIGHT = 250;    # Window Height

$LEFT = ($SCR_WIDTH/2) - ($WIDTH}/2);
$TOP = ($SCR_HEIGHT/2) - ($HEIGHT}/2);

jb
----- Original Message -----
From: "Felice Vittoria" <[EMAIL PROTECTED]>
To: <perl-win32-gui-users@lists.sourceforge.net>
Sent: Friday, March 22, 2002 8:56 AM
Subject: [perl-win32-gui-users] Centering a window


> Hello all,
>
> I remember seeing this info somewhere but I forgot.  How do you center a
window?
>
> Note:  I'm using Win32-GUI v0.0.665
>
> TIA,
> Felice
>
>
> 2,000,000,000 Web Pages--you only need 1. Save time with My Lycos.
> http://my.lycos.com
>
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Perl-Win32-GUI-Users@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users


Reply via email to