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

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

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

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

TForm1 = class(TForm)

...

private

hTaskBar: HWND;

...

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

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

ShowWindow(hTaskBar, SW_HIDE);
И, наконец, в обработчике события главной формы 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]