Ich glaube nicht das der Code hier weiter hilft aber schön wärs, wenn ich da irgendwo ein Fehler habe.
Erst mal wird die IconListe zugewiesen:
Code:
// SFI ist von Typ TSHFileInfoW;
ZeroMemory(@SFI, SizeOf(SFI));
SysIL := SHGetFileInfo('', 0, SFI, SizeOf(SFI),SHGFI_SYSICONINDEX or SHGFI_SMALLICON);
If SysIL <> 0 Then
Begin
IL.Handle := SysIL;
IL.ShareImages := TRUE;
IL.DrawingStyle := dsTransparent;
End;
Dies wirft keine Debug-Infos aus, mit diesen "Zugriff verweigert".
Später im Code nutze ich u.a. folgenden Problemcode:
Code:
// Info ist vom Typ TSHFileInfoW;
ZeroMemory(@Info, SizeOf(Info));
SHGetFileInfo(PChar(pa+fn),FILE_ATTRIBUTE_DIRECTORY,Info,SizeOf(Info),SHGFI_SYSICONINDEX Or SHGFI_ATTRIBUTES)
Dies meldet dann den "Zugriff verweigert" im Debug-Fenster. Ich habe auch ein wenig hin und her, sprich statt PChar dieses PWideChar genommen und die Info-Variable z.B. mit "_SHFILEINFOW" anstatt "TSHFileInfoW". Auch gebe ich ein mögliches Icon-
Handle wieder frei (DestroyIcon(Info.hIcon). Der "Problemcode" wird mehrmals aufgerufen. Als Beispiel 100x (ist immer anders) aber im Debug-Fenster habe ich dann nicht 100x "Zugriff verweigert", eher nur so ca. 15 Stück solcher Meldungen. Wenn ich nun Delphi mit Admin-Rechten starte, verringert sich die Anzahl dieser Meldungen (ich glaube 4 waren es noch) und wie ich schon sagte, ist die Debug-Meldung weg, wenn ich SHGetFileInfo nicht aufrufe.
Dann hatte ich ja noch eine andere Meldung aufgeschrieben
Code:
onecoreuap\shell\ext\thumbnailcache\lib\thumbcacheobj.cpp(1848)\thumbcache.dll!65072512: (caller: 65072624) ReturnHr(1) tid(324) 80004005 Unbekannter Fehler
CallContext:[\InitializeCache]
Und eben mal was neues (2 davon) im Debug-Fenster.
Code:
Debug-Ausgabe:
internal\
sdk\inc\wil\win32helpers.h(119)\windows.storage.dll!00007FFB00C04978: (caller: 00007FFB00B2E9FF) ReturnHr(1) tid(774) 80070002 Das System kann die angegebene Datei nicht finden.
SHGetFileInfo und alles andere funktioniert ja. Ich habe auch keine Programmabstürze oder ähnliches. Nur die Debug-Infos/Fehler kommen, sobald ich das Programm starte. Da muss irgendwo ein Grundproblem sein. Abgesehen von Delphi findet man per Google zu "windows.storage.dll" einiges. Zum Beispiel "Windows-Explorer stürzt immer ab - windows.storage.dll". Meist immer etwas mit dem Explorer. Mein Windows 10 selbst läuft eigentlich. Ist auch noch eine recht frische Installation. Aber es bezieht sich ja nicht alles auf "windows.storage.dll", da ich z.B. auch einen "Unbekannten Fehler" von "thumbcache.dll" bekomme... alles halt in diesem Debug-Fenster.
Michael