Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TForm.Show [D7]

филл © (2008-03-01 18:19:00)
Совсем дураком стал. Как правильно показывать не модально форму (Show) и потом её уничтожать: я хочу показать форму Show, а после закрытия её уничтожить.

В случае с ShowModal, понятное дело можно использовать следующее, а вот с Show, как быть?

with TForm1.Create(Self) do try ShowModal; finally Free; end;

korneley (2008-03-01 22:46:00) [1]

> Kolan © (01.03.08 22:40) [13]

Ага, именно...

Kolan (2008-03-01 22:40:00) [2]
> не въехал при чем тут связность

> экземпляром формы из другого места (да просто закрыть, например,
> по клику на кнопке «главной» формы

Вообще далше рассуждать надо знать что автор хочет…

korneley (2008-03-01 22:29:00) [3]

> Kolan © (01.03.08 21:38) [11]

не въехал при чем тут связность, суть моего поста была "где объект создали, там и удаляем" А, как сигнал "скрипач не нужен" - сообщение.

Kolan (2008-03-01 21:38:00) [4]
> korneley © (01.03.08 21:15)

Если уж повышаешь связность, то хоть просто делай. Имхо достаточно просто иметь авто создаваемую форму и рулить как угодно…если все равнона связность наплевать.

korneley (2008-03-01 21:15:00) [5]
Action=caFree конечно можно (без Free, естественно, тем более под except), а если захочется "порулить" экземпляром формы из другого места (да просто закрыть, например, по клику на кнопке "главной" формы)? Значит запоминаем ссылку. Дале, некоторым может не понравиться, что формы уже нет, а ссылка ни nil... Поэтому может лучше на OnClose все таки сообщение слать заинтересованному (управляющему) окну? Оно и освободит и ссылку занилит. Все довольны :)

Kolan (2008-03-01 21:02:00) [6]
А еще не модальное окно, которое видимо частенько видно можно поместить в AutoCreate список и прото пользовать…

Virgo_Style (2008-03-01 20:44:00) [7]
b z (01.03.08 19:20) [6]
Они путают except и finally, я так думаю :)

Чьорт поберьи. И правда.

{RASkov} (2008-03-01 19:24:00) [8]
> [6] b z (01.03.08 19:20)

Ну вот.... все испортил ;)

b z (2008-03-01 19:20:00) [9]

> {RASkov} © (01.03.08 19:15) [5]

Они путают except и finally, я так думаю :)

{RASkov} (2008-03-01 19:15:00) [10]
> [4] Virgo_Style © (01.03.08 19:13)

Попробывал.... дальше что? Не.... я в самом деле не пойму в чем я ошибся???

Virgo_Style (2008-03-01 19:13:00) [11]
{RASkov} © (01.03.08 19:11) [3]
а что не так-то?)

А ты попробуй)

{RASkov} (2008-03-01 19:11:00) [12]
> [2] Anatoly Podgoretsky © (01.03.08 19:01)
> Издеваешься?

Да нет вроде, а что не так-то?)

Anatoly Podgoretsky (2008-03-01 19:01:00) [13]
> {RASkov} (01.03.2008 18:53:01) [1]

Издеваешься?

{RASkov} (2008-03-01 18:53:00) [14]
> [0] филл (01.03.08 18:19)

выставляй Action=caFree в OnClose TForm1...
ну и:
with TForm1.Create(Self) do try ..... Show; except Free; end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »