Thread Problem - Stack overflow

**emploi**

Danke für die Antworten!

Ich hab mein Stack-Overflow Problem gelöst(glaub ich).
Hab das Array für die URL's durch ne StringList ersetzt und
jetzt gibt es damit überhaupt keine probleme mehr.

Aber mal ne andere Frage. ich habe meine Execute Methode vom
Thread ein wenig umgebaut um eine eventuelle Exception zu bearbeiten
ist das sinnvoll so oder zu performance aufwändig?

markieren

Code:

			procedure CheckThread.Execute;

var IdHttp1 : TIdHTTP;

    Request : TStringList;

    MyStream : TMemoryStream;

    done : boolean;

begin

  WHILE NOT(done) DO

  BEGIN

    IdHttp1 := TIdHTTP.Create(nil);

    Request := TStringList.Create;

    Answer := TStringList.Create;

    MyStream := TMemoryStream.Create;

    TRY

        done := False;

        idHttp1.RedirectMaximum := 15;

        idHttp1.HandleRedirects := True;

        TRY

          IdHttp1.Request.ContentType := 'application/x-www-form-urlencoded';

          Request.Add('&PHPSESSID='+SID);

          IdHttp1.Post(url,Request,MyStream);

          MyStream.WriteBuffer(#0' ', 1);

          MyStream.Position := 0;

          ...

          done := True;

        EXCEPT

        ON Exception DO

           done := False;

        END;

        IF done THEN

           Synchronize(SendUrl);

    FINALLY

      MyStream.Free;

      Request.Free;

      IdHttp1.Free;

    END;

  END;

END;

Würd mich über ne Antwort sehr freuen!

mfg emploi

Thread Problem - Stack overflow

Re: Thread Problem - Stack overflow

Forumregeln