dephi 安装字体文件到XP和WIN7系统均不成功？，求高手指点！

procedure TForm1.FormCreate(Sender: TObject); procedure TForm1.FormCreate(Sender: TObject);