in reply to Re^2: setting up multiple editors in Tkx
in thread setting up multiple editors in Tkx

So what if its single window? Copy/paste
  • Comment on Re^3: setting up multiple editors in Tkx

Replies are listed 'Best First'.
Re^4: setting up multiple editors in Tkx
by momo33 (Beadle) on Jul 13, 2009 at 17:13 UTC
    For my purpose, it _must_ be multiple-window.
[reply]
      I don't understand; first it has to compile 
      sub Create_Win {
    my ($i) = @_;
    my $mw_sp = Tkx::widget->new(".");
    my $sp = $mw_sp->new_toplevel();
    $sp->g_wm_title( $i );
##    $sp->OnDestroy( [ &Report_Des, $i ] ); # bad option "OnDestroy":
+ must be cget or configure 
    $sp->g_bind( '<Destroy>', [ \&Report_Des, $i ] ); 

    Tkx::package_require("BWidget"); # new_ScrolledWindow
    my $sw = $sp->new_ScrolledWindow();
    $sw->g_pack(
        -fill   => "both",
        -expand => 1,
    );
    $mw_sp->configure( -menu => mk_menu($mw_sp) );
}

      [download]
[reply]
[d/l]
        Fixed in the original question. Now I do not get a menu.
[reply]

In Section Seekers of Perl Wisdom