Вниз
Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.015 c
15-1213723148
@!!ex_
2008-06-17 21:19
2008.08.03
Проблемы с начальством


4-1193915862
fedormoore
2007-11-01 14:17
2008.08.03
сканер


2-1214037283
Grigoriy
2008-06-21 12:34
2008.08.03
Проблема с русским текстом при печати Tchart


2-1215055645
prodex
2008-07-03 07:27
2008.08.03
Объясните разницу..


15-1213818601
Сергей_77
2008-06-18 23:50
2008.08.03
Ошибка установки, как побороть.




   Наверх