Есть две формы, одна главная, вторая дополнительная. Когда приложение загружено, то показывается только одна главная форма.
Главная форма сворачивается в трей — прячется:
| Код |
Application.Minimize;
ShowWindow(Application.Handle, SW_HIDE);
ИконкаВТрее();
|
При клике в трее, программа должна показать вначале только дополнительную форму (главную не показывать). При клике в трее:
| Код |
Form2 := TForm2.Create(Self);
with Form2 do
try
ShowModal;
...
finally
Free;
end;
|
При таком коде, появляется дополнительное окно, но оно появляется без фокуса. Нет фокуса на нем, т.е. оно где-то под всеми окнами появляется, на него не переводится фокус. (Я уже по всякому испробовал и BringToFront и прочее, но не смог найти рабочего варианта)
Что исправить? |