From: Jeremy W. <jez...@ho...> - 2003-06-04 12:04:26
|
>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 |
From: Frazier, J. J. <Joe.Frazier@Peopleclick.com> - 2003-06-04 12:27:10
|
This is "ussually" caused by the use of both lines : use Win32;=20 use Win32::GUI; =20 Both of these files export the same contacts (this is one of the reasons = the perlmodlib specifically state that exporting things automatically is = generally a bad practice.) . If you have use Win32 in your script, = change it to "use Win32();". Adding the parenthesis basically just = turns off the automatic export of methods and variables. This of course = meanst that you have to fully quallify methods and variables to use = them, but you should be doing that anyway. 8^) If I remember correctly, = Jan change the Win32 package for some of the more recent ppm releases = and installs of activeperl to not export anything automatically, so = upgrading may just fix it also. Of course, if you do NOT use Win32; in = your script, then something else you are using contains this use = statement and you can again either get the latest version or dig into = each module and fix yourself. =20 Joe Frazier, Jr. Technical Support Engineer Peopleclick Service Support Tel: +1-800-841-2365 E-Mail: mailto:su...@pe... -----Original Message----- From: Howard, Steven (US - Tulsa) [mailto:sth...@de...] Sent: Wednesday, June 04, 2003 7:51 AM To: per...@li... Subject: [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? =20 Also, anytime I add the use Win32::GUI; line to the script, exporter = generates numerous warnings about prototype mismatches. These are not = generated if the script is run on a Win 2K, or NT 4.0 machine. Is there = something I need to do to keep this from happening? It doesn't seem to = hurt anything - it's just a nuisance - especially when I am trying to = debug something else within the script. =20 Thanks, =20 Steve Howard - 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. |
From: Jeremy W. <jez...@ho...> - 2003-06-04 12:31:00
|
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)" <sth...@de...> >To: Jeremy White <jez...@ho...>, "Howard, Steven (US - Tulsa)" ><sth...@de...>, per...@li... >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:jez...@ho...] >Sent: Wednesday, June 04, 2003 7:04 AM >To: sth...@de...; per...@li... >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 |
From: Jeremy W. <jez...@ho...> - 2003-06-04 19:09:09
|
Indeed there is, but for whatever reason, setting the option doesn't work. >From: "Borus Gabor" <gab...@fr...> >To: <per...@li...> >Subject: Re: [perl-win32-gui-users] XP color and prototype mismatch >problems >Date: Wed, 4 Jun 2003 16:54:01 +0200 > >Hello > >There's a big difference between creating a new class: >-class =>Win32::GUI::Class->new(-name => "classxpcolour",-color => 16), > and set an option (-color)! >See the Win32::GUI documentation for Class... >Regards > >Gabor >----- Original Message ----- >From: "Howard, Steven (US - Tulsa)" <sth...@de...> >To: "Jeremy White" <jez...@ho...>; "Howard, Steven (US - Tulsa)" ><sth...@de...>; <per...@li...> >Sent: Wednesday, June 04, 2003 2:21 PM >Subject: RE: [perl-win32-gui-users] XP color and prototype mismatch >problems > > > > 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:jez...@ho...] > > Sent: Wednesday, June 04, 2003 7:04 AM > > To: sth...@de...; per...@li... > > 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 >aw. - > > 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. > > > > > > ------------------------------------------------------- > > This SF.net email is sponsored by: Etnus, makers of TotalView, The best > > thread debugger on the planet. Designed with thread debugging features > > you've never dreamed of, try TotalView 6 free at www.etnus.com. > > _______________________________________________ > > Perl-Win32-GUI-Users mailing list > > Per...@li... > > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users > > > > > > > > > >------------------------------------------------------- >This SF.net email is sponsored by: Etnus, makers of TotalView, The best >thread debugger on the planet. Designed with thread debugging features >you've never dreamed of, try TotalView 6 free at www.etnus.com. >_______________________________________________ >Perl-Win32-GUI-Users mailing list >Per...@li... >https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users _________________________________________________________________ It's fast, it's easy and it's free. Get MSN Messenger today! http://www.msn.co.uk/messenger |
From: Stuart A. <stu...@at...> - 2003-06-05 07:47:26
|
Jeremy, all: While I have not explored this into much depth (I run WinXP and have exactly this problem), I came across this help topic in VC++60: "Using Windows XP Visual Styles". Obviously I can't point you there, but I googled for it and got: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnwxp/h tml/xptheming.asp which is that topic. From what I've seen in XP-themes, its a nice idea, but it isn't consistent. It seems to be buggy because the coloring scheme does not always take affect. Not all apps seem to accept it( window coloring, but background is ok, ie, no ugly windows). There is some discussion on "InitCommonControls()" for each control and window. This could be an area to look into as well. Hope this helps you (and others), I just have this as a real low priority on my "TODO" list ;^> Anyone that DOES come across the solution, pleas post it and receive on heck-uva kudo! Good Luck, -Stuart -----Original Message----- From: per...@li... [mailto:per...@li...] On Behalf Of Jeremy White Sent: Wednesday, June 04, 2003 8:04 AM To: sth...@de...; per...@li... 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 SF.net email is sponsored by: Etnus, makers of TotalView, The best thread debugger on the planet. Designed with thread debugging features you've never dreamed of, try TotalView 6 free at www.etnus.com. _______________________________________________ Perl-Win32-GUI-Users mailing list Per...@li... https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users |