| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Кнопка в панели задач для НЕглавной формы [D5, WinXP]

Yurko ©   (2004-09-09 18:45:00) 

Нужно чтоб у неглавной формы была своя кнопка на панели задач, да так, чтоб между этой и главной формами можно было переключатся с помощью этих кнопок.
Делаю так:
...........
protected
 procedure CreateParams(var Params: TCreateParams); override;
...........
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
 inherited CreateParams(Params);
 with Params do
 begin
   WndParent := Application.Handle;
   ExStyle := ExStyle or WS_EX_APPWINDOW;
 end;
end;
Кнопка появилась, но при нажатии на кнопку главной формы, все равно, активной остается дочерняя.
Помогите, пожалуйста, исправить!

---

Abel   (2004-09-09 21:14:00) [1]


{To show other forms of a project in the Windows task bar try overriding
the following method to each form you want visible :}

Procedure TForm1.CreateParams(Var params: TCreateParams );
Begin
 inherited;
 Params.WndParent := GetDesktopWindow;
 params.exstyle := params.exstyle and not WS_EX_TOOLWINDOW or WS_EX_APPWINDOW;
end;

{coded by Peter Below (TeamB)}


---

TUser   (2004-09-09 20:03:00) [2]

Вот это убери
 WndParent := Application.Handle;

---

wicked   (2004-09-09 20:00:00) [3]

проблема в том, что та кнока, которую мы видим на панели задач, представляет собой кнопку не главного окна приложения, а окна, создаваемого обьектом Application... поэтому совет прост - прятать кнопку от Application, а код, приведенный в [0] для дочерней формы, также скопировать в главную форму...

---

SPy   (2004-09-09 19:06:00) [4]

Ты попробуй прятать главную форму, тогда кнопка будет отвечать за другую форму!

---

Наверх