INDY suche passende OpenSSL Version

[KlausV]

Hallo Zusammen,
ich habe Delphi 7 und die Indy Komponenten der Version 10.1.5. Nun möchte ich auf HTTPS umstellen. Daher nun die Frage, welche Version benötige ich von OpenSSL? Ich würde gerne die Version von Indy beibehalten.
Wie ist das mit 32 bit und 64 bit? Die Anwendung ist unter 32 bit programmiert, läuft aber auch unter 64 bit im 32er Modus.
Muss hier auch noch etwas angepasst werden bezüglich von openssl oder reicht es die 32-bit Version zu nehmen?
Danke.
Gruß Klaus

[Klaus01]

Hallo Klaus,

die bittigkeit der Anwendung die openssl benutzt bestimmt die bittigkeit der openssl library.
Also 32 bit Anwendung -> 32 bit openssl lib.

Hast Du denn Probleme wenn Du die aktuelle openssl library mit indy 10.1.5 verwendest?
Laut dem readme hat openssl keine externen Abhängigkeiten.

Grüße
Klaus

[mjustin]

Artikel wie z.B. dieser https://stackoverflow.com/questions/...ith-delphi2007 besagen dass Indy 10 keine speziellen Builds der OpenSSL mehr benötigte, diese waren nur in Indy 9 erforderlich.

Daher sollten die aktuellen OpenSSL DLLs funktionieren.

Für alte Indy Versionen sind die speziellen Build sin http://indy.fulgan.com/SSL/Archive/ noch zu finden.

[KlausV]

Super, danke für die Infos. Dann werde ich es einbinden und versuchen.


Habe das darüber gefunden:
Vorab: Hierfür werden die passenden Versionen der libeay32.dll und ssleay32.dll Bibliothek benötigt. Die aktuelle Version findet man immer in diesem Thema. Die DLLs müssen ins root-Verzeichnis eurer Applikation. Zusätzlich müssen wir die Unit IdSSLOpenSSL einbinden.

Delphi-Quellcode:

uses
  IdHTTP, IdSSLOpenSSL;
// ...

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

Reicht das dann schon?

Danke.

[Klaus01]

.. ja das sollte fürs Erste ausreichen.

Grüße
Klaus

[KlausV]

Hallo,
Doch noch eine Frage:
Ich habe bei mir im Quellcode kein Creation von "TIdHTTP.Create(nil) do"
Kann ich dann vor jedem Post das SSL Statement eintragen:
  IOHandler := TIdSSLIOHandlerSocketOpenSSL.Create(nil); So sieht eine Funktion aus. Im Programm gibt es 7 Funktionen, die einen POST machen.

Delphi-Quellcode:

function TfrmDMSMain.UploadData(var aData: TUpData): TUpResult;
var aPost: TStringList;
    aURL: String;
    aResponse: TStringStream;
begin
  Result:= TUpResult.create;
  aPost:= TStringList.Create;
  aResponse:= TStringStream.Create('');
  try
    //*** Prepare data to be posted
    PreparePostData(aPost, aData);
    //*** do HTTP-Post
    aURL:= ServletURL+ServUp;
    try
      IdHTTP.Post(aURL, aPost, aResponse);
      //*** write response to result
      Result.ParamString:= aResponse.DataString;
    except
      on e: Exception do
        Result.ParamString:= 'resultcode=0'+#13#10+'resultmessage='+
        RemoveLineBreak(e.Message)+#13#10+'sourceflag=1';
    end;
  finally
    aPost.Free;
    aResponse.Free;
  end;
end;

[Klaus01]

.. hast Du die idHttp Komponente auf Deine Form gezogen?
Dann ist meines Wissen kein separates http := TidHttp.create erforderlich.

Wenn alle Posts von der gleichen/selben TidHttp Instanz erfolgen, dann reicht ein
einmaliges zuweisen des TIdHttp.IoHandler

Grüße
Klaus

[KlausV]

Ja, so ist es. Die Komponente habe ich direkt auf der Form.
Ok, Danke.