Einzelnen Beitrag anzeigen

Felix015

Registriert seit: 2. Okt 2008
16 Beiträge
 
#10

Re: Taskleiste Programm verstecken

  Alt 11. Mär 2009, 13:30
Noch ne möglichkeit:
Delphi-Quellcode:
procedure ShowTaskBar;
var
  hApp: HWND;
  rcApp, rcWork: TRect;
begin
  { get the taskbar handle }
  hApp := FindWindow('Shell_TrayWnd', '');
  if hApp <> 0 then begin
    { restore taskbar }
    ShowWindow(hApp, SW_RESTORE);
    { set workarea excluding taskbar }

  end;
end;
und zum verstecken:
Delphi-Quellcode:
procedure HideTaskBar;
var
  hApp: HWND;
  rcWork: TRect;
begin
  { get the taskbar handle }
  hApp := FindWindow('Shell_TrayWnd', '');
  if hApp <> 0 then begin
    { hide taskbar }
    ShowWindow(hApp, SW_HIDE);
    { set workarea to full screen }
    FullScreenArea;
  end;
end;
  Mit Zitat antworten Zitat