SSL for dummies

[Achim Kalwa]

Zitat von NicoleWagner:

Gibt es keinen anderen Weg, die Datei zu holen?
Es ist einfach ein Link, das ich im Browser anwählen kann und "speichern unter..".

Wenn der Download mit Windows Boardmitteln (hier: Internet Explorer) funktioniert, dann sollte es auch mit folgendem Stück Delphi-Code funktionieren:

Code:

uses 
  ..,Vcl.ExtActns,...;
var
  Loader : TDownLoadURL;
begin
  Loader := TDownLoadURL.Create(Self);
  try
    Loader.URL := 'http://hier.deine.quelle.eintragen.pdf';
    Loader.FileName := 'D:\temp\zieldatei.pdf';
    Loader.Execute;
  finally
    Loader.Free;
  end;
end;

HTH

[Delphi.Narium]

Für aktuellere Indy braucht man kein aktuelleres Delphi.

Man kann auch Indy für XE3 aktuallisieren. Geht ja auch für Delphi7 und das ist schon ein paar Wochen älter.

Wenn dashier die aktuellste Version ist, klappt das ab Delphi 5: https://github.com/IndySockets/Indy/tree/master/Lib

Um welche Url handelt es sich denn da? Unterstützt die ausschließlich TSL 1.3?

Ansonsten versuch mal bitte sslvSSLV23, das besagt grob: "Liebe Komponente, einige Dich bitte mit dem Server selbst auf die passende Methode."
Wenn da nix bei rauskommt, brauchst Du neuere Indykomponenten.

Ansonten probier' bitte mal die Routine aus, sie sucht einfach aus allen unterstützten Protokollen die Erstbeste heraus, die funktioniert.

[dummzeuch]

Zitat von Delphi.Narium:

Wenn dashier die aktuellste Version ist, klappt das ab Delphi 5: https://github.com/IndySockets/Indy/tree/master/Lib

Mit der Aussage wäre ich vorsichtig. Dass es Packages für eine Delphi-Version gibt, heißt nicht, dass es auch damit compiliert.

Aber zumindest ab Delphi 2007 sollte es klappen. Für Delphi 6 und 7 hatte ich vor ein paar Monaten (oder sind es inzwischen schon Jahre?) mal Fixes eingestellt, die Remy dann irgendwann tatsächlich eingepflegt hat. (Wobei man ihm keinen Vorwurf machen kann, er ist wie die Maintainer von vielen anderen Delphi-Bibliotheken fast allein für alles zuständig.)

[Delphi.Narium]

Bei meinem Delphi 7 hat's letztens aber geklappt.

[mjustin]

Zitat von dummzeuch:

Mit der Aussage wäre ich vorsichtig. Dass es Packages für eine Delphi-Version gibt, heißt nicht, dass es auch damit compiliert.

Aber zumindest ab Delphi 2007 sollte es klappen. Für Delphi 6 und 7 hatte ich vor ein paar Monaten (oder sind es inzwischen schon Jahre?) mal Fixes eingestellt, die Remy dann irgendwann tatsächlich eingepflegt hat. (Wobei man ihm keinen Vorwurf machen kann, er ist wie die Maintainer von vielen anderen Delphi-Bibliotheken fast allein für alles zuständig.)

Die aktuelle Version von Indy teste ich gelegentlich auch noch mit Delphi 6 (Anwender arbeiten teilweise noch immer produktiv mit D6 und D7).
(man muss nicht die Packages installieren)

[NicoleWagner]

Danke für Deine Antwort.
Das sah so vielverprechend aus!
Allerdings speist mich mein Programm mit der obigen Fehlermeldung ab.
"Fehler" , ach wirklich.

---------------------------
meinProgramm
---------------------------
Fehler beim Download von URL: https://..............pdf.
---------------------------
OK
---------------------------



Gibt es Parameter, wie cih herausfinde, WELCHEN Fehler?

[mytbo]

Wenn es auch mORMot sein kein, dann mit HttpGet() oder WGet().

Delphi-Quellcode:

uses
  mormot.core.os,
  mormot.net.client;
  
var  
  content: RawByteString;
begin
  content := HttpGet('https://.../meine.dat');
  FileFromString(content, 'meine.dat');

Bis bald...
Thomas

[KodeZwerg]

Hier ein mini Beispiel ohne Wrapper:

Delphi-Quellcode:

function DownLoadInternetFile(Source, Dest : String): Integer;
begin
  try
    Result := URLDownloadToFile(nil, PChar(Source), PChar(Dest), 0, nil);
  except
    Result := -1;
  end;
end;

Mögliche Return Codes:
S_OK
The download started successfully.

E_OUTOFMEMORY
The buffer length is invalid, or there is insufficient memory to complete the operation.

INET_E_DOWNLOAD_FAILURE
The specified resource or callback interface was invalid.

-1
Exception



Anleitung zur API: URLDownloadToFile

[KodeZwerg]

Hallo nochmal, ich habe zur API mal etwas weiter gelesen, wenn Du Dir einen Callback einrichtest könntest Du auch erweiterte Übertragungs- / Protokoll- Fehler abfragen oder momentane Position des Downloads für eine ProgressBar o.ä..

[KodeZwerg]

Zitat von Achim Kalwa:

Zitat von NicoleWagner:

Gibt es keinen anderen Weg, die Datei zu holen?
Es ist einfach ein Link, das ich im Browser anwählen kann und "speichern unter..".

Wenn der Download mit Windows Boardmitteln (hier: Internet Explorer) funktioniert, dann sollte es auch mit folgendem Stück Delphi-Code funktionieren:

Code:

uses 
  ..,Vcl.ExtActns,...;
var
  Loader : TDownLoadURL;
begin
  Loader := TDownLoadURL.Create(Self);
  try
    Loader.URL := 'http://hier.deine.quelle.eintragen.pdf';
    Loader.FileName := 'D:\temp\zieldatei.pdf';
    Loader.Execute;
  finally
    Loader.Free;
  end;
end;

Sollte es nicht so genutzt werden?

Delphi-Quellcode:

procedure DownStream(const AURL: String; const ALocalFile: String);
var
  URLStream:  TDownloadUrl;
begin
  URLStream := TDownLoadURL.Create(Self);
  try
    URLStream.URL := AURL;
    URLStream.FileName := ALocalFile;
    URLStream.ExecuteTarget(Self); // <- das meine ich im speziellen
  finally
    URLStream.Free;
  end;
end;

Um Fehler auswerten zu können musst Du die WinAPI "URLDownloadToFile" selbst aufrufen, der Delphi wrapper schluckt die Return Codes.