Как спрятать панель задач в Windows 95?

Можно ли спрятать панель задач при запуске моего приложения? Когда пользователь закрывает приложение, панель задач должна снова стать видимой.

Я догадываюсь, вам нужно послать сообщение окну панели задач или области системных иконок в Windows 95, не в окно состояния. Ответ на ваш вопрос: конечно можно! Классная идея! Попробуйте так:

1. Сначала объявим переменную типа HWND, в которой будем хранить дескриптор окна панели задач Windows 95:

   TForm1 = class(TForm)...privatehTaskBar: HWND;...end;

2. В обработчике события OnCreate() главной формы напишем код подобно этому:

   hTaskBar := FindWindow('Shell_TrayWnd', nil);ShowWindow(hTaskBar, SW_HIDE);

3. И, наконец, в обработчике события главной формы OnDestroy() необходимо вставить следующую строчку:

   ShowWindow(hTaskBar, SW_SHOW);

Другое решение

PROCEDURE HideWin95TaskBar;VARWindowHandle: hWnd;BEGIN{Скрытие панели задач Windows 95}WindowHandle := FindWindow('Shell_TrayWnd', '');IF WindowHandle <> 0THEN ShowWindow(WindowHandle, SW_HIDE)END {HideWin95TaskBar}; PROCEDURE ShowWin95TaskBar;VARWindowHandle: hWnd;BEGIN{Восстанавливаем видимость панели задач Windows 95}WindowHandle := FindWindow('Shell_TrayWnd', '');IF WindowHandle <> 0THEN ShowWindow(WindowHandle, SW_RESTORE)END {ShowWin95TaskBar};

[000276]

Содержание раздела

---

---