User since
2003-08-15
2653
Artikel
BenutzerIn
hab hier nen Scroll-Frame:
my $pane = $config{MainWindow}->Scrolled(
"Pane", -scrollbars => 'e',
-bg => 'white',
-width=>$config{MainWidth},
-height=>360)->pack();
Wie kann ich es machen, dass der Scrollbalken immer nach unten geht? Neue Nachrichten in dem Frame kommen immer unten dran, deshalb soll das Teil auch immer nach unten Scrollen
User since
2003-08-04
2145
Artikel
ModeratorIn + EditorIn
$pane->yview(moveto => 1)
oder so aehnlich. Schau lieber noch mal in
perldoc Tk::Pane nach.
User since
2003-08-15
2653
Artikel
BenutzerIn
also -moveto => 1 klappt nicht
*$pane*->yview
Returns a list containing two elements, both of which are real
fractions between 0 and 1. The first element gives the position of
the top of the window, relative to the Pane as a whole (0.5 means it
is halfway through the Pane, for example). The second element gives
the position of the bottom of the window, relative to the Pane as a
whole.
*$pane*->yview
Returns a list containing two elements, both of which are real
fractions between 0 and 1. The first element gives the position of
the top of the window, relative to the Pane as a whole (0.5 means it
is halfway through the Pane, for example). The second element gives
the position of the bottom of the window, relative to the Pane as a
whole.
was soll ich jetzt nehmen?\n\n
<!--EDIT|Froschpopo|1112488416-->
User since
2003-11-28
3645
Artikel
ModeratorIn
Rufst du es auch nach jeder Aenderung auf?
User since
2003-08-15
2653
Artikel
BenutzerIn
da gibts keine Änderung
ich hab nen Textlabel in einem Frame. Der Text hat keinen automatischen zeilenumbruch. Wenn der Text länger wird als das Frame breit ist, dann schneidet er den Überstand einfach ab anstatt eine neue Zeile zu beginnen.
User since
2003-08-04
5873
Artikel
ModeratorIn
Dann musst Du mal mit den Einstellungen für wrap herumprobieren.
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
User since
2003-08-15
2653
Artikel
BenutzerIn
was fürn wrap ? Das gibts nicht für ne Pane
User since
2003-08-04
5873
Artikel
ModeratorIn
ups ... und warum nimmst Du ein pane? Bzw. warum setzt Du in das (?) Pane nicht ein Textwidget statt eines Labels? Du kannst ja relief auf flat stellen...\n\n
<!--EDIT|Crian|1112631480-->
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
User since
2003-08-15
2653
Artikel
BenutzerIn
mach ich doch:
my $pane = $config{MainWindow}->Scrolled(
"Pane", -scrollbars => 'e',
-width=>$config{MainWidth},
-height=>300
)->pack(-side=>'top');
$pane->Label(
-text => "test",
-width=> $config{MainWidth}-160,
-justify => 'left',
-anchor => 'w',
)->grid(-row=>$counter, -column=> 1, -sticky => 'w');
Er schreibt die neuen Einträge auch immer unten dran, allerdings bewegt sich der Scrollbalken nicht mit.