ActiveDelphi

[oiselcroo]

Bom dia,
Faço dessa maneira pra chamar um formulario, gostaria depois de executar uma função dentro deste form ele fecha-se automaticamente.

Frm := TProg.Create(self);
Frm.ShowModal(procedure (ModalResult: TModalResult)
begin
Frm.DisposeOf;
end);

ja tentei close/DisposeOf/CloseModal dentro do form mas nao fecha, alguem pode me ajudar

desde ja agradeço sua atenção.