Обработчик события окна

[3StYleR]

Программирую с Turbo Vision. Требуется сделать так, чтобы при нажатии мышкой на окно, оно закрывалось. Вот обработчик событий окна:

procedure TCardWindow.HandleEvent(var Event: TEvent);
begin
       case Event.What of evMouseDown:
                                  begin
                                         cmClose;
                                  end;
       end;
end;

Паскаль при компиляции выдает: "Ошибка 113: Ошибка в инструкции"
Подскажите, пожалуйста, что я неправильно написал?