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.

Reply via email to