Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Size varies using TK in different versions?

by madtoperl (Monk)
on May 24, 2006 at 11:36 UTC ( #551334=perlquestion: print w/ replies, xml ) Need Help??
madtoperl has asked for the wisdom of the Perl Monks concerning the following question:

Hi Monks,

I am facing a problem in using TK with my code,The code is given below
use strict; use Tk; my $main = MainWindow->new(-title => "Testing purpose for larger file" +,-width => 500);
MainLoop;
Issue:
----------------------------------------------------------
When I run this on a Windows XP box, the window's width is such that the
title is mostly obscured. On a Win98 box, on the other hand, the title
is fully visible. What's more, changing the -width option seems to have
no effect on the window width on XP. Am I missing something? (To
my knowledge, both machines have the same version of Tk.)

Advise me monks!!

2006-10-15 Unapproved by planetscape once evidence of habitual plagiarism uncovered.

Comment on Size varies using TK in different versions?
Download Code
Re: Size varies using TK in different versions?
by mikasue (Friar) on May 24, 2006 at 14:59 UTC
    Um.... I am writing a program using Perl/Tk. I like it and haven't had much trouble with it. When you say "the title is mostly obscured", what do you mean? Where does it cut off? Did you add any Frames to the MainWindow? Sometimes the way you pack frames in a window can have an effect on other things.
Re: Size varies using TK in different versions?
by CountOrlok (Friar) on May 24, 2006 at 15:54 UTC
    I tried this on an XP box with Perl 5.6.1, Tk version 800, and this code displays perfectly fine. Title bar length was 500 pixels.
    I also ran it from a linux box with Perl 5.8.3, Tk 804, and Perl 5.6.1, Tk 800, displaying it on the XP box using Exceed as the x-server. Those also displayed fine and in the exact same size.
    Are you sure the versions are what you think they are? ($Tk::VERSION)

    -imran

Re: Size varies using TK in different versions?
by spiritway (Vicar) on May 24, 2006 at 22:51 UTC

    Hi. Your program worked as expected on WinXP Home; ActivePerl 5.8.7, build 813; and Tk version 8.4. This suggests that the reason why you are having difficulties isn't because of the OS you're using, but likely because of some other possibility. You may, for instance, have different Tk versions, despite thinking they are the same. You may want to double-check this before going too far.

Re: Size varies using TK in different versions?
by wulvrine (Friar) on May 25, 2006 at 12:42 UTC
    Just out of curiosity, have you modified the font and or font size on your system? I have done this in the past and had different programs 'look' strange. If you have, it might be something similar which would have nothing to do with Perl or Perl::TK itself.

    <update: added questionmark and spelled different properly>

    s&&VALKYRIE &&& print $_^q|!4 =+;' *|
Re: Size varies using TK in different versions? = PLAGIARISM
by liverpole (Monsignor) on Oct 14, 2006 at 15:53 UTC
    Plagiarized from this site, created February 10th, 2006, which says:
    This will probably reveal my ignorance of Tk more than anything, but I'll risk it. Consider the following code: use strict; use Tk; my $main = MainWindow->new(-title => "This is a test of a long title", -width => 500); MainLoop; When I run this on a Windows XP box, the window's width is such that t +he title is mostly obscured. On a Win98 box, on the other hand, the title is fully visible. What's more, changing the -width option seems to hav +e no effect on the window width on XP. Am I missing something? (To the best of my knowledge, both machines have the same version of Tk.) -- Eric Amick Columbia, MD

    s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/
      Plagiarized from this site, created February 10th, 2006, which says:

      How fun! Plagiarizing a... question!! In other circumstances I would have thought of "cross-media multiposting".

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://551334]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (8)
As of 2014-12-27 14:49 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (177 votes), past polls