Панель задач

← →
ttt (2013-03-06 04:18) [0]

Доброй ночи.

Моё приложение в рабочем виде не имеет кнопки на панели задач. Оно скрыто SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW) (пробовал скрыть и ShowWindow(Application.Handle, SW_HIDE) - вообще не работает). Но её необходимо отобразить во время активного окна настроек для удобства перехода. Пробовал вызывать SetWindowLong(Application.Handle, GWL_EXSTYLE, 0) и ShowWindow(Application.Handle, SW_SHOW), они не дают никакого эффекта. Срабатывают только если окно настроек закрывается, но как раз таки после закрытия мне и нужно опять скрыть кнопку с панели задач. Как реализовать такое?

← →
brother © (2013-03-06 06:24) [1]

> Срабатывают только если окно настроек закрывается,

а если вызывать ДО показа окна настроек, те перед Setup.show(showmodal) ?

← →
ttt (2013-03-06 12:51) [2]

SetWindowLong(Application.Handle, GWL_EXSTYLE, 0);
ShowWindow(Application.Handle, SW_SHOW);
with TfrmEdit.Create(Self) do ShowModal;

procedure TfrmEdit.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action:= caFree;
SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);
end;

Вот так вот у меня сейчас. Не работает. :)

← →
brother © (2013-03-06 16:26) [3]

а это не ДО показа окна

← →
ttt (2013-03-06 17:28) [4]

Как же не до? Ведь окно еще даже не создано.

Панель задач Найти похожие ветки