Einzelnen Beitrag anzeigen

Benutzerbild von kuba
kuba

Registriert seit: 26. Mai 2006
Ort: Arnsberg
588 Beiträge
 
Delphi 11 Alexandria
 
#1

Windows 7 Startmenü (dauerhaft) ausblenden

  Alt 6. Mär 2011, 14:07
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
Stefan Kubatzki
E=mc2
  Mit Zitat antworten Zitat