Thread GUI Aufbau mit TK (7 answers)
Opened by NixIsFix at 2009-08-12 15:10

NixIsFix
 2009-08-12 15:10
#124159 #124159
User since
2009-04-28
16 Artikel
BenutzerIn
[default_avatar]
moin,

sitze bzw ärger mich gerade ein wenig mit TK rum. Versuche eine Seite zu entwerfen mit der Hilfe von frames.
Solange wie die Frames leer sind ist es ja kein problem. (bin ein kleiner TK newbie)
aber sobald ich z.B. ein labe einfüge verhaut es mir die strktur.

Als ansatz wählte ich eine fixe, verschatelte frame struktur kurz gefasst :

die frames bilden einen table nach. Hier mal der Code:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

use strict;
use Tk;
my $MW= MainWindow->new;
$MW -> configure(-bg => 'white');

# Frames-Zeilen
my $F1 = $MW->Frame(-width => 600,-height => 200)->pack(-side => 'top',-anchor => "nw");
my $F2 = $MW->Frame(-width => 600,-height => 100)->pack(-side => 'top',-anchor => "nw");
my $F3 = $MW->Frame(-width => 600,-height => 30)->pack(-side => 'top',-anchor => "nw");

# Zellen in den Zeilen
my $FA = $F1->Frame(-width => 200,-height => 200,-bg => 'yellow')->pack(-side => 'left',-anchor => "nw");
my $FB = $F1->Frame(-width => 400,-height => 200)->pack(-side => 'left',-anchor => "nw");
my $FC = $F2->Frame(-width => 200,-height => 100)->pack(-side => 'left',-anchor => "nw");
my $FD = $F2->Frame(-width => 400,-height => 100, -bg => 'yellow')->pack(-side => 'left',-anchor => "nw");
my $FE = $F3->Frame(-width => 600,-height => 30)->pack(-side => 'left',-anchor => "nw");

#Label
#my $lbl_1 = $FD->Label (-text=>"Projectname:\n\nProjectpath:\n\nconfig files exist:")->pack();

MainLoop;


schaut euch einfach es mit label und ohne label an - dann weiß man was ich meine.
Kann mir jemand helfen? bzw meinen gedankenfehler lösen/aufklären?

View full thread GUI Aufbau mit TK