Query TK::MDI Interface

kranthi has asked for the wisdom of the Perl Monks concerning the following question:

Hi Monks
recently i am working with TK::MDI Interface in Perl TK, but i am unable to change the size of the child windows within the main window that i have created. I am trying the below code.

use Tk;
        use Tk::MDI;

        $mw = tkinit;
        $mdi = $mw->MDI(
                -style=>'win32',
                -background=>'white');

        $child2 = $mdi->add(-titletext=>'Listbox Title');
        $child2->geometry("275x250+100+10"); 
        $lb = $child2->Listbox->pack;
        $lb->insert(0,"A Listbox");
        
        MainLoop;
[download]

I hope you people will help me resolve this problem.

Comment on Query TK::MDI Interface Download Code

Replies are listed 'Best First'.
Re: Query TK::MDI Interface by Khen1950fx (Canon) on Aug 22, 2008 at 07:14 UTC
This is what you are looking for: t.pl	[reply]
Re^2: Query TK::MDI Interface by kranthi (Sexton) on Aug 22, 2008 at 10:01 UTC
Hi, Thanks for the response. Actually i have designed the Main windows with my desired size. Now i want to create the sub windows ( or New windows in the example that you send) These child windows should appear with the geometry given by me.	[reply]