Herausforderung für euch (Scrolled & Label) (Graphische Oberflächen)

[thread]4953[/thread]

Herausforderung für euch (Scrolled & Label)

Froschpopo

2005-04-19 01:06

User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]

Wer schafft's, das "hallo"-Label nach links oben in die Ecke zu sitzen? Ich zerbrech mir schon seit ner halben Woche den Kopf darüber und komm einfach nicht dahinter... die side's, anchors etc. hab ich rausgenommen, die haben mir nichts genutzt und würden euch nur verwirren.

Code: (dl )

#!/usr/bin/perl

use strict;
use Tk;
use Tk::Pane;

my $mw = MainWindow->new();

my $pane = $mw->Scrolled(
    "Pane",
     -scrollbars => 'e',
    -bg => 'green',
    -width=>300,
    -height=>260
)->pack();

$pane->Label(
    -text => "hallo"
)->pack();

MainLoop;

\n\n

ptk

2005-04-19 01:28

User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]

Tk::Pane dokumentiert -sticky.

Froschpopo

2005-04-19 01:32

User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]

JAAAHHAAA danke endlich !!! Hiermit ernenne ich dich zum Frosch-Chefpopo!! Du kannst mich jetzt "duzen", du netter kerl du... danke nochmals !

ptk

2005-04-19 01:35

User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]

Danke, ich verzichte.

Crian

2005-04-19 15:39

User since
2003-08-04
5866 Artikel
ModeratorIn

Ich dachte hier duzen sich eh alle ^^

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

renee

2005-04-19 17:29

User since
2003-08-04
14371 Artikel
ModeratorIn

Aber Herr Crian, Sie wollen doch nicht so unförmlich werden ;)

Ich möchte Sie ersuchen, sich der "Sauberkeitswelle" globaler Unternehmen anzuschließen,
wonach die Kommunikation zwischen den Mitarbeitern förmlicher gehalten werden soll *fg*

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

Crian

2005-04-19 18:40

User since
2003-08-04
5866 Artikel
ModeratorIn

Ja Herr Renee, gerne doch ;) :D :p

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

View all threads created 2005-04-19 01:06.