Hide windows 95 taskbar

Posted in System

Taskbar windows name is 'Shell_TrayWnd'. So use Win32 function FindWindow to find Windows95 Taskbar, and Win32 function ShowWindow to it hide or restore. For example:

procedure TForm1.Button1Click(Sender: TObject);
var
  WindowHandle: HWnd;
begin
  WindowHandle:=FindWindow('Shell_TrayWnd','');
  if WindowHandle<>0 then 
    ShowWindow(WindowHandle,SW_HIDE);
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  WindowHandle: HWnd;
begin
  WindowHandle:=FindWindow('Shell_TrayWnd','');
  if WindowHandle<>0 then 
    ShowWindow(WindowHandle,SW_RESTORE);
end;