Thread Tk Fenster per update vergrössern? Effekt (5 answers)
Opened by Andy at 2010-02-28 03:22

Kalle
 2010-02-28 18:23
#133797 #133797
User since
2007-03-18
48 Artikel
BenutzerIn
[default_avatar]
hmm geht nicht ? Aber dafür ist update doch da.
Bei mir geht das. Vielleicht magst du folgendes Beispiel nochmal probieren ?
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

#!/usr/bin/perl
use strict;
use warnings;

use Tk;

my $mw = MainWindow->new(-title=>'Tk Test');

for (my $w=0;$w<=800;$w=$w+8) {
  $mw->configure(-width=>$w, -height=>$w/4);
  $mw->update;
  #$mw->DoOneEvent;
  #$mw->idletasks;
}

MainLoop;


Mit repeat würd ich in diesem Fall nicht arbeiten. Zumindest nicht, solange das Programm nicht gleichzeitig auch noch andere Sachen erledigen muss.
So ein repeat hat schon seine Vorteile, da hast du recht, aber genau dort würde ich dann $widget->update aufrufen oder mit DoOneEvent oder idletasks der MainLoop etwas Gelegenheit verschaffen die widgets upzudaten, wenn Perl ansonsten mit langwierigen anderen subs die GUI blockieren würde.

View full thread Tk Fenster per update vergrössern? Effekt