Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как заставить таскбар развернуться, чтобы показать все иконки? [D7, WinXP]

dmitry_12_08_74 © (2008-08-15 12:34:00)
Можно сделать так, чтобы таскбар разворачивался для показа всех скрытых иконок?

dmitry_12_08_74 (2008-08-15 16:16:00) [1]
спасибо, попробую

DVM (2008-08-15 15:52:00) [2]

> dmitry_12_08_74 (15.08.08 15:41) [8]

Тогда предлагаю такой вариант:

Как известно если иконка скрыта, то она отображается, если ее изменяют. Пусть на такую же с тем же рисунком, но меняют, т.е. вызывают Shell_NotifyIcon( NIM_MODIFY, ....). Если все время модифицировать иконку, то она никогда не попадет в разряд скрываемых.

dmitry_12_08_74 (2008-08-15 15:41:00) [3]
Я хочу, чтобы иконка была всегда видимой когда над ней всплывает хинт. Хинты приходится отображать несколько раз. Поэтому Ваш 3-й вариант работает через раз: то иконка отобразится, то исчезнет при отображении хинта.

DVM (2008-08-15 14:45:00) [4]

> dmitry_12_08_74

а зачем тебе это нужно? Ты хочешь чтобы твоя иконка в области уведомлений всегда была в поле зрения?

dmitry_12_08_74 (2008-08-15 14:23:00) [5]
Выбрал 3-й вариант, но получается, что при повторном нажатии на кнопку иконка опять скрывается, а хотелось бы, чтобы такого не происходило

dmitry_12_08_74 (2008-08-15 13:13:00) [6]
DVM, Большое Вам спасибо

DVM (2008-08-15 13:06:00) [7]
Ладно, я сегодня добрый:

Варианта собственно три:

1 вариант.

Оболочка и собственно панель задач представляет собой набор COM объектов. Если найти нужный интерфейс (в MSDN) и посмотреть его методы, то наверняка среди них будет будет ответственный за скрытие/показ всех иконок в области уведомлений.

2. вариант.

Эксплорер считывает значение "Скрывать неиспользуемые иконки" из реестра. Если поменять значение в реестре, и заставить эксплорер перечитать это значение то получится то что требуется. Само значение лежит тут:

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer
EnableAutoTray REG_DWORD 0 or 1

3. Вариант.

Иммитрировать нажатие кнопки "Показать все иконки":

procedure TForm1.Button1Click(Sender: TObject); var Wnd: THandle; begin Wnd := FindWindow('Shell_TrayWnd', nil); if Wnd <> 0 then begin Wnd := FindWindowEx(Wnd, HWND(0), 'TrayNotifyWnd', nil); if Wnd <> 0 then SendMessage(Wnd, WM_COMMAND, 1502, 0); end; end;

DVM (2008-08-15 12:51:00) [8]

> dmitry_12_08_74

Речь идет о показе скрытых иконок в области уведомлений? (там где часики?)

dmitry_12_08_74 (2008-08-15 12:43:00) [9]
Спасибо за ответ, но как именно можно это сделать?

DVM (2008-08-15 12:35:00) [10]
можно

Наверх

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