Форма как отдельная программа в панели задач

[Crystallon]

Как сделать чтобы форма программы определялась в панели задач как отдельная программа(то есть была отдельной "кнопкой")?

Нашел пример как это делается: http://www.cyberguru.ru/delphi-sources/ui-windows/forma-delphi-na-paneli-zadatch.html
Это сработало, дополнительная форма получила отдельную кнопку на панели задач, но возникла проблема - если скрываю основную форму то ее кнопка всеравно остается и ктомуже перестает быть функциональной(при нажатии на нее окно не появляется), прочитал на каком-то форуме что причиной этому может служить трей иконка программы, а она у моей программы есть... Как мне удалять из панели задач кнопку основной формы при ее скрытии чтобы оставалась только кнопка дополнительной формы?

И еще желательно чтобы можно было этой форме в панели задач сделать не только отдельную кнопку но и отдельную иконку этой кнопки(это не обязательно но было бы очень неплохо).
Заранее спасибо за помощь.

[Johnson]

отдельное приложение + общение с помощью WM_COPYDATA
другие варианты сложнее.

[ZuBy]

Ответ:

Часто возникает противоположная по смыслу задача - убрать окна с панели задач (в случае, если они создаются в DLL). В таком случае используйте стиль WS_Ex_ToolWindow.

т.е. ловим сообщении sw_syscommand -> sc_minimized и через setwindowlong ставим стиль WS_EX_TOOLWINDOW

Перед тем как разворачиваешь пишешь код

  SetWindowLong(Form2.Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or WS_EX_APPWINDOW);

Перед тем как сворачиваешь пишешь код

  SetWindowLong(Form2.Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW);

[gesper]

type
TForm2 = class(TForm)
private
{ Private declarations }
procedure CreateParams(VAR Params: TCreateParams);
override;
...
procedure TForm2.CreateParams(VAR Params: TCreateParams);
begin
Inherited CreateParams(Params);
WITH Params DO
ExStyle := ExStyle OR WS_EX_APPWINDOW;
end;

Ты нашел правильное решение. Этот код может не только добавит кнопку в панель задач для второстепенной формы, но если его использовать с другими параметрами(поищи сам, кроме WS_EX_APPWINDOW есть другие стили), то ты сможешь и убрать у главной формы кнопку из панели задач.

Иконка кнопки у второстепенной формы, насколько помню, выставляется свойством Icon этой формы.

[Crystallon]

ZuBy
Спасибо, это работает, иконки главного окна из панели задач удаляются при сворачивании, вот только подчеркну - иконки, т.е. их теперь у родительского окна 2, как я понимаю одна изначальная, другая создается по onshow(WS_EX_APPWINDOW), ну а если WS_EX_APPWINDOW не ставить тогда и WS_EX_TOOLWINDOW не срабатывает =(

Наконец нашел как удалять изначальную кнопку программы из панели задач - ShowWindow(Application.Handle, sw_Hide);
Всем спасибо за помощь.