Thema: Delphi Indy tidhttp

Einzelnen Beitrag anzeigen

frankbellartz17

Registriert seit: 2. Mär 2013
1 Beiträge
 
#1

Indy tidhttp

  Alt 3. Mär 2013, 00:26
Ich arbeite an einem Programm, das Webseiten aus einer Kundendatenbank abruft, nach bestimmten Kriteren durchsucht und die Ergebnisse aktuell im Intranet des Unternehmens zur Verfügung stellt. In diesem Projekt verwende ich die indy Komponente tidhttp in einer Multithread-Umgebung. In der Regel werden ca. 40.000Websites mit jeweils max. 60 Unterseiten abgerufen. Das ganze funktioniert auch ganz gut. Leider ist mir aufgefallen, das während des Abrufs threads nach und nach ausfallen. Dies passiert immer bei den gleichen websites. (www.original-klopfer.de, www.kwo.de,..). Im Internetexplorer lassen sich die Sites einwandfrei laden. In einem einfachen Programm mit auf die Form gezogene tidhttp-Komponente tritt der gleiche Effekt auf. Das Programm hängt sich auf.
Vielleicht kennt jemand von euch den Grund.

procedure TForm2.Button1Click(Sender: TObject);
var SS : TStringStream ;
begin
SS := TStringStream.Create ;
try
HTTP.get('http://www.kwo.de',ss) ;
showmessage (ss.DataString) ;
finally
SS.Free ;
end;

end;
  Mit Zitat antworten Zitat