Thread beenden

[Manfred]

Hi,

irgendwie habe ich Probleme damit, einen Thread zu beenden. Wenn ich nach einem Thread:start() versuche den Thread mit Thread:quit() zu beenden, erscheint eine Fehlermeldung. Operation in diesem Thread nicht erlaubt. Was da auch immer falsch laufen mag.

Stattdessen mache ich jetzt Thread := NIL. Geht das so, oder gibt das irgendwann Probleme?

[J.Renseler]

Morgen Manfred,

du kannst einen Thread nur aus sich heraus beenden. Nicht von außerhalb. Guck dir dazu mal das Beispiel von Alaska in der Referenzhilfe zum Thread an, da steht ein Beispiel wie du einen Thread von außerhalb beenden kannst.

Gruß,
Jannik

[Manfred]

Hallo Jannik,

alles klar. Da habe ich mal wieder gepennt.

[Manfred]

So wie es aussieht, habe ich doch nicht gepennt.

Ist also doch noch nicht erledigt. Ich bekomme den Thread nicht "offiziell" mit :quit() beendet.

Code: Alles auswählen

LOCAL oRefreshThread := DbbrowseRefreshThread():new()

IF nRefresh > 0
    oRefreshThread:setInterval(nRefresh)
    oRefreshThread:start(,oBrowse)
ENDIF

.....Schleife die auf Eingabe Browseabbruch wartet.

oRefreshThread:terminate()
oRefreshThread:checkTermination()
************************************************
CLASS DbbrowseRefreshThread FROM Thread
      PROTECTED:
      VAR terminated

      EXPORTED:

      INLINE METHOD init
             ::thread:init()
             ::terminated := .F.
      RETURN self

      INLINE METHOD terminate
      RETURN(::terminated := .T.)

      INLINE METHOD checktermination
             IF ::terminated
                ::terminated := .F.
                ::quit()
             ENDIF
      RETURN self

      INLINE METHOD execute(oBrowse)
             LOCAL mp1 := 0
             LOCAL mp2 := 0

             PostAppEvent(xbeU_RefreshAll ,mp1,mp2,oBrowse)
      RETURN self
ENDCLASS

was mache ich hier falsch?

[AUGE_OHR]

Stattdessen mache ich jetzt Thread := NIL.

"fast" richtig ... vorher noch

Code: Alles auswählen

oThread:setInterval(NIL)

siehe Helpfile :setInterval()

Der Thread bleibt aktiv bis das Zeitintervall wieder auf NIL gesetzt wird. Erst dann wird der Thread beendet.

[Manfred]

OK,

so hatte ich das ganz zu Anfang. War mir aber nicht sicher, ob es eine elegante Lösung ist.