![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Проблемы с отображением форм [D7, Win95/98]
Alex_L © (2004-10-08 09:35:00)Всем привет.
Есть такая проблема: Открываю форму Form2 методом ShowModal из Form1. При этом, Form2 «прячется» за Form1. Результат: Приложение становится недоступным т. к. доступа к обеим формам нет, к Form1 по причине того, что открыта Form2, а к Form2 по причине того, что она «спрятана» за Form1. Такая проблема наблюдается под Windows 98 и Me (может и под другие). При этом свертывание всех окон и переключение по Alt+Tab не помогают. Приложение написано на Delphi 7.
Alex_L (2004-10-08 09:46:00) [1]Пожалуйста.
Screen.Cursor := crHourGlass; // Покажем часы
Application.CreateForm(TfmRefresh, fmRefresh); // Форма ожидания
fmRefresh.lblStatus.Caption := 'Загрузка';
fmRefresh.SetMaxValue(2);
fmRefresh.Show;
fmRefresh.Update;
fmRefresh.IncProgress;
Application.CreateForm(TForm2, Form2);
fmRefresh.IncProgress;
Form2.Query1.Active := True; // Активация запроса к БД
fmRefresh.Hide;
fmRefresh.Free;
Screen.Cursor := crDefault; // Покажем часы
Form2.ShowModal;
Form2;.Free;
Эта конструкция под D3 работала нормально на всех ОС. Проблема появилась именно после перехода на D7
KSergey (2004-10-08 09:39:00) [2]Никогда такого не было. Правда, на Д7 не делал...
Код, плиз