熟悉 ★RichEdit★ 控件的请进来，分一定是你的！！！(100分)

非常奇怪：
我在程序中的对RichEdit的控制是这样的，
1、查找整个TEXT，将指定的字符改变颜色（成功！）
dbRichEdit1.SelStart := N;
dbRichEdit1.SelLength := Length(SearchString);
dbRichEdit1.SelAttributes.Color :=clBlue;
dbRichEdit1.selAttributes.Size:=dbRichEdit1.Font.Size+1;
2、我要通过字体对话框设置整个TEXT的字体（失败！）
FontDialog1.Font:=dbRichEdit1.Font;
if FontDialog1.Execute then
begin
dbRichEdit1.Font:=FontDialog1.Font;
end
实际上字体信息已经获得，但是没有效果。如果顺序是2、1就正常。
请问，是怎么回事，怎么解决？

全选再改颜色不行吗？

Ok!

谢谢！

多人接受答案了。