Opened by frodus at 2006-04-16 14:09
User since
2003-09-26
147 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-09-26
147 Artikel
BenutzerIn
Hi Leute,
wie muss ich meine Tk Anwendung aufbauen, damit eine Veränderung der Fenstergrösse nicht im totalen Chaos endet?
Mir würde glaube ich ein Beispiel schon weiterhelfen. Ich habe hier mal den Code aus einem unserer Wiki Beispiel kopiert:
Wie müsste man den Code verändern damit ein Resize vernünftig funktioniert?
Danke,
Frodus
wie muss ich meine Tk Anwendung aufbauen, damit eine Veränderung der Fenstergrösse nicht im totalen Chaos endet?
Mir würde glaube ich ein Beispiel schon weiterhelfen. Ich habe hier mal den Code aus einem unserer Wiki Beispiel kopiert:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
#!/usr/bin/perl
use strict;
use warnings;
use Tk;
my $top = MainWindow->new();
my $frame1 = $top->Frame(-width => 200,
-height => 50,
-bg => 'black');
my $frame2 = $top->Frame(-width => 200,
-height => 50,
-bg => 'red');
my $frame3 = $top->Frame(-width => 200,
-height => 50,
-bg => 'yellow');
$frame1->pack(-side => 'top');
$frame2->pack(-side => 'top');
$frame3->pack(-side => 'top');
MainLoop();
Wie müsste man den Code verändern damit ein Resize vernünftig funktioniert?
Danke,
Frodus