Einzelnen Beitrag anzeigen

SittingDuck

Registriert seit: 11. Jan 2006
Ort: Leverkusen
159 Beiträge
 
Delphi 2010 Professional
 
#2

AW: TShellDropper und Windows 8.1: Probleme?

  Alt 24. Jun 2015, 10:41
Moin zusammen ...

zuerst mal sorry, dass ich eine schon etwas ältere Frage ausgrabe und versuche darauf zu antworten. Bei der Anwendung dieser nützlichen Unit bin ich nämlich ebenfalls auf dieses Problem gestoßen. Darauf hin habe ich mir mal den entsprechenden SourceCode angesehen und eine Änderung vorgenommen, die das Problem behebt. Per Zufall würde ich mal sagen ... Da ich jedoch glaube, das es das nicht sein kann bitte ich Euch um Eure Meinung dazu.
Folgende Änderung habe ich in der Funktion IsFileDescriptor vorgenommen: (Zeile: 624)

Code:
  if dataObj.GetDataHere(FormatDesc, MediumDesc) = S_OK then // vorher: nur GetData
Diese Veränderung bewirkt, dass der darauf folgende try ... finally Block wieder durchlaufen, statt das er über Exit verlassen wird und nun stimmt auch unter Win8.1 der Pfad wieder. Joa, läuft ja könnte man sagen, aber bevor ich hier irgend einen Quatsch mache ... und ggf. sind ja auch noch andere Änderungen notwendig. Die meines Wissens aktuelle (UNVERÄNDERTE) Version v1.65 der ShellDropper.pas habe ich diesem Beitrag mal mit angehängt.

Danke schon mal für Eure Ideen.
Angehängte Dateien
Dateityp: pas ShellDropper.pas (28,3 KB, 8x aufgerufen)
Ciao ... SittingDuck
iPhone Backup und mehr: iTwin v3.9 Beta ... Alternative Startleiste: Launcher v3.8 !
  Mit Zitat antworten Zitat