Discussion :

[bL0w_waffeE]

Bonjour

Je voudrais savoir comment intervenir avec un TScrollBar sur un TEdit
(donc entre autres quel attribut du TEdit représente la position affichée (si l'affichage dépasse par exemple la longueur du TEdit))

Merci

[ShaiLeTroll]

Un ScrollBar horizontal, je suppose, ... c'est vrai que le défilement d'un texte trop long pose problème, peut-être essayé un TMemo qui proposera les ScrollBar et même le multi-ligne, si cela est possible ... ensuite, cela serait une recherche sur le CaretPos, il y a des fonctions API (via Message Windows genre EM_SCROLLCARET) ... qui pourrait t'aider à déplacer le curseur ...

[Lung]

le CaretPos, il y a des fonctions API (via Message Windows genre EM_SCROLLCARET) ... qui pourrait t'aider à déplacer le curseur ...

SetCaretPos

[ShaiLeTroll]

fallait le laisser chercher ... deplus, cela déplace le curseur, mais il lui faudrait indiquer quel caractère est le premier apparent, avec le TMemo, on indique la ligne en TOPLINE, mais pour un texte horizontal, je ne sais pas ...

[bL0w_waffeE]

merci pour vos réponses (j'avais pas accès à internet, d'ou mon absence ^^)
je vais jeter un oeil a ca.

[Zaki_SDwin]

Voila une petite idée :
Ajouter un composant Memo, et Deux boutons
Mettre la propriété de Memo WordWrap > False, et Height > 21
Désactiver la touche ( Entrer ) dans l'évènement OnKeyPress de Memo

Code :

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

If key = #13 Then key := #0;

Et il faut aussi désactiver la touche CTRL+ENTER ...etc
Le bouton droite fait l'action suivante :

Code :

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

SendMessage(Memo.Handle,WM_HScroll,SB_LINERIGHT,0);

Et le bouton gauche fait l'action suivante :

Code :

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

SendMessage(Memo.Handle,WM_HScroll,SB_LINELEFT,0);