Discussion :

[facila]

Bonjour ,

J'ai un problème lorsque j'utilise Scrolled dans une page de NoteBook
Lorsque la dernière ligne dépasse la taille horizontale de la page , l'ascenseur s'affiche mais
Mais il recouvre la dernière ligne , il n'y a donc plus de ligne qui dépasse la taille max
L'ascenseur horizontal disparaît , et le phénomène part en boucle , bloquant l'application

Voici ci-dessous un exemple
Est-ce que quelqu'un à une solution pour régler ce problème ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#!/usr/bin/perl
 
use Tk;
use Tk::NoteBook;
 
$main = MainWindow->new();
$main->geometry("200x100");
 
$book  = $main->NoteBook()->pack(-fill=>'both',-expand=>1);
$page  = $book->add( "page",-label=>"Page");
$frame = $page->Scrolled('Text',-scrollbars=>'osoe',-wrap=>'none')->pack(-fill=>'both',-expand=>1);
 
$frame->insert('end',"1\n2\n3\n4\n555555555555555555555555555");
 
MainLoop;

[CosmoKnacki]

Non pas vraiment, c'est un bug connu.
La "solution" est d'imposer la scrollbar qui pose problème (donc de changer -scrollbars=>'osoe' en -scrollbars=>'soe').

[facila]

merci beaucoup pour la réponse
je suis rassuré de voir que le problème est connu donc qu'il ne vient pas de moi
l'option "soe" règle bien le problème
c'est juste dommage d'avoir une barre horizontale bien souvent inutile
c'est bien dommage aussi que ce bug n'ai pas été corrigé

[djibril]

Bonjour,
Afin d'avoir un affichage cohérent, autant afficher les deux scrollbars d'office : -scrollbars=>'se'.