Процедура обертки диалогового окна объектом

Нужно создать новую форму со стилем Dialog, заполнить ее необходимыми компонентами, и использовать ее приблизительно таким образом:

with TMyForm.Create(self) do begin Parent := Self; MyExecute(inParam, outParam); Release; end;

где MyExecute() должен делать Show[Modal] и другие вещи... [001776]