Nach Explorer absturz

[venice2]

Ok jetzt verstehe ich was ihr meint.

Habe den SetWinEventHook entfernt.
In WM_CREATE registriere ich jetzt die WindowMessage 'TaskbarCreated'

Delphi-Quellcode:

  case Msg of

    WM_CREATE:
      TaskbarRestart := RegisterWindowMessage('TaskbarCreated');  

    else
      if (Msg = TaskbarRestart) then
      begin
        MainApp.RegisterRecyleBin(WinHandle);
        SendMessage(WinHandle, WM_COMMAND, IDM_Restart, 0);
      end;
  end;
  Result := DefWindowProc(WinHandle, Msg, wP, lP);

Und gut ist.
Benötige dann die Schleife nicht mehr.

@Michael II, @himitsu
Thanks!