Opened by Gast at 2008-03-07 12:07
Hallo Community,
kann mir bitte jemand helfen. Ich versuche leider vergeblich die Events eines MainWindow abzufangen um darauf zu reagieren. Leider funktioniert es nicht.
Ich möchte Code ausführen, wenn ein Fenster aktiviert bzw. deaktiviert wird und wenn Fenster vergrössert/verkleinert wird.
Mein Versuch sieht so aus.
Offensichtlich ist der Versuch aber falsch, da es nicht funktioniert. Leider sind meine Englisch-Kenntnisse etwas bescheiden, so dass ich die Module bind.pod und Andere nicht verstehen kann :(.
Google habe ich auch schon bemüht, aber auch ohne Erfolg.
Kann mir bitte jemand sagen, wie ich es machen soll?
Betriebssystem ist Windows und Perl-Version ist 5.8.4.
Vielen Dank!
Alex
kann mir bitte jemand helfen. Ich versuche leider vergeblich die Events eines MainWindow abzufangen um darauf zu reagieren. Leider funktioniert es nicht.
Ich möchte Code ausführen, wenn ein Fenster aktiviert bzw. deaktiviert wird und wenn Fenster vergrössert/verkleinert wird.
Mein Versuch sieht so aus.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
use Tk;
my $mw = MainWindow->new;
$mw->bind('<Activate>' => sub { print "Aktiviert\n"; });
$mw->bind('<Deactivate>' => sub { print "deaktiviert\n"; });
$mw->bind('<ResizeRequest>' => sub { print "Verändert\n"; });
MainLoop;
Offensichtlich ist der Versuch aber falsch, da es nicht funktioniert. Leider sind meine Englisch-Kenntnisse etwas bescheiden, so dass ich die Module bind.pod und Andere nicht verstehen kann :(.
Google habe ich auch schon bemüht, aber auch ohne Erfolg.
Kann mir bitte jemand sagen, wie ich es machen soll?
Betriebssystem ist Windows und Perl-Version ist 5.8.4.
Vielen Dank!
Alex