Text mit Farbe senden und empfangen !

Jagg · Beiträge: 635

Hallo !

Ich habe ein Chatproggi gechrieben,jetzt möchte ich,das der Text den ich versende als Farbe "blau" gesendet wird und der Text den ich empfange als Farbe "rot" empfange !

Hier ist mal ein Code für Senden :

markieren

Delphi-Quelltext

1:
2:
3:
4:

Edit1.Text := 'Hallo,das ist ein Test';
NewString := 'Martin';
NMMsg1.PostIt (Time+' '+'<'+NewString+'>'+' : '+Edit1.Text);
Memo1.Lines.Add (Time+' '+'<'+NewString+'>'+' : '+Edit1.Text);

Hier ist mal ein Code für Empfangen :

markieren

Delphi-Quelltext

1:
2:
3:

Memo1.Lines.Append (sMsg);
FlashWindow(Handle,True);
Flashwindow(Application.Handle,True);

sMsg = Text von Empfänger !

....und das alles wird in einem MemoFeld angezeigt !
Könnt ihr mir helfen ???

Jagg !

Moderiert von Tino: Code- durch Delphi-Tags ersetzt.

Tino · Beiträge: 9839 Erhaltene Danke: 45 Windows 8.1 Delphi XE4

Hi,

benutze statt der TMemo Komponente die TRichEdit Komponente. Damt kannst du die Farben selbst bestimmen. Such mal hier im Forum nach tRichEdit. Dann solltest du mehrere Beispiele finden wie man die Farbe setzt.

Gruß
Tino

Jagg · Beiträge: 635

danke

FriFra · Verfasst: Mo 07.07.03 14:12

Also ich habe für ein Chatprogi ein TWebBrowser verwendet. Ich schreibe den Text über eine JavaScript-Funktion dynamisch in das Chatfenster... so habe ich auch die Möglichkeit Emoticons (

,

, etc. ) automatisch als animiertes Gif anzuzeigen... so etwas sollte mit einen TRichEdit nur sehr schwer bzw. garnicht möglich sein.

_________________
Michael
(principal certified lotus professional - developer)

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme