ShowModal & Show

Что бы не изобретать лисапет.
Есть конструкция

begin
  with TForm.Create(Application) do
  try
    Result := ShowModal = 1
  finally
    Free;
  end;

Мне надо в одном месте показать не модальную форму, Result := Show как поступают в этом случае, если заменить ShowModal на Show форма сразуже удаляется.
Прошу прощения наперед если вопрос совсем дурацкий.

Sashaua
как поступают в этом случае

Убирают Free.

Posted via ActualForum NNTP Server 1.5

+1

пропиши для этой формы обработчик OnClose
и в нём выстави Action := caFree;

Posted via ActualForum NNTP Server 1.5

Мимопроходящий
пропиши для этой формы обработчик OnClose и в нём выстави Action := caFree;

А вот это ты зря сказал. Сейчас выяснится, что "код только для примера", а в реальности
существует переменная, которой ссылка на форму присваивается.

Posted via ActualForum NNTP Server 1.5

26.06.2019 13:22, Dimitry Sibiryakov пишет:

> А вот это ты зря сказал. Сейчас выяснится, что "код только для примера", а в реальности
> существует переменная, которой ссылка на форму присваивается.

переменную тоже можно "занулять" там же.
М.Шаламянский за это ратует.

Posted via ActualForum NNTP Server 1.5

Понятно, я думал а вдруг есть магический вариант решения.
Два и более различающихся решения, ведущих к одному ответу, то верным будет самое простое
Всем спасибо за помощь.

Sashaua
Понятно, я думал а вдруг есть магический вариант решения.

TApplication.CreateForm