使用AddFontResource安装字体造成进程卡是什么毛病?

最近发现启动我自己程序的时候会造成部分其他进程(IE最明显)CPU瞬间100%,然后我自己的程序半天才能启动.
检查来检查去发现是如下代码的问题:
AddFontResource(PChar(ExtractFilePath(ParamStr(0) + 'MyFont.TTF ')));  
SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0);
我估计应该是IE对WM_FONTCHANGE这个消息有什么特殊处理造成的.不知道该如何解决了?

trick is to use PostMessage instead of SendMessage. This will solve the IE hanging or cpu hogging problem.

Hope it helps.

//Ali