Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Как поместить свою форму или кнопку на панель задач?   Найти похожие ветки 

 
Sirus   (2009-01-27 09:06) [0]

Привет Мастера!
В общем суть фопроса такова: Необходимо поместить своб форму или кнопку на панель задач (типа MediaPlayer).

Кнопку или форму поместил, но проблема в том что у нее нет собственной панели на панели задач и кнопка (форма) перекрывает другие кнопки и панели.

Вот код
procedure TForm1.Button1Click(Sender: TObject);
 var h: HWND;
begin
 h:=FindWindow("Shell_TrayWnd","");
 windows.SetParent(Button1.Handle,h);
 Button1.left:= 5;
 Button1.top:= 5;
end;


 
Sirus   (2009-01-27 11:31) [1]

Еще одни грабли :(
Как только кнопка переносится на таскбар, сразу же теряется обработчик событий.


 
clickmaker ©   (2009-01-27 14:21) [2]

> сразу же теряется обработчик событий

при клике сообщение WM_COMMAND шлется родительскому окну, которым, видимо, стал таскбар
а он ничего не знает про VCL-контролы


 
avi9526   (2009-01-29 00:41) [3]

проблему с потерей сообщений можно решить (у меня работает) если к окну с кнопкой применить

> windows.SetParent(Form1.Handle,h);


 
DVM ©   (2009-01-29 22:36) [4]


> В общем суть фопроса такова: Необходимо поместить своб форму
> или кнопку на панель задач (типа MediaPlayer).

У панели задач есть специальный API для этих целей. Он позволяет создавать плагины для панели задач, именно так MediaPlayer там и поселяется. Все подробно и с примерами расписано на MSDN В разделе про панель задач.


 
Sirus   (2009-01-30 11:58) [5]

DVM ©   (29.01.09 22:36) [4]

Нельзя ткнуть ссылкой, а то чет не могу найти там ничего похожего на решение моего вопроса :(


 
DVM ©   (2009-01-31 18:00) [6]


> Sirus   (30.01.09 11:58) [5]

Ищи по слову IDeskBand



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

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

Наверх




Память: 0.48 MB
Время: 0.051 c
15-1267798757
Jeer
2010-03-05 17:19
2010.08.27
Любимым и дорогим Женщинам.


15-1269041292
Германн
2010-03-20 02:28
2010.08.27
Инсталлятор


15-1273350599
Юрий
2010-05-09 00:29
2010.08.27
С днем рождения ! 9 мая 2010 воскресенье


2-1267108150
Alex___
2010-02-25 17:29
2010.08.27
Как работать с бестиповой переменной?, func(VAR BUF;...)


15-1270198375
Девелопер
2010-04-02 12:52
2010.08.27
WMware WorkStation - невозможно работать по сети с хост-машиной.