Perl TK Disable Maximize/Minimize/Close-X

[clueo8]

If I define a new window, is there a way to disable the maximize/minimize/close buttons on the top right of the window?

my $main_win = MainWindow -> new();

 

[mlibeson]

perldoc Tk::Wm might help.

Also on another topic you asked about disabling the resize of the window. Try:

$widget->resizable(0,0);

Where the first digit is the width and the second is the height. In the example above, both are disabled.

Here the width can be resized, but the height is disabled:
$widget->resizable(0,1);



Michael Libeson

 

[clueo8]

This has worked with a charm but is there a way to also disable the 'X' close button?

I really don't want users pressing it because my exit or done buttons I have created clear variables for later executions...

 

[mlibeson]

I know there is a way, or atleast there used to be a way to do so. I just do not remember how. You can look into something like:

$mw->protocol(WM_DELETE_WINDOW,print STDOUT "ERROR appears but no close.\n");

Michael Libeson

 

[dmazzini]

$mw->overrideredirect(1);

dmazzini
GSM System and Telecomm Consultant