Einzelnen Beitrag anzeigen

Benutzerbild von ATS3788
ATS3788

Registriert seit: 18. Mär 2004
Ort: Kriftel
646 Beiträge
 
Delphi XE Starter
 
#1

HTTPS Get Schutzverletzung abfabgen

  Alt 12. Dez 2017, 08:51
Hallo dank eurer Hilfe bin ich in der lage HTTPS
Bilder in Chromium downzuladen.

Nur bei machen Seiten gibt es eine Schutzverletzung, wenn ich versuche das entsprechende Bild
abzuspeichern, dann stürzt das ganze Programm ab.

Ich hoffte das ich das mit einer Except Fehlerabfrage händeln kann, was aber leider nicht der Fall
ist, weil der Fehler wohl in der ssleay32.dll oder libeay32.dll geschieht, wenn ich die Bilder über das Clipboard
lade, gibt es keine Probleme, nur leider bekomme ich nicht alle Bilder in die Zwischenablage.

Hat jemand eine Idee den Fehler abzufangen?

Delphi-Quellcode:
procedure TDownloader.Execute;
var
   S : string;
   HTTPClient : TIdHTTP;
   Bmp : TBitmap;
begin

   HTTPClient := TIdHTTP.Create;
      try
   with HTTPClient do
  try
    IOHandler := TIdSSLIOHandlerSocketOpenSSL.Create(nil);

    Get(fURL,fStream );
  except ///das geht leider nicht!!!
    raise Exception.CreateFmt('Error %S<%S>%Sis not a valid path%S try another Image',[LF,fURL,LF,LF]);
  end;
     fGraficType := GetGraficType;
     if fGraficType <> gt_None then

    Bmp := SetGraphic2Bmp(fGraficType, fStream);
      fImage.Picture.Bitmap.Assign(Bmp);


    finally
   HTTPClient.Free;
   Bmp.Free;
    end;

end;
Martin MIchael
  Mit Zitat antworten Zitat