Win8: SHELLDLL_DefView wird nicht mehr gefunden

[jaenicke]

Aber nicht nebeneinander. Der Code funktioniert bei mir problemlos um z.B. die Listview zu finden:

Delphi-Quellcode:

var
  ParentWindow, ListWindow: HWND;
begin
  ParentWindow := FindWindow('WorkerW','');
  if ParentWindow <> 0 then
  begin
    ListWindow := FindWindowEx(ParentWindow, 0, 'SHELLDLL_DefView', nil);
    ListWindow := FindWindowEx(ListWindow, 0, 'SysListView32', nil);
    if ListWindow <> 0 then
    begin
      ShowMessage('Window Handle: ' + IntToStr(ListWindow));
    end;
  end;
end;