Timer para fechamento automático de um form em Delphi 7

Olá pessoal!

Queria implementar o fechamento automático de um form, no caso do form de login de um sistema, após três tentativas de acesso. Procurei em vários lugares, mas não encontrei nada.. =/

Seria como um timer regressivo, que contasse uns 5 segundos após a exibição do MessageDlg de tentativas esgotadas e encerrasse a aplicação, sem precisar de ação do usuário...

Alguém tem alguma idéia?

:)