Uhr verstekcken

[Tzuxy]

Hallo,
weiß jemand wie ich dir Uhr in der taskleiste verstecken und natürlich dann wieder sichtabr machen?
Hab schon im Forum gesucht und einen Beirtrag gefunden, aber der klappt nicht. Glaub hab was in der Uses vergessen.
Der Code:

Delphi-Quellcode:

var

  WindowHandle_TrayWnd         : hWnd;
  WindowHandle_TrayNotifyWnd   : hWnd;
  WindowHandle_TrayClockWClass : hWnd; 
begin
  WindowHandle_TrayWnd:=FindWindow('Shell_TrayWnd', nil);
  If WindowHandle_TrayWnd<>0 then
    WindowHandle_TrayNotifyWnd := FindWindowEx(WindowHandle_TrayWnd, 0, 'TrayNotifyWnd', nil);
  If WindowHandle_TrayNotifyWnd<>0 then
    WindowHandle_TrayClockWClass := FindWindowEx(WindowHandle_TrayNotifyWnd, 0, 'TrayClockWClass', nil);
  If WindowHandle_TrayClockWClass<>0 then
    ShowWindow(WindowHandle_TrayClockWClass,SW_SHOW);
end;

mfG Werner