Псих - TRxRichEdit

← →
Deadlock (2003-05-02 04:59) [0]

Короче все просто:

Если делать так:
Procedure AddParsedMessage(s: String; Color: TColor);
Var
res : String;
Begin
With Form1.Memo1 Do
Begin
selAttributes.Color := Color;
Lines.Add(s);
selAttributes.Color := clBlack;
End;
End;
AddParsedMessage("Test",Clblue);

то добавляется текст цвета фона, а если так:
Procedure AddParsedMessage(s: String; Color: TColor);
Var
res : String;
Begin
With Form1.Memo1 Do
Begin
selAttributes.Color := Clblue;
Lines.Add(s);
selAttributes.Color := clBlack;
End;
End;
то все поет и пляшет...текст синий...
в чем трабла?

← →
Deadlock (2003-05-02 05:42) [1]

забейте

Псих - TRxRichEdit Найти похожие ветки