Hide the Taskbar

Is there any delphi 5 routine(or any other way) that I can hide the task bar in Windows 98.
alshepstoneAsked:
Who is Participating?
 
alanwhincupConnect With a Mentor Commented:
Or if you wish to keep the taskbar visible but disable it then try the below:


// Disable Taskbar
procedure TForm1.Button1Click(Sender: TObject);
var
  H : HWND;
begin
  H := FindWindow('Shell_TrayWnd', nil);
  if H <> 0 then
    EnableWindow(H, False);
end;

// Enable Taskbar
procedure TForm1.Button2Click(Sender: TObject);
var
  H : HWND;
begin
  H := FindWindow('Shell_TrayWnd', nil);
  if H <> 0 then
    EnableWindow(H, True);
end;
0
 
alanwhincupCommented:
Here you are:

// Hide Taskbar
procedure TForm1.Button1Click(Sender: TObject);
var
  H : HWND;
begin
  H := FindWindow('Shell_TrayWnd', nil);
  if H <> 0 then
    ShowWindow(H, SW_HIDE);
end;

// Show Taskbar
procedure TForm1.Button2Click(Sender: TObject);
var
  H : HWND;
begin
  H := FindWindow('Shell_TrayWnd', nil);
  if H <> 0 then
    ShowWindow(H, SW_SHOW);
end;

Cheers,

Alan
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.