3 Einträge, 1 Seite |
1
2
my $frame = $parent->Frame(-width => 300)->pack(-fill => 'x', -expand => 1);
$frame->Button(-text => 'ok', -command => sub{...})->pack();
1
2
3
my $frame = $parent->Frame(-width => 300)->pack(-fill => 'x', -expand => 1);
$frame->packPropagate(0);
$frame->Button(-text => 'ok', -command => sub{...})->pack();
3 Einträge, 1 Seite |