Indy SSL Verbindung

[delphin06]

Hi

Das gibts gar nich ich schaffe es einfach nicht eine SSL Verbindung aufzubauen. Es gibt aber auch nirgendwo was vernünftiges dazu zu finden.

Ich hab mir nur um erstmal überhaupt n bisschen mit SSL zu testen eine Client Anwendung und eine Server Anwendung geschrieben.

Der Client besteht nur aus einer Form mit einem Memo (Zum eingeben des Textes der an den Server geschickt werden soll) und einem Senden Button. Dazu habe ich noch die IdTCPClient und IdSSLIOHandlerSocketOpenSSL mit drauf gepackt.

Der Server ist ähmlich aufgebaut nur halt ohne button und einem Memo das den vom Client gesendeten Text anzeigen soll. Zudem ist noch die IdTCPServer und IdServerIOHandlerSSLOpenSSL mit dabei.

Ohne die SSLHandler klappt es einwandfrei

Code:
Server:

Delphi-Quellcode:

procedure TForm1.IdTCPServer1Execute(AContext: TIdContext);
begin
  with AContext.Connection do
  begin
    memo1.text:=AContext.Connection.IOHandler.ReadLn;
  end;
end;

Client:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  with IdTCPClient1 do
    try
      Connect;
      try
        IdTCPClient1.IOHandler.WriteLn(memo1.text);
        ShowMessage('Gesendet.');
      finally
      Disconnect;
      end;
    except
      on E:Exception do
        begin
          if e is EIdOSSLCouldNotLoadSSLLibrary then
            ShowMessage('SSL Library nicht gefunden!')
          else if e is EIdOSSLConnectError then
            ShowMessage('Fehler beim Verbinden mit SSL!')
          else if e is EIdOSSLLoadingKeyError then
            ShowMessage('Fehler beim Verbinden mit SSL (kein Passwort)!')
          else
            ShowMessage('Fehler beim Verbinden!');
        end;
    end;
end;

Ich habe mir nach der Anleitung die Zertifikat Dateien erstellt und mit in den Handlern angegeben.
Beim Server gibts keine Probleme. Wenn ich aber versuche mit dem Client was zu schicken, dann kommt immer die Meldung "Fehler beim Verbinden mit SSL!"

Weiß einer was ich da ganu einstellen muss? Wahrscheinlich liegt es wieder an so einer Kleinigkeit...

Gruß