Hallo,
wie du es so machst, weiß ich nicht,
ich könnte nur eine Alternative Vorschlagen,
nämlich das FormKeyDown Ereigniss
Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if key=VK_ESCAPE then close;
end;