Discussion :

[jcs2]

avec ce 1er code, je positionne effectivement l'ascenseur à la position 100

Code :

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

y := SendMessage(RichEdit1.Handle, SetScrollPos(RichEdit1.Handle, SB_VERT, 100, TRUE),0, 0);

.. mais avec ce 2ème code, je reçois toujours en retour la valeur 0 quelle que soit la position de l'ascenseur.
Je ne vois pas ce qui cloche.

Code :

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

1
2
y := SendMessage(RichEdit1.Handle, GetScrollPos(RichEdit1.Handle, SB_VERT),0, 0);
  showmessage('y=' + inttostr(y) );

Auriez vous une solution?

[Cl@udius]

Salut

Je ferais plutot ceci:

Code :

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

1
2
3
 
  y := GetScrollPos(RichEdit1.Handle, SB_VERT);
  showmessage('y=' + inttostr(y) );

Pourquoi passer par un SendMessage ? GetScrollPos fait le boulot

@+ Claudius

[jcs2]

Merci Claudius,
avec le GetScrollPos direct, cela donne le bon résultat.