Código Delphi [-] with TfMiForm.Create(Self) do try Showmodal; finally Free; end;
with TfMiForm.Create(Self) do try Showmodal; finally Free; end;