Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как сделать окно невидимым? [D5, Win95/98]


GoidaAA ©   (2002-05-26 07:52:00) 

Пожалуйста, помогите разобраться.

При запуске программы я FormShow модально вызываю диалог Password. Результат диалога определяет продолжать ли работу программы. Если он равен mrCancel, то программу нужно закрывать.
Я вызываю метод Close, но при этом форма моргает. Так вот, как сделать, чтобы она не моргала.

Заранее, спасибо.


GoidaAA   (2002-05-28 16:55:00) [1]

Спасибо!


KilkennyCat   (2002-05-26 09:37:00) [2]

попробуйте в файле проекта поменять местами создание форм

Было так:

Application.Initialize;
Application.CreateForm(TMain, Main);
Application.CreateForm(TPassword, Password);
Application.Run;

стало так:

Application.Initialize;
Application.CreateForm(TPassword, Password);
Application.CreateForm(TMain, Main);
Application.Run;

Тогда его даже вызывать не надо: само появится.

Но я бы вообще сделал так:

Password := TPassword.Create(Application);
Password.Show;
Password.Update;
repeat
Application.ProcessMessages;
until Password.CloseQuery;
Application.Initialize;
Application.CreateForm(TMain, Main);
Password.hide;
Password.free;
Application.Run;


Наверх

Титульная страница Поиск, карта сайта Написать письмо