Вниз
Скачать: 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.01 c
15-1213627509
Viktor198
2008-06-16 18:45
2008.08.03
Помогите составить блок-схему для программы!!!


15-1213690490
Gg
2008-06-17 12:14
2008.08.03
Стоимость работ


2-1215152806
Вирт
2008-07-04 10:26
2008.08.03
Сохранить данные


10-1139646655
_Seldon_
2006-02-11 11:30
2008.08.03
Delphi+Visio


15-1213621467
Terr
2008-06-16 17:04
2008.08.03
Бесплатна ли программа




   Наверх