Einzelnen Beitrag anzeigen

Rolf Frei

Registriert seit: 19. Jun 2006
393 Beiträge
 
Delphi 10.3 Rio
 
#26

AW: Datei aus dem Internet herunterladen - geht nicht mehr!

  Alt 17. Dez 2018, 14:07
ShowMessage(SysErrorMessage(GetLastError)) lautet: "Der Vorgang wurde erfolgreich beendet."
Den IE habe ich aktualisiert, von Version 9 auf 11.
Doch leider ist mein Problem unverändert.
GetLatestError funktioniert hier nicht. UrlDownloadToFile ist eine COM/OLE-Funktion und die liefert ein HResult zurück. Passe deine Downloadfunktion daher mal wie folgendes an:
Code:
function DownloadFile(SourceFile, DestFile: string): Boolean;
begin
  OleCheck(UrlDownloadToFile(nil, PChar(SourceFile), PChar(DestFile), 0, nil));
  Result := True;
end;
Das liefert dir dann im Erfolgsfall True zurück. Im Fehlerfall wird eine Exeption ausgelöst in der du den Fehlercode siehst. Nach dem müsste man dann weiter schauen, was der bedeutet.

Geändert von Rolf Frei (17. Dez 2018 um 14:11 Uhr)
  Mit Zitat antworten Zitat