Текущий архив: 2003.05.15;
Скачать: CL | DM;
Вниз
Псих - 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]забейте
Страницы: 1 вся ветка
Текущий архив: 2003.05.15;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.02 c
