Главная страница
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.014 c
15-1213656789
Riply
2008-06-17 02:53
2008.08.03
NTSTATUS в С++


2-1215028233
Loginov Dmitry
2008-07-02 23:50
2008.08.03
Загоны с таймером


2-1215005230
ekto
2008-07-02 17:27
2008.08.03
передача параметра в процедуру


2-1214919159
Фленов
2008-07-01 17:32
2008.08.03
Как засунуть файл в *.exe ?


2-1214987265
Ega23
2008-07-02 12:27
2008.08.03
Избавиться от warning а в потомке TStringList