Show us some code. The following updates the label in the main window before opening the dialog.
use strict; use warnings; use Tk; use Tk::Dialog; my $mw = MainWindow->new; my $label = $mw->Label (-text => "Foo bar bang")->pack; my $button = $mw->Button (-text => "Bar bang foo", -command => \&popup +)->pack; MainLoop; sub popup { my $dialog = $mw->Dialog; $label->configure (-text => "Bar bang foo"); $dialog->Show (); }
In reply to Re: Redraw Frame in Perl/TK
by GrandFather
in thread Redraw Frame in Perl/TK
by mikasue
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |