in reply to Make top level window unclosable Perl tk

You can use
$toplevel->protocol('WM_DELETE_WINDOW', sub{});

[download]

to disable the close button.

Update: sub{} used instead of q() after trying myself, even if the documentation states otherwise.

لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Replies are listed 'Best First'.
Re^2: Make top level window unclosable Perl tk
by amboxer21 (Sexton) on Jan 21, 2014 at 23:23 UTC
    Your suggested code did not work
    $toplevel->protocol('WM_DELETE_WINDOW', q());

    but this did 
    $mw->protocol(WM_DELETE_WINDOW => sub { $mw->raise } );

    [download]

    I appreciate the reply and help!! The MW can still be pushed to the background.
[reply]
[d/l]
[select]
      Yeah, check the update.
      لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ
[reply]
        Sorry, I didn't see the update but I am still able to push the MW to the background and continue using my computer =( I need a solution that disables all usage until the proper password is entered. Thank you!
[reply]

In Section Seekers of Perl Wisdom