Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.08.03;
Скачать: CL | DM;

Вниз

Две формы   Найти похожие ветки 

 
who5   (2008-07-04 22:53) [0]

Есть две формы, одна главная, вторая дополнительная. Когда приложение загружено, то показывается только одна главная форма.

Главная форма сворачивается в трей — прячется:
Application.Minimize;
ShowWindow(Application.Handle, SW_HIDE);
ИконкаВТрее();


При клике в трее, программа должна показать вначале только дополнительную форму (главную не показывать). При клике в трее:
Form2 := TForm2.Create(Self);
 with Form2 do
   try
     ShowModal;
     ...
   finally
     Free;
   end;


При таком коде, появляется дополнительное окно, но оно появляется без фокуса. Нет фокуса на нем, т.е. оно где-то под всеми окнами появляется, на него не переводится фокус. (Я уже по всякому испробовал и BringToFront и прочее, но не смог найти рабочего варианта)

Что исправить?


 
Loginov Dmitry ©   (2008-07-04 23:00) [1]

Попробуй SetForegroundWindow()


 
Владимир   (2008-07-05 10:12) [2]

Скажи второму окну вот так:

Form2.Visible := False;

А когда оно понадобится, покажи его!



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

Текущий архив: 2008.08.03;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
15-1213651482
k2_
2008-06-17 01:24
2008.08.03
Симпатишный дизайн, полюбуйтесь.


2-1214989945
AlekseyB
2008-07-02 13:12
2008.08.03
Вопрос по DBGrid


4-1193603602
rainbow_d
2007-10-28 23:33
2008.08.03
Получить содержимое заблокированного файла


2-1214886949
DJ_UZer
2008-07-01 08:35
2008.08.03
Как считать текстовый файл из интерната


2-1215254494
RealSwift
2008-07-05 14:41
2008.08.03
Перевести запрос к MDB из VB в DELPHI