[Perl-Tk] Gruppenfeld - #45216 (Graphische Oberflächen)

Matze

2006-01-31 21:09

User since
2005-08-29
222 Artikel
BenutzerIn

Du musst ja auch nicht unbedingt -height benutzen, bei grid kannst du doch einfach -rowspan höher setzen und das Widget dann mit -sticky => "nsew" strecken.

Wenn du gleichmäßig große 'gird-Felder' haben möchtest, dann benutze doch folgendes direkt vor deinem MainLoop:

Code (perl): (dl )

my ($columns, $rows) = $main_window -> gridSize();

for (my$i = 0; $i < $columns; $i++) {
  $main_window -> gridColumnconfigure($i, -weight => 1);
}
for (my$i = 0; $i < $rows; $i++) {
  $main_window -> gridRowconfigure($i, -weight => 1);
}

MfG. Matze

Mit freundlichen Grüßen: Matze