Discussion :

[danucc]

Bonjour à tous,

Je viens vers vous solliciter un petit conseil.

Je dois afficher des données qui arrivent d'un autre processus dans un TMemo ou équivalent. Jusque là tout va bien.

Par contre, dans ces données vont se trouver des messages particuliers et je souhaiterais, à la volée, afficher ces messages dans une autre couleur ou enrichissement.
Quel composant faudrait-il utiliser ?

Ce que je cherche, c'est par exemple de pouvoir mettre des balises ou des codes qui entourent mes textes un peu comme ici, ou en html.

J'ai pensé à SynMemo mais je ne trouve pas de documentation compréhensible, les exemples que j'ai trouvé montrent tous comment mettre en évidence la syntaxe d'un texte statique comme un programme Pascal par exemple.

D'avance merci à ceux qui me lirons.
Danilo

[Roland Chastain]

Bonjour !

Il me semble que l'exemple SynPositionHighlighter (dans les exemples de SynEdit) répond à une partie du problème. Reste à lire les balises, à en déduire la position et la longueur du texte à colorer... Pas simple, mais faisable. De toute façon, c'est bien une solution de ce genre que vous avez en tête, non ? Il est à noter que l'exemple utilise le composant TSynEdit (et non pas TSynMemo qui est "deprecated").

Autrement, toujours selon le même principe, le composant TRichMemo devrait pouvoir faire l'affaire également.

[jurassic pork]

hello,
comme l'a dit Roland , il y a le composant TRichmemo dont la dernière version est disponible ici. Récupérer les fichiers ou alors récupérer l'intégralité du svn lazarus ici en téléchargement le snapshot. Le développeur du composant Dmitry 'skalogryz' Boyarintsev est toujours en activité et répond aux questions concernant son composant dans le forum free pascal lazarus.



Ami calmant, Phipic

[ThWilliam]

Bonjour.

Comme Roland et JP, je pense que le plus simple pour toi est d'utiliser un composant texte riche.
Je ne connais pas TRichMemo, j'utilise LazRichEdit.
Il suffit de "coder" au début de ton message une indication de formatage, puis d'ajouter le texte.

Vite fait, un petit code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
procedure TForm1.Button1Click(Sender: TObject);
begin
   AddLine('[V]Texte en vert');
   AddLine('[R]Texte en rouge');
   AddLine('Texte en noir');
end;   
 
procedure TForm1.AddLine(S: string);
begin
   if (Length(S) > 3) and (Pos('[', S) = 1) then
   begin
      case S[2] of
        'V': lzRichEdit1.SelAttributes.Color:= clGreen;
        'R': lzRichEdit1.SelAttributes.Color:= clRed;
        else lzRichEdit1.SelAttributes.Color:= clBlack;
      end;
      Delete(S,1,3); // on supprime la balise
   end
   else lzRichEdit1.SelAttributes.Color:= clBlack;
   lzRichEdit1.Append(S); // ajout du texte + retour chariot
end;

Ceci ne marchera bien que si le curseur reste toujours en fin de texte. Sinon il faut jouer avec la re-sélection. Ou alors tu rends disable ton memo.

Cordialement
Thierry

[gvasseur58]

Par contre, dans ces données vont se trouver des messages particuliers et je souhaiterais, à la volée, afficher ces messages dans une autre couleur ou enrichissement.
Quel composant faudrait-il utiliser ?

Bonjour,

En dehors des composants déjà cités (j'ai utilisé TRichMemo), tu peux utiliser SynEdit et ses différents composants : ils sont tout à fait adaptés à la coloration syntaxique. Il faudrait juste que tu précises si tu sais d'avance quels mots tu veux colorer ou si tu décides de les colorer selon des critères définis lors de la lecture du flux. Dans le premier cas, la réponse est assez simple... dans le second, c'est plus compliqué

Gilles

[danucc]

Merci à tous.
TRichMemo semble pas trop lourd et peut faire l'affaire.

Par contre, comme je sais avant d'écrire quels enrichissements je souhaite, je pourrais éviter de sélectionner et modifier le texte après l'avoir écrit, mais je n'ai pas trouvé de fonction qui peut faire cela dans TRichMemo.

lzRichEdit semble pouvoir le faire, mais chez moi, bien que SelAttributes.Color comme dans l'exemple de ThWilliam passe à la compilation la couleur reste celle par défaut.
Peut-être j'oublie un détail...

COMPLEMENT D'INFORMATION : sous windows avec Lazarus 1.2.6 lzRichEdit fonctionne parfaitement mais sous Linux et Lazarus 1.4 (GTK2) les attributs n'ont pas d'effet.

Bonne soirée à tous.
Danilo