пятница, 25 октября 2013 г.

Windows 7 - Показываем и прячем панель задач


  Данный пример испробован на Windows 7 и для того чтобы его рассмотреть, проделаем следующее:

 1) Поместим на форму две кнопки Button1 и Button2;

 2) Для того чтобы спрятать панель, на OnClick первой кнопки пишем: 

begin 
ShowWindow(FindWindow('Shell_TrayWnd',nil),SW_HIDE); // Скрыть панель задач; ShowWindow(FindWindow('Button',nil),SW_HIDE); //Скрыть кнопку;
end; 

 Кстати, если убрать вторую строчку, то исчезнет только панель задач, а кнопка Пуск будет отображаться, можете попробовать, зрелище забавное.

 3) Для того чтобы показать панель, на OnClick второй кнопки пишем:
begin 
ShowWindow(FindWindow('Shell_TrayWnd',nil),SW_SHOW); // Показать панель задач; ShowWindow(FindWindow('Button',nil),SW_SHOW); // Показать кнопку; 
end;

Комментариев нет:

Отправить комментарий

Примечание. Отправлять комментарии могут только участники этого блога.