Comment mettre certaines lignes en couleur dans un memo [Résolu]

Messages postés
42
Date d'inscription
samedi 3 août 2013
Dernière intervention
15 août 2014
- - Dernière réponse : marin1617
Messages postés
42
Date d'inscription
samedi 3 août 2013
Dernière intervention
15 août 2014
- 19 sept. 2013 à 14:48
Bonjour, comment puis-je mettre certaines lignes en couleur dans un memo.
Afficher la suite 

Votre réponse

3 réponses

Messages postés
192
Date d'inscription
mercredi 29 décembre 2004
Dernière intervention
2 octobre 2014
0
Merci
Bonsoir,

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

Jderf
Commenter la réponse de jderf
Messages postés
273
Date d'inscription
samedi 13 juin 2009
Dernière intervention
18 avril 2015
0
Merci
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
Commenter la réponse de solilog
Messages postés
42
Date d'inscription
samedi 3 août 2013
Dernière intervention
15 août 2014
0
Merci
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;
Commenter la réponse de marin1617

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.