Скачать: CL | DM;

Как сделать окно невидимым?   Найти похожие ветки 

← →
GoidaAA   (2002-05-26 07:52) [0]

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

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

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

---

← →
KilkennyCat ©   (2002-05-26 09:37) [1]

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

Было так:

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;

---

← →
GoidaAA   (2002-05-28 16:55) [2]

Спасибо!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c