![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как скрыть кнопку на панели задач у вторичной формы, если для ней [D7, WinXP]
gear © (2006-08-24 15:53:00)Как скрыть кнопку на панели задач у вторичной формы, если для ней выставлено:
procedure TForm7.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.WndParent := GetDesktopWindow;
end;
ShowWindow(self.Handle, sw_Hide); не помогает;
gear (2006-08-28 21:52:00) [1]когда я кликаю на шапке Form7 на кнопке закрытия, главной форме Form1 передаётся фокус и она всплывает поверх остальных окон рядом. Этого не нужно.
Если я перекрываю CreateParams и делаю окну Form7 Params.WndParent := GetDesktopWindow, то при закрытии Form7 главное окно не всплывает поверх других окон.
Fay (2006-08-28 02:35:00) [2]2 gear (28.08.06 2:31) [8]
Если не секрет, для чего перекрыта CreateParams? Зачем меняем WndParent?
gear (2006-08-28 02:31:00) [3]да, он мне не нужна.
Fay (2006-08-26 16:24:00) [4]2 gear (26.08.06 14:46) [6]
> Дело в том, что Form7 к Form1 после его создания
Не понял
> кликаю или выполняю какие-то действия с Form7, и Form1 тоже передаётся фокус
Нихрена не понял
> отвязывает Form7 от Form1
Чё?
> При этом ниезнаю как от этой кнопки избавиться
сдохнет вместе с экземпляром TForm7.
Скажи по-русски (важно!), кнопка на таскбаре - просто вредный побочный эффект, т.е. она тебе совсем не нужна?
gear (2006-08-26 14:46:00) [5]m_isHided я объявил глобальной переменной boolean
всё остальное сделал так как написано.
Может это как то связано с тем, что Form7 создаётся динамически из Form1?
Application.CreateForm(TForm7, Form7);
Дело в том, что Form7 к Form1 после его создания (кликаю или выполняю какие-то действия с Form7, и Form1 тоже передаётся фокус, что не приемлимо). При такой схеме кнопки на таскбаре нет.
Вот это:
procedure TForm7.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.WndParent := GetDesktopWindow;
end;
отвязывает Form7 от Form1, но добавляет кнопку на таскбар.
При этом ниезнаю как от этой кнопки избавиться.
Fay (2006-08-26 01:52:00) [6]2 Palladin © (26.08.06 0:10) [4]
> У меня он вполне рабочий.
М.б. потому, что правильно применяется m_isHided...
Palladin (2006-08-26 00:10:00) [7]У меня он вполне рабочий.
Fay (2006-08-25 22:07:00) [8]2 gear (25.08.06 20:33) [2]
Я правильно понимаю, проблема в отображении кнопок закрытых, но не разрушенных форм?
gear (2006-08-25 20:33:00) [9]нет этот вариант нерабочий :(
Palladin (2006-08-25 10:43:00) [10]Ну например, самое простое, так...
procedure TForm7.FormCreate(Sender: TObject);
begin
m_isHided:=False;
end;
procedure TForm7.FormActivate(Sender: TObject);
begin
If Not m_isHided Then
Begin
m_isHided:=True;
ShowWindow(Handle,SW_HIDE);
End;
end;