We've been running ActivePerl 5.8.0 on Windows for some time and
recently upgraded to ActivePerl 5.8.8. Along the way (ActivePerl
5.8.4) the Perl Tk module was upgraded to 804.027. Previously, it had
been using 800.???. While this fixed the original problem we had, it
introduced a problem where the behavior of DialogBox changed and our
dialog boxes are no longer being displayed. A code snippet that
demonstrates this is:
=======
use Tk;
use Tk::DialogBox;
$main = MainWindow->new(); # this creates the main dialog box
$dialog = $main->DialogBox (-title => "TITLE BAR TEXT", -buttons =>
[ "Button 1","Button 2" ] ); # this creates the desired box
$main->withdraw(); # this makes the main dialog box invisible
$button = $dialog->Show(); # this makes the desired dialog box appear
$main->destroy(); # this destroys the main dialog box
print "Button pushed: $button\n";
=======
The problem is that the user wants to hide the main window and still
show the DialogBox. With version 4.x of DialogBox.pm, the "withdraw"
that hides $main also keeps $dialog from being shown on the screen.
How should one code it where you hide the main Tk window, but are
still allowed to show a DialogBox created off the main window?
Steve
--++**==--++**==--++**==--++**==--++**==--++**==--++**==
ptk mailing list
ptk@xxxxxxxxxxxxxxxxxx
https://mailman.stanford.edu/mailman/listinfo/ptk
|
