Windows 7 Startmenü (dauerhaft) ausblenden

[kuba]

Hallo,

ich möchte das Windows 7 Startmenü dauerhaft ausblenden, zum Ausblenden verwende ich zur Zeit folgenden Code:

Delphi-Quellcode:

procedure HideStartmenu;
var
  Startmenu: Hwnd;
begin
  ShowWindow(FindWindowEx(0, 0, MAKEINTATOM($C017), 'Start'),SW_HIDE);
  ShowWindow(Findwindow('Shell_TrayWnd',nil), SW_HIDE);
  ShowWindow(FindWindow('Button', 'Start'), SW_HIDE);
  Startmenu := FindWindow('DV2ControlHost', nil);
  if Startmenu <> 0 then
    ShowWindow(Startmenu, SW_HIDE);
end;

Der Code blendet Startmenü und auch den Windows Start-ORB (Startknopf) aus. Sobald ich jedoch die linke Windows Taste drücke oder einen Doppelklick auf den Desktop mache, wird das Startmenü wieder eingeblendet. Die o.g. Routine rufe ich über einen Timer mit 200ms auf, das hat jedoch zur Folge dass die CPU-Last steigt. Wenn man schnell genug klickt schafft man es ausserdem den aktuellen Benutzer abzumelden. Genau das möchte ich aber verhindern !

Kann mir jemand sagen, wie das Startmenü dauerhaft ausgeblendet werden kann ??

KUBA