Use the following code to hide or show the taskbar
Cheers Chris
procedure TForm1.KOLForm1Close(Sender: PObj; var Accept: Boolean);
{$ifdef wince}
var
hTaskBar : handle;
{$endif}
begin
{$ifdef wince}
hTaskBar := findwindow('HHTaskBar','');
ShowWindow(hTaskBar,SW_SHOW);
{$endif}
end;
procedure TForm1.KOLForm1Show(Sender: PObj);
{$ifdef wince}
Var
hTaskBar : handle;
{$endif}
begin
{$ifdef wince}
// SHFullScreen(form.Handle,SHFS_HIDETASKBAR or SHFS_HIDESTARTICON);
hTaskBar := findwindow('HHTaskBar','');
ShowWindow(hTaskBar,SW_HIDE);
//SHSipPreference(form.handle,SIP_DOWN);
{$endif}
end;