Pensándolo mejor, en el segundo formulario no te hace falta ningún Panel quedando el evento así:
Código Delphi
[-]
procedure TForm2.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
const
VK_ESCAPE = $1B;
begin
if Key = VK_ESCAPE then Close;
end;
Código Delphi
[-]
procedure TForm1.Panel1DblClick(Sender: TObject);
begin
Form2:= TForm2.Create(self);
Form2.BorderStyle:= bsNone;
Form2.WindowState:= wsMaximized;
Form2.KeyPreview:= true;
MediaPlayer1.Display:= Form2;
MediaPlayer1.DisplayRect:= Rect(0, 0, Screen.Width, Screen.Height);
Form2.ShowModal();
MediaPlayer1.Display:= Panel1;
Form2.Free;
end;
Saludos.