in reply to Perl Tk: How Can I get the MainWindow Configuration?

I'm not quite sure why you want to get the MainWindow info in a way similar to packInfo; however, I ran a simple search of perlmonks and found a way that might help you. Take a look at zentara's Re^3: Toplevel Window References in Perl Tk. As for getting the MainWindow configuration, look at the script here.
  • Comment on Re: Perl Tk: How Can I get the MainWindow Configuration?

Replies are listed 'Best First'.
Re^2: Perl Tk: How Can I get the MainWindow Configuration?
by ungalnanban (Pilgrim) on Feb 25, 2010 at 12:01 UTC

    I want to show the width and height of the MainWindow in status bar and change the Title of the Window Based on the arguments.
    Is there any function or any way to achieve this?

[reply]
      Like this?: 
      ...
my $height = $mw->screenheight;
my $width  = $mw->screenwidth;

my $geom = $mw->geometry;

$mw->title("New Title ($geom)");

      [download]
      Update:

      Changed code to show geometry of the window instead of the screen.

      Update2: Width and height (for any widget): 
      my $height = $mw->height;
my $width  = $mw->width;

$mw->title("New Title ($width x $height)");

      [download]

      Other options are here: Tk::Widget

[reply]
[d/l]
[select]
        Yes I got It..
        Thanks
[reply]
      I am confused about this. When you create a MainWindow, you can specify the minimum size for the x,y coordinates. So you know that. You should also know the title text that you want.

      change the Title of the Window Based on the arguments. Change based upon what arguments?

[reply]

        Usually you don't specify the geometry of the window when you create it, but let Tk calculate and display a minimum window, just to fit all the widgets inside. In this case the 'width', 'height' and 'geometry' methods ca be used to find out the result.

        That is because Tk widgets may get different sizes with different screen resolutions and/or fonts.

        The title can be changed, let's say, according to some action you choose by menu.

        Regards, Stefan

[reply]

        I didn't specify the minimum size for the main window, you can resize the window. After resizing I want the current size of the Main Window.

        I will give the file name as argument. So the Main Window title should be the name of the file.
        Then I want the current title of the Main window.

[reply]

In Section Seekers of Perl Wisdom