Hallo,
ich habe mir ein Programm geschrieben, über das ich mehrere Accounts von mir managen will.
Dazu lass ich es mit hilfe der
indy komponenten einloggen und lese gewünschte daten aus,
das klappt alles wunderbar.
Nun wollte ich das ganze beschleunigen und mehrere Threads gleichzeitig starten.
Jetzt bekomme ich aber die Nachricht "EIdOSSL - Could not load SSL Libary"
Ich habe die neusten Dlls und alles schon drauf und mit nur einem Thread funktioniert ja auch alles,
nur ab mehreren bekomme ich diese Fehlermeldung und nichts geht mehr.
hiermal ein paar code schnippsel aus der threadunit:
Delphi-Quellcode:
procedure TMyOwnThread.Execute();
var temp:integer;
begin
temp:=nummer;
nextthread:=true;
case temp of
1:
begin
http:=Fmain.IdHTTP1;
data:=Fmain.data1;
PostDataStream := PostDataStream1;
end;
2:
begin
http:=Fmain.IdHTTP2;
data:=Fmain.data2;
PostDataStream := PostDataStream2;
end;
Delphi-Quellcode:
try
Fmain.SG.Cells[3,aktuell]:='überprüfe...';
http.Get('https://www.meineseite.de/login?'+Fmain.SG.Cells[2,aktuell],PostDataStream);
data.Text := PostDataStream.DataString;
if pos('loginvalid=',data.text) = 0 then
begin
Fmain.SG.Cells[3,aktuell]:='Fehler!';
exit;
end;
Fmain.SG.Cells[3,aktuell]:='Verbindung konnte erfolgreich hergestellt werden';
finally
PostDataStream.Free;
end;