====== Descrição ======
Fechar um formulário aberto com o método 'showModal', no momento do evento onShow deste formulário.

====== Implementação ======

===== Delphi =====
<code delphi>
PostMessage(Handle, WM_CLOSE, 0, 0);
</code>