Thema: Delphi INDY 9 und SSL

Einzelnen Beitrag anzeigen

night

Registriert seit: 23. Jun 2006
22 Beiträge
 
Turbo Delphi für Win32
 
#1

INDY 9 und SSL

  Alt 26. Aug 2009, 05:28
Hallo,

ich benutze Turbo Delphi 2006 und INDY9.
Ich habe schon richtig viele Threads durchgelesen und viel ausprobiert, aber ich bekomme es nicht zum laufen.
Ich erhalte immer nur die Meldung "Exception-Klasse EIdOSSLCouldNotLoadSSLLibrary mit Meldung 'Could not load SSL library.'"

Ich habe schon verschiedene DLL'S runtergeladen, aber ich es läuft einfach nicht
Endweder sind die DLL nur für INDY 10 oder ich muss eine IdSSLOpenSSLHeaders.pas in ein Verzeichnis kopieren, das es bei mir nicht gibt.

Wäre super, wenn mir jemand helfen könnte

Mein Codingb:

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
  idSSL := TIdSSLIOHandlerSocket.Create(self);
  idSSL.SSLOptions.CertFile := 'ra.cer';
  idSSL.SSLOptions.VerifyDepth := 2;
  idSSL.SSLOptions.Mode := sslmClient;
  idSSL.SSLOptions.Method := sslvSSLv23;

  idHttp := TidHttp.Create(self);
  idHttp.Request.ContentType := 'application/x-www-form-urlencoded ';
  idHttp.IOHandler := self.idSSL;
  idHttp.AllowCookies := true;
  idHttp.HandleRedirects := true;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  list: TStringlist;
begin
  list:=TStringList.Create;
  try
    list.Add('login='+TIdURI.ParamsEncode(ENick.Text));
    list.Add('password='+TIdURI.ParamsEncode(EPw.Text));
    Memo1.Lines.Add(idHttp.Post(API_LOGIN,list));
  finally
    sList.Free;
  end;
end;
Das muss doch auch mit INDY 9 möglich sein.

Viele Grüße
Stefan
  Mit Zitat antworten Zitat