wie Ausgabe von Programmen in Tk darstellen?: Ausgabe von Konsolen Programmen - #41899 (Graphische Oberflächen)

quetzalcoatl

2004-04-09 22:10

User since
2004-04-01
51 Artikel
BenutzerIn
[default_avatar]

hmmm... also soweit - das er die Ausgabe im "Text" anzeigt bin ich schon mal:

Code: (dl )

$toplw=$main->Toplevel();
$text=$toplw->Text(-width=>50)->pack();

open(PROG, "/bin/tar -czvpf $ziel/$zielname -X $excludefiles /|" ) || die "Error! can't execute tar\n";
while(<PROG>) {
$text->insert('end', "$_"); $toplw->update();
}
close(PROG);

leider bleibt die Anzeige natürlich bei der ersten Zeile.
Wie kann ich denn, nachdem ich was hinzugefügt hab das Textende anzeigen lassen?

Edit: hab's nun mit "$text->SetCurser('end');" gelöst.

quetzal\n\n