Bonjour,
Je ne sais pas si mon post serai plus approprié dans la partie module et je m'en excuse par avance. Merci donc au modérateur de diriger ce post vers la bonne partie.
J'aimerais, donc, savoir comment rendre impossible la fermeture d'une fenêtre issue du module GTK2 de perl. J'aimerais aussi que cette fenêtre reste au dessus des autres. Tout comme une boite de dialogue sans en être une.
J'ai trouvé l'objet set_modal mais il ne répond pas à mes attente car la fenêtre passe dessous les autres, si je focalise ou démarre sur un autre programme par exemple.
Merci de votre aide .....
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 # #!/usr/bin/perl -w use strict ; use Gtk2 '-init' ; Création de la fenêtre my $window = Gtk2::Window->new( 'toplevel' ) ; $window->signal_connect('delete_event' , sub { Gtk2->main_quit ; } ) ; $window->set_title( 'Test' ) ; $window->set_size_request(450, 200); $window->set_border_width(15); $window->set_position('center-always'); $window->set_modal(1); #Fenetre non modifialble FALSE $window->set_resizable (0); $window->show()
Partager