Great! Thank you! Steve H.
-----Original Message----- From: Jeremy White [mailto:[EMAIL PROTECTED] Sent: Wednesday, June 04, 2003 7:31 AM To: [EMAIL PROTECTED]; perl-win32-gui-users@lists.sourceforge.net Subject: RE: [perl-win32-gui-users] XP color and prototype mismatch problems this should work: use Win32::GUI; my $loginInfoBox = new Win32::GUI::DialogBox ( -name => 'loginInfoBox', -height => 250, -width => 250, -text => "Login Info", -pos => [($dw - 250)/2, ($dh - 250)/2], -style => WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU, -exstyle => WS_EX_APPWINDOW, -class => Win32::GUI::Class->new(-name => "classxpcolour",-color => 16), ); $loginInfoBox->Show; Win32::GUI::Dialog(); >From: "Howard, Steven (US - Tulsa)" <[EMAIL PROTECTED]> >To: Jeremy White <[EMAIL PROTECTED]>, "Howard, Steven (US - Tulsa)" ><[EMAIL PROTECTED]>, perl-win32-gui-users@lists.sourceforge.net >Subject: RE: [perl-win32-gui-users] XP color and prototype mismatch >problems >Date: Wed, 4 Jun 2003 07:21:09 -0500 > >Thank you for the response, Jeremy. > >Sounded easy, but the change I made did not make any difference to the >appearance of the dialog box. Here is the definition of the Dialog Box. >What >am I missing to get this to work? > > my $loginInfoBox = new Win32::GUI::DialogBox > ( > -name => 'loginInfoBox', > -height => 250, > -width => 250, > -text => "Login Info", > -pos => [($dw - 250)/2, ($dh - >250)/2], > -style => WS_POPUP | >WS_VISIBLE | WS_CAPTION | WS_SYSMENU, > -exstyle => WS_EX_APPWINDOW, > -color => 16, > > ); > >Thanks again > >Steve H. > >-----Original Message----- >From: Jeremy White [mailto:[EMAIL PROTECTED] >Sent: Wednesday, June 04, 2003 7:04 AM >To: [EMAIL PROTECTED]; perl-win32-gui-users@lists.sourceforge.net >Subject: Re: [perl-win32-gui-users] XP color and prototype mismatch >problems > > >In XP, when I create a GUI in Perl, the background color is always white. > >This looks very bad. How do I change the background color to the windows > >gray? > > > >I believe this has been fixed in the new version of win::gui - but it >hasn't > >been release yet. For the time being, set the color of the window to 16 - >works with older versions of windows to. > >Cheers, > >jez. > >_________________________________________________________________ >It's fast, it's easy and it's free. Get MSN Messenger today! >http://www.msn.co.uk/messenger >- This message (including any attachments) contains confidential >information >intended for a specific individual and purpose, and is protected by law. - >If you are not the intended recipient, you should delete this message and >are hereby notified that any disclosure, copying, or distribution of this >message, or the taking of any action based on it, is strictly prohibited. _________________________________________________________________ Tired of 56k? Get a FREE BT Broadband connection http://www.msn.co.uk/specials/btbroadband - This message (including any attachments) contains confidential information intended for a specific individual and purpose, and is protected by law. - If you are not the intended recipient, you should delete this message and are hereby notified that any disclosure, copying, or distribution of this message, or the taking of any action based on it, is strictly prohibited.
