Textfenster

 [Vorheriges Kapitel]  [Vorherige Seite]  [Inhaltsverzeichnis]  [Nächste Seite]  [Nächstes Kapitel]

logviewer.pl
my $main = new MainWindow;
$main->configure('-title' => $logfile);

my $logwin = $main->Scrolled('ROText' =>
   '-borderwidth' => 3, '-relief' => 'groove',
   '-scrollbars' => 'e',
   '-height' => '20', '-width' => 80,
);
$logwin->fileevent($log, 'readable',
   sub { update_log($logwin, $log) });

*Widgets für Textfenster sind Text und ROText, wobei letzteres von dem Modul Tk::ROText exportiert wird. Text unterstützt frei editierbare Texte, während ROText alle Editieroperationen unterbindet.
 
*Neben den Ereignissen in Bezug auf die Benutzeroberfläche ist es auch möglich, auf Ereignisse bei IO-Verbindungen und auf zeitliche Ereignisse zu reagieren. (All dies läßt sich in einem select- oder poll-Systemaufruf regeln).
 
*Die Methode fileevent ruft die beim dritten Parameter angegebene Prozedur für jedes beim zweiten Parameter spezifizierte Ereignis für die beim ersten Parameter angegebene IO-Verbindung auf. Dies wird solange wiederholt, bis dies explizit rückgängig gemacht wird (z.B. bei dem dritten Parameter undef angeben).
 

 [Vorheriges Kapitel]  [Vorherige Seite]  [Inhaltsverzeichnis]  [Nächste Seite]  [Nächstes Kapitel]
Copyright © 1996 - 2003 Andreas Borchert, in HTML konvertiert am 01.10.2003