Bonjour

Bien des développeurs possèdent la célèbre bibio de compos JVCL.

Mon soucis du jour se porte au niveau du jvRichEdit, un compo bourré de qualités et de possiblités !

Mais ce we, j'ai bien passé plus d'une heure, avant de comprendre que je ne comprenais pas pourquoi il se trouve une différence notable, entre le fonctionnement d'un simple RichEdit et d'un jvRichEdit.

Bref, le jvRichEdit est vraiment bourré de qualité, mais peut-être suis-je tout simplement bourré car suivant le même code suivant :


Ici sélection dans un simple RichEdit, et tout est normal
Cas sélection RichEdit => jvRichEdit = fonctionnement normal
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
procedure TForm1.Button3Click(Sender: TObject);
var
  i : Integer;
Begin
  jvRichEdit.Text := RichEdit.SelText;
  for i := length(jvRichEdit.Text) downto 0 do
  begin
    jvRichEdit.Lines.Strings[i] := jvRichEdit.Lines.Strings[i] + 'X';
  end;
end;

Ici sélection dans le jvRichEdit, et c'est là que ça ne va plus du tout
Cas sélection jvRichEdit => RichEdit = fonctionnement très curieux
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
procedure TForm1.Button2Click(Sender: TObject);
var
  i : Integer;
Begin
  RichEdit.Text := jvRichEdit.SelText;
  for i := length(RichEdit.Text) downto 0 do
  begin
    RichEdit.Lines.Strings[i] := RichEdit.Lines.Strings[i] + 'X';
  end;
end;
J'avoue déjà avoir eu un problème avec ce compo lors d'une précédente édition (sous un autre nom).

Mais là, je serais curieux de connaître quelle mauvaise manip je fait en ce cas précis ; pourquoi ces sauts de lignes ?
Je suis certain que c'est au niveau de la sélection que ça foire.

Si vous possédez cette biblio, testez ce code et vous allez voir à votre tour

Merci de vos idées et suggestions