Discussion :

[benj63]

Bonjour,

Comme je trouve que les scrollbars d'un TMemo ne sont pas très belles, j'ai créé sur ma fiche deux petits boutons "scroll down" et "scroll up" pour faire monter ou descendre les lignes de texte de mon TMemo.

Problème : lorsque je clique sur mes boutons, le texte semble bien défiler, mais il n'est pas réactualisé, donc il y a plusieurs lignes de texte qui apparaissent les unes sur les autres, et de façon toute buguée...

Voici le code que j'ai assigné à l'événement onMouseDown du bouton "ScrollDown" :

Code :

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

this->Texte->ScrollBy(0,-20);

J'ai tout tenté :

Code :

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

1
2
this->Texte->Repaint();
this->Texte->Refresh();

etc mais rien n'y fait ! Auriez-vous une idée ?

[Trap D]

Fais plutôt ceci

Code :

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

PostMessage(Memo1->Handle, WM_VSCROLL, SB_LINEDOWN, 0);

[benj63]

merci !!

il faudrait peut-être mettre cela dans la FAQ ?