Absturz der Anwendung nach beenden eines Threads

**Captnemo**

Danke Thomas, das werde ich berücksichtigen.

Aber ich glaube ich bin dem Fehler auf die Spur gekommen.
Ich habe mal alle Objecte die ich im Create erzeuge auskommentiert, und dann läuft mein Thread, läßt sich beende und alle ist Okay.

Dann habe ich die schrittweise wieder eingebaut, und siehe da, als einen Timer wieder aufgenommen habe, tritt der Fehler wieder aus.
Ohne jetzt noch alle anderen Objecte zu testen (was ich aber noch mache) würde ich dann vielleicht hier den Fehler erst mal suchen.

Also im Thread.Create erzeuge ich den timer:
FUpdateTimer:=TTimer.Create(Nil); und im meiner Execute sieht's so aus:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TTCPThread.Execute;

begin

  Try

    FUpdateTimer.Interval:=60000;

    Synchronize(

      Procedure

      begin

        frm_main.Writelog('Init TCP-Connection ('+FBindIP+'@'+IntToStr(FBindPort)+')>('+FHost+'@'+IntToStr(FPort)+')');

      end

    );

    //FTCPClient.Connect;

    while not Terminated do begin

      sleep(100);

      self.Terminate;

      if Terminated then

      begin

//        FUpdateTimer.Enabled:=False;

        break;

      end;

    end;

  finally

    Synchronize(

      Procedure

      begin

        frm_main.ReleasePort(FBindPort);

      end

    );

    FUpdateTimer.Free;

    Synchronize(

      Procedure

      begin

        frm_main.Writelog('Thread beenden');

      end

    );

  end;

end;

Was ist denn daran falsch? Ich erzeuge ihn....mach aber nix damit...und gebe ihn wieder frei.

Absturz der Anwendung nach beenden eines Threads

AW: Absturz der Anwendung nach beenden eines Threads

Forumregeln