| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

панель задач

анонимный ©   (2004-08-05 15:28:00) 

как спрятать панель задач ?

---

Кириешки   (2004-08-05 16:44:00) [1]

Вот так прячется панель задач
var
 hTaskBar : THandle;
begin
 hTaskbar := FindWindow('Shell_TrayWnd', Nil);
 ShowWindow(hTaskBar, SW_HIDE);
end;

А вот так кнопка Пуск
Var
Tray, Child : hWnd;
C : Array[0..127] of Char;
S : String;
begin
  Tray := FindWindow('Shell_TrayWnd', NIL);
 Child := GetWindow(Tray, GW_CHILD);
 While Child <> 0 do
   Begin
     If GetClassName(Child, C, SizeOf(C)) > 0 Then
       Begin
         S := StrPAS(C);
         If UpperCase(S) = 'BUTTON' then
           ShowWindow(Child, 0);
       End;
     Child := GetWindow(Child, GW_HWNDNEXT);
end;

А как их назад показать не скажу :)

---

Anatoly Podgoretsky   (2004-08-05 15:42:00) [2]

Правай кнопка мыши на панели задач и никак иначе!

---

Наверх