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

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

Работа с панелью задач [D6, WinXP]

Barman ©   (2003-01-10 22:40:00) 

Уважаемые Мастера, я вот задумался над таким вопросом:

- вспомните ICQ. Там при запуске появляется главная форма, но она не отображается в панели задач. Но когда тебе приходит сообщение, создается еще одна форма, в которой пишутся сообщения, и она отображается в панели задач. Вот и я хочу сделать то же самое, но получается не совсем то. Отображение в панели задач главной формы я запретил (в FAQ каком-то нашел), а дочерняя форма, которая появляется,
когда я делаю вот так:

procedure TForm1.Button1Click(Sender: TObject);
begin
Form2:= TForm2.Create(Application);
end;

не появляется в панели задач!!! Что можете посоветовать, чтобы эта форма, которая создается, была в панели задач?

---

Barman   (2003-01-11 13:14:00) [1]

Все получилось, большое всем спасибо!

---

TTCustomDelphiMaster   (2003-01-11 12:13:00) [2]

procedure CreateParams(var Params: TCreateParams); override;


procedure TForm2.CreateParams(var Params :TCreateParams); {override;}
begin
inherited CreateParams(Params); {CreateWindowEx}
Params.ExStyle := Params.ExStyle or WS_Ex_AppWindow;
end;

---

Song   (2003-01-11 11:23:00) [3]

Нет, через SetWindowLong()

---

Barman   (2003-01-11 11:06:00) [4]

Пробовал:

procedure TForm1.Button1Click(Sender: TObject);
begin
CreateWindowEx(WS_EX_APPWINDOW, "TForm", "Form2", CW_USEDEFAULT, 100, 100, 300, 300, Form1.Handle, null, 0, nil);
end;

Пишет "Invalid variant type conversion" Где ошибка?

---

Barman   (2003-01-11 10:32:00) [5]

> Song © (11.01.03 07:39)
> Подарить ей стиль WS_EX_APPWINDOW


А как сделать ей такой подарок?

---

Song   (2003-01-11 07:39:00) [6]

Подарить ей стиль WS_EX_APPWINDOW

---

Наверх