Fenêtre de la console Perl – comment la rendre impossible à fermer?

Je voudrais savoir s’il existe un moyen de cacher le bouton de fermeture ou au moins le rendre non cliquable lors de l’utilisation de Perl dans la console. Je sais que cela est possible lors de l’utilisation de l’interface graphique, mais je dois créer une application basée sur la console et ne pas vouloir que l’utilisateur la ferme volontairement.

use ssortingct; use Win32::Console::ANSI qw/ SetCloseButton /; $SIG{INT}='IGNORE'; # no Ctrl-C interrupt SetCloseButton(0); # no close button 

Je ne pense pas que vous pouvez empêcher les utilisateurs de fermer la fenêtre d’invite de commandes Windows. Non seulement vous devez masquer le bouton Fermer, mais vous devez également masquer les éléments de menu système associés, les éléments du menu contextuel (en fonction de la version de Windows) et capturer le raccourci clavier Alt + F4 .

Si vous aviez le contrôle de l’ensemble du processus de bout en bout, vous pourriez faire quelque chose d’intelligent en masquant la fenêtre de la console, en capturant la sortie et en l’envoyant dans une fenêtre que vous avez créée (sans la capacité de fermeture, bien sûr).

Sinon, vous devrez simplement croire que vos utilisateurs sont des grands garçons et des filles et ne fermeront pas la fenêtre.