[bcb-6] richedit with colors

Commenter

Contenu du snippet

Code pour Borland c++ builder 6.
C'est un code TRES Simple.

Mon code insere une ligne dans un RichEdit mais d'une couleur désiréé.
il rajoute aussi l'heure a laquelle le message est ecrit.
Mon code se sert a l'attribut 'Tag' du RichEdit,
attention donc a ne pas depasser les 2^32 caracteres dans le richedit.

Source / Exemple : 


__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
     LogPrint("hello world en rouge...",clRed);
     LogPrint("HO, la belle bleue :)",clBlue);
}

void TForm1::LogPrint(AnsiString str,TColor color)
{
     str = "["+TimeToStr(Now())+"] "+str;            // rajout de l'heure devant le message
     RichEdit1->Lines->Add(str);
     RichEdit1->SelStart=RichEdit1->Tag;
     RichEdit1->SelLength=str.Length();
     RichEdit1->SelAttributes->Color = color;
     RichEdit1->Tag=RichEdit1->Tag+str.Length()+2;
     RichEdit1->Perform(EM_SCROLLCARET, 0, 0);       // permet d'avoir la derniere ligne toujours visible 
}

Conclusion :


Voila, j'ai galerer une bonne heure pour faire sa.
Google n'est vraiment pas ton amis pour des questions sur borland :(((

A voir également

S'inscrire maintenant

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.

Du même auteur (superpok)