RichEdit的精确控制(50分)

有时候不得不手工画一些复杂些的报表，选用了RichEdit。
但是不只应该如何精细的控制它。
例如：第一行的字要比较大，兰色。
其它行要小，黑色。
特殊行要用其他色。
不够长的地方要能自动换行。
请教各位，如何让程序自动完成这些工作？

修改首行的代码：

with Rich do begin
SelStart:=0;
SelLength:=Length(Lines[0]);
with SelAttributes do begin
Color:=clBlue;
Font.Style:=Font.Style+[fsBold];
Font.Size:=Font.Size+4;
end;
SelLength:=0;
end;

修改重要行的代码：

with Rich do
if SelLength=0 then
Application.MessageBox(
'Please select something!',
'Special',MB_ICONERROR)
else
with SelAttributes do begin
Color:=clRed;
Style:=Style+[fsItalic];
end;

接受答案了.