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

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

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

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

   TForm1 = class(TForm) ... private hTaskBar: HWND; ... end;

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

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

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

   ShowWindow(hTaskBar, SW_SHOW);

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

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

[000276]

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

---