1. 颜色   

Begin
    ctl.SelStart := -1;
    ctl.SelLength:= 0;
    ctl.SelAttributes.Color := clRed;
    ctl.Lines.Add('Test');
End

  

posted on 2013-12-30 11:39  Ryan Huang  阅读(223)  评论(0)    收藏  举报