[DelphiM0ZG]

Прогу глянул, но так и не понял в чём проблема. Вызывать модальную форму можно так (если результат закрытия не нужно в дальнейшем обрабатывать).

Код:

Form2.ShowModal;

Или так, если имеет значение на какую кнопку (свойство кнопки ModalResult) закрылась модальная форма.

Код:

Var
  mr: Integer;
begin
...
...
  mr:=Form2.ShowModal;
...

А теперь понял проблему: надо в обработчике OnClose модальной формы убрать эту строку:

Код:

Action:=caFree;