Forum: Netzwerke
Delphi
by Gravitar,
8. Feb 2007
Hi,
so, dass Problem ist gelöst! Über 60 parallele HTTP.Get's werden ohne Fehler ausgeführt.
Erstaunlicherweise funktioniert der schon gezeigte Source ohne jede Änderung, wenn man nur in der Aufrufschleife ein "Application.Processmessages" einfügt! (habe ich eigentlich nur gemacht, um die Aktualisierung des ListView hinzubekommen.
Hier nun die komplette Lösung (für diejenigen, die...
Forum: Netzwerke
Delphi
by Gravitar,
8. Feb 2007
Hi,
Danke für die Tipps. Inzwischen habe ich nahezu alle umgesetzt. Der Source sieht jetzt so aus:
TMyThread = class(TThread)
private
fIdHTTP: TIdHTTP;
i : integer;
web : string;
Forum: Netzwerke
Delphi
by Gravitar,
6. Feb 2007
Hi,
mittlerweile klappt das Multithreading mit 6 parallelen Threads ganz gut.
Die Definition von fIdHTTP habe ich einfach weggelassen.
Das ich nur 1 Ergebnis zurückbekam lag offenbar an der globalen Variablen X, die nach Abschluß von idHTTP.get bereits auf 6 hochgezählt war und dann nur dorthin zurücklieferte.
Also habe ich einfach die globale Variable in eine lokale kopiert (schöner...
Forum: Netzwerke
Delphi
by Gravitar,
4. Feb 2007
Hi Antigo,
so, jetzt habe ich auch noch das IdHTTP-Objekt instanziiert.
Der Source sieht jetzt so aus:
TMyThread = class(TThread)
private
fIdHTTP: TIdHTTP;
Forum: Netzwerke
Delphi
by Gravitar,
4. Feb 2007
Hi Pfoto,
dein Tipp
TMyThread = class(TThread)
private
fIdHTTP: IdHTTP; <-- So!
public
procedure execute; override;
Forum: Netzwerke
Delphi
by Gravitar,
4. Feb 2007
Hi igel457,
Aha, wie mache ich denn sowas?
Gruß, Andreas
Forum: Netzwerke
Delphi
by Gravitar,
4. Feb 2007
Hi,
ich habe mich jetzt (dank der Tipps) eingelesen. Allerdings fand ich die beschriebenen Lösungen für mein Problem als zu groß.
Also, frisch ans Werk und das (zumindest geglaubt) Verstandene umgesetzt!
Die Definition eines Threads gelang mir ja noch:
TMyThread = class(TThread) protected