![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Есть окно Form2, но его необходимо создать автоматически [D7, XP]
allucard © (2007-04-19 17:24:00)Доброго дня.
В моей "чудо" проге есть две формы, одна из них практически нужна всего лишь для отчёта.
Как сделать так, чтоб форма создалась по событию, а не автоматически, после запуска приложения?
Спасибо.
Kolan (2007-04-19 19:10:00) [1]> и при чем тут [3]
> ?
При том, что помимо того, что уже в [1] дали правильный ответ, есть еще совет не парится и забить на то что форма эта будет в памяти, что и отражено в [3]
Romm (2007-04-19 19:07:00) [2]
> Как сделать так, чтоб форма создалась по событию, а не автоматически,
> после запуска приложения
и при чем тут [3]
?
Kolan (2007-04-19 19:05:00) [3]> А если их будет 20 или 200?
В сабже две, я тоже заGentos (19.04.07 17:31)нормальное решение
Romm (2007-04-19 18:44:00) [4]
> Сергей М. © (19.04.07 17:32) [4]
ПОЧЕМУ мой способ идиотский?!?!?!?
allucard (2007-04-19 18:44:00) [5]
> Desdechado © (19.04.07 17:53) [7]
Понравилось в смысле прикола :)
IceBeerg (2007-04-19 18:36:00) [6]
//Если форма не создана, создаем ее
If Not Assigned(Form2) Then Application.CreateForm(TForm2,Form2);
//Используем в модальном режиме
Form2.ShowModal;
//Уничтожаем форму
Form2.Free;
Если, где ошибся поправьте.
Romm (2007-04-19 17:56:00) [7]
> Desdechado © (19.04.07 17:53) [7]
вот скажи мой способ идиотский?
Desdechado (2007-04-19 17:53:00) [8]> намного больше понравилось Gentos (19.04.07 17:31) [3]
И зачем тебе постоянно занимающая память форма, если она может никогда не понадобиться? А если их будет 20 или 200?
Romm (2007-04-19 17:39:00) [9]
> Сергей М. © (19.04.07 17:32) [4]
ты с [3] не ошибся?
Иначе что? :))) Да и чемон идиотский?
allucard (2007-04-19 17:38:00) [10]
> Сергей М. © (19.04.07 17:32) [4]
не знаю как вам, но мне это намного больше понравилось Gentos (19.04.07 17:31) [3]
Просто забыл что форма в файле проэкта создаётся.
Сергей М. (2007-04-19 17:32:00) [11]
> Romm © (19.04.07 17:29) [2]
рекомендую прекратить давать идиотские советы.
Gentos (2007-04-19 17:31:00) [12]Делаешь так :
Form2.Visible := false;
и потом когла клацаешь на кнопочку "Отчет" , пишешь
Form2.Visible := true;
и вот и все :)
Romm (2007-04-19 17:29:00) [13]1) убераешь ее из форм, создаваемых "автоматически".
2) Form2:=TForm2.Create(Owner);
Form2.ShowModal;
Desdechado (2007-04-19 17:26:00) [14]
with(TForm2.Create(Application)) do
try
...
finally
Release;
end;