Delphi XE6 MessageDlg没有按键点击

Question

在Delphi XE6中，代码如下，
当第二个MessageDlg显示正常行为时，第一个MessageDlg在点击回车键时没有关闭（它用鼠标点击）。

非常烦人的行为，处于非常基本的层面。任何人都可以阐明这一点，并提出一个解决方法吗？

procedure TForm20.FormActivate(Sender: TObject);  
begin  
  messagedlg('xxxx', mtError, [mbOK], 0);  
  messagedlg('xxxx', mtError, [mbOK], 0);  
end;