Positionnement Dans 1 Richedit [Résolu]

Signaler
Messages postés
5
Date d'inscription
vendredi 19 août 2016
Statut
Membre
Dernière intervention
25 août 2016
-
Messages postés
420
Date d'inscription
samedi 17 mai 2003
Statut
Membre
Dernière intervention
6 mai 2019
-
salut
Ma question est comment faire pour mettre Mon Richedit Au Niveau d'une ligne précise (exemple que la ligne 10)
soit en haut de la page , je n'utilise pas la ScrollBars juste un Button
Merci

2 réponses

Messages postés
211
Date d'inscription
samedi 15 novembre 2003
Statut
Membre
Dernière intervention
10 juin 2021
10
Messages postés
420
Date d'inscription
samedi 17 mai 2003
Statut
Membre
Dernière intervention
6 mai 2019
16
Salut,

Y a-t'il plus simple ?
Je ne sais pas, mais ça, ça fonctionne :

// pour aller à la ligne 10 :
var
  VerticalLineToGo: Integer;
  ValueToIncrement: Integer;
begin
  VerticalLineToGo := 10;
  ValueToIncrement := VerticalLineToGo - 1;
  SendMessage(Richedit1.Handle, WM_VSCROLL, SB_TOP, 0);
  SendMessage(Richedit1.Handle, EM_LINESCROLL, 0, ValueToIncrement);
end;

Dans ce code, je "scrolle" sur la première ligne, puis je "scrolle" sur la ligne que je veux atteindre.