Вниз
Скачать: 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.011 c
2-1215282066
observateur
2008-07-05 22:21
2008.08.03
ClientDataSet


15-1213607281
Ajax
2008-06-16 13:08
2008.08.03
Виртуальные рабочие столы на 2 мониторах


15-1213859829
antarion
2008-06-19 11:17
2008.08.03
Вакансия программиста Delphi


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


2-1215150495
Владимир
2008-07-04 09:48
2008.08.03
Вывод документа MS Word на форму




   Наверх