![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Скрытие формы во время загрузки
Giperon © (2007-08-29 21:49:00)Здравствуйте, уважаемые эксперты!
Подскажите, пожалуйста, как скрыть дочернюю MDI-форму на время ее загрузки? Можно ли ее перекрыть заставочкой в это время?
Юрий Зотов (2007-08-30 06:48:00) [1]В design-time ставим будущей дочерней форме FormStyle = fsNormal. Создаем ее так:
procedure TForm1.N11Click(Sender: TObject);
begin
with TForm2.Create(Application) do
begin
... // Дополнительные операции ДО показа формы, если они нужны
FormStyle := fsMDIChild // Форма стала видимой
... // Дополнительные операции ПОСЛЕ показа формы, если они нужны
end
end;
// ============================
procedure TForm2.FormCreate(Sender: TObject);
begin
Screen.Cursor := crHourGlass;
try
... // Операции, выполняемые при загрузке формы
Sleep(3000) // Имитация длительной загрузки при тестировании
finally
Screen.Cursor := crDefault
end
end;
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree
end;
Slym (2007-08-30 05:48:00) [2]Долго заполняет форму данными? из дб подкачивает?
1. Сначала данные выкачиваешь
2. Потом MDIChild.Create...
DVM (2007-08-29 22:48:00) [3]
> Подскажите, пожалуйста, как скрыть дочернюю MDI-форму на
> время ее загрузки?
Переведите предложение на более доступный язык. Несколько раз прочитал - не понял что требуется. :(
Что представляет собой процесс загрузки MDI формы?
Зачем ее прятать?
{RASkov} (2007-08-29 22:03:00) [4]> как скрыть дочернюю MDI-форму на время ее загрузки
Сорри... я неправильно понял...
показалось на загрузку приложения скрывать дочернюю....
А это вообще как так:
> дочернюю MDI-форму на время ее загрузки
?
{RASkov} (2007-08-29 22:00:00) [5]> [0] Giperon © (29.08.07 21:49)
Убери ее(дочернюю MDI-форму) из AutoCreate, а после полной загрузки приложения создай ее "в ручки"....