在主程序之前先播放一个flash遇到的问题！

Question

在主程序之前用一个窗口播放flash，当按Esc键时，退出播放。
procedure TStartFrm.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key=vk_escape then
  begin
    Application.CreateForm(TMainFrm, MainFrm);
    close;
  end;
end;procedure TStartFrm.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key=char(27) then
  begin
    Application.CreateForm(TMainFrm, MainFrm);
    close;
  end;
end;procedure TStartFrm.ApplicationEvents1ShortCut(var Msg: TWMKey;
  var Handled: Boolean);
begin
  if msg.CharCode=VK_escape then
  begin
    Application.CreateForm(TMainFrm, MainFrm);
    startfrm.Free;
  end;
end;在98上运行一切正常，但在2000Perfessional运行时，按Esc时没有效果，不会退出flash，但奇怪的是在一台2000server上运行也是正常的，是什么原因呢？应该如何解决？