BUG??字体选择对话框不能读取字体的颜色!(80分)

小弟有段程序，很简单，就是用Delphi自带的字体选择对话框改变一个Memo的字体，
可是改来改去无法使FontDialog读取Memo字体的颜色，是我的程序有问题吗？

FontDialog1.Font:=Memo1.Font;
FontDialog1.Font.Color:=Memo1.Font.Color; //clYellow (这一行加不加结果都一样)
if FontDialog1.Execute then //FontDialog1的字体颜色都是黑色!
begin
Memo1.Font:=FontDialog1.Font;
Memo3.Font:=FontDialog1.Font;
end;

虽然问题不大，但始终是我的程序中的一个Bug，望同行赐教！

我试了，没一点问题。要不你将控件删除再次加上，问题可能解决。有时我也能碰到
莫名其妙的'Bug'，重新写一下就没问题了，毕竟人无完人，或许你的系统有问题。

I know!

在我的程序中，Memo1的初始字体颜色是非标准颜色，于是在颜色选择对话框中就用黑色代替！

看来只能使用第三方控件了...

多谢！

接受答案了.