Текущий архив: 2004.04.11;
Скачать: CL | DM;

Вниз

Иконка приложения   Найти похожие ветки 

← →
Awod   (2004-04-19 14:49) [0]

Для того чтобы приложение отображалось в таскбаре я использую следующее

procedure TForm1.FormShow(Sender : TObject);
begin
SetWindowLong(Handle, GWL_EXSTYLE,GetWindowLon(Handle,GWL_EXSTYLE)or WS_EX_APPWINDOW and not WS_EX_TOOLWINDOW);
end;

При этом вновь созданное окно появляется в списке открытых приложений если использовать ALT+TAB. Но иконка у него не та что у самой формы, а соответствует иконке основно формы. Как сделать так чтобы иконка соответствовала иконке формы, а не приложения?

---

← →
Awod   (2004-04-19 14:49) [0]

Для того чтобы приложение отображалось в таскбаре я использую следующее

procedure TForm1.FormShow(Sender : TObject);
begin
SetWindowLong(Handle, GWL_EXSTYLE,GetWindowLon(Handle,GWL_EXSTYLE)or WS_EX_APPWINDOW and not WS_EX_TOOLWINDOW);
end;

При этом вновь созданное окно появляется в списке открытых приложений если использовать ALT+TAB. Но иконка у него не та что у самой формы, а соответствует иконке основно формы. Как сделать так чтобы иконка соответствовала иконке формы, а не приложения?

---

← →
Awod   (2004-04-19 15:11) [1]

Нашёл ответ:

SetWindowLong(Handle, GWL_HWNDPARENT,0);

---

← →
Awod   (2004-04-19 15:11) [1]

Нашёл ответ:

SetWindowLong(Handle, GWL_HWNDPARENT,0);

---

Страницы: 1 вся ветка

Текущий архив: 2004.04.11;
Скачать: CL | DM;

Наверх

Память: 0.44 MB
Время: 0.034 c