Comment mettre certaines lignes en couleur dans un memoRésolu

Question

Bonjour, comment puis-je mettre certaines lignes en couleur dans un memo.

jderf · Answer

Bonsoir,

Il faut utiliser un TRichEdit et la propriété SelAttributes.Color

Jderf

solilog · Answer

Bonjour,
jderf à raison, exemple:

RichEdit1.SelAttributes.Color := clRed;
     RichEdit1.Lines.add('ligne rouge');
     RichEdit1.SelAttributes.Color := clBlue;
     RichEdit1.Lines.add('ligne bleue');

L'idéal c'est de changer la Font (nom, taille, gras, ital, color, ...) avant d'ajouter la ligne. Pour modifier les attributs d'une ligne existante c'est un peu plus difficile mais cherche le help de tRichEdit.

solilog

marin1617 · Answer

Bonjour et un grand merci à Jderf et solilog.
Voici mon code

if (Pos(' ALM ', TrameCp)) <> 0 then
                begin
                  RichEditLog.SelAttributes.Color := clred ;
                  richEditLog.Lines.Add(TrameCp);
                  Cpt_ALM := Cpt_ALM + 1;
                  memoLog.Lines.Add(TrameCp);
                end;

Comment mettre certaines lignes en couleur dans un memo

3 réponses

Votre réponse