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

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

Паненель с иконками окошек? [D7]


Leon1 ©   (2005-01-25 15:37:00) 

Уважаемые мастера! Подскажите плиз!
Вкратце
Есть MDI мамка ,MDI дочки и панель TStatusBar.
Вопрос, как сделать так, чтобы при запуске MDI дочки на TStatusBar отобразилась кнопочка этого окошка (по аналогии с виндовозной Панелью задач) или для этого вовсе не нужен TStatusBar???


Игорь Шевченко   (2005-01-26 12:05:00) [1]


> Неужели ни кто не знает?


Перехватывается оконная процедура окна ClientHandle, в ней предусматривается реакция на сообщения WM_MDICREATE, WM_MDIDESTROY. По первому сообщению добавляется кнопка, по второму - удаляется.

ЗЫ: никто пишется слитно


REA   (2005-01-26 10:09:00) [2]

>проще способа нету...
Как раз с ToolBar положение кнопок установится само, а принцип тот же.


Leon1   (2005-01-26 10:06:00) [3]

Я так и думал... проще способа нету...


-SeM-   (2005-01-26 10:05:00) [4]

А в чем проблема-то?
Сделай MDIChild с кнопкой SpeedButton1 в любом месте (она будет отображаться на каком-либо TWinControl MDIForm) c GroupIndex равном например 1. В OnCreate MDIChild пропиши необходимые Top, Left для SpeedButton1 (вот с этим придется повозиться). Также для нее установи Parent, указывающий на тот TWinControl MDIForm, на котором должна отображаться кнопка.
В OnActivate MDIChild пропиши SpeedButton1.Down:=True; В OnClose -   Action:=caFree;
Теперь осталось наследовать всех дочек от этой MDIChild.


REA   (2005-01-26 09:53:00) [5]

Можно сделать, но возможно это будет не панель, а ToolBar. Берем ToolBar (одна штука). При открытии окна добавляем конпочку, при закрытии удаляем.


Leon1   (2005-01-26 07:45:00) [6]

Неужели ни кто не знает?


Наверх

Титульная страница Поиск, карта сайта Написать письмо