2012-03-21 4 views
0
use Tk; 

my $mw=new MainWindow; 

$mw->geometry("1024x768"); 

$mw->Scrolled("Text", -scrollbars => "s", -width => 30,-height=>10)->pack(); 

MainLoop; 

J'ai besoin de l'aide. La barre de défilement horizontale ne fonctionne pas. Qu'est-ce que je fais mal?La barre de défilement horizontale ne fonctionne pas

+0

Que voulez-vous dire "ne fonctionne pas". Quand j'exécuterai votre script, j'aurai une fenêtre avec une zone de texte et une barre de défilement en bas. – dgw

+0

Oui, je reçois également une barre de défilement. Mais quand je saisis du texte avec une longueur supérieure à la largeur de la zone de texte, la barre de défilement n'apparaît pas. Le texte redescend une autre ligne. – amit

Répondre

3

Quel est le mode de bouclage du widget texte? Si elle est configurée pour recouvrir les limites de mots ou de caractères, la barre de défilement horizontale ne sera jamais nécessaire. Pour moi, le mode d'habillage par défaut est char (c'est-à-dire, envelopper les lignes aux limites des caractères, comme un terminal), donc je suppose que c'est le comportement par défaut, même si vous voulez none (le seul réglage où une barre de défilement horizontale est utile).

Ajoutez -wrap => "none", à vos options à Scrolled.

+0

Le style 'word' de l'emballage est similaire à celui d'un traitement de texte ou d'un navigateur Web, et fonctionne particulièrement bien avec une police à largeur variable. –

Questions connexes