本文整理自网络,侵删。
RichEdit.SelAttributes.Color := TypeAndColor.Color;
RichEdit.Lines.Add(TypeAndColor.StrData + str);
PostMessage(RichEdit.Handle, WM_VSCROLL, SB_BOTTOM, 0);
相关阅读 >>
Delphi 如何把程序钉到windows7任务栏(修正版)
Delphi xe mysql数据库操作类 mysqlhelper
更多相关阅读请进入《Delphi》频道 >>