vielen Dank für deine Hilfe

Es klappt auch so :-[ Aber hatte einen Fehler im COde, der mir nun aber selber aufgefallen ist. Ich hatte folgendes geschrieben:
Delphi-Quellcode:
redmain.Font := clred;
redMain.AddFormatText(redUser.Text,[fsBold],'MS Sans Serif',clRed);
redmain.Font := clblack;
so ungefair war der, weiß es nicht mehr so genau

Auf jedenfall war der Fehler das ich die Schriftfarbe nochmals geändert hatte.
Aber aus Fehlern lernt man und durch die Delphi-Praxis auch
MfG
0NyX