PB 4.50 Thread Problem

[alen]

Hallo Zusammen,

ich habe da ein Problem mit dieser Routine unter PB 4.50. Mit dem Stück Code möchte ich eigentlich einem neuen Thread einen String bzw. eine Pointeradresse zu einem String mitgeben.

Code: Alles auswählen

Procedure MachWatt(*dbfnID)
  For i = 1 To 5
    Delay(1000)
    Debug Str(i) + " -- " + PeekS(*dbfnID)
  Next
EndProcedure

db_filename.S = GetCurrentDirectory() + "my_music.sqlite"

*dbfnID = AllocateMemory(Len(db_filename))
PokeS(*dbfnID, db_filename)

TID = CreateThread(@MachWatt(), *dbfnID)
;MachWatt(*dbfnID)

FreeMemory(*dbfnID)

Wenn ich das ganze einfach nur mit:

Code: Alles auswählen

MachWatt(*dbfnID)

aufrufe mache klappt es.

Versuche ich den Aufruf mit:

Code: Alles auswählen

TID = CreateThread(@MachWatt(), *dbfnID)

geht das in die Hose.

Was mache ich hier falsch ? Das hatte bisher immer gut funktioniert.

Grüße
Alen

[a14xerus]

tja du startest den thread und löscht dann den speicher
der thread läuft nebenher und greift auf den gelöschten speicher zu.

[alen]

Hallo a14xerus,

sehe das Problem. Das Programm startet den Thread wird aber sofort auch beendet.
Daher kann nix kommen. Aber Du hast natürlich auch recht.

Das ist das Problem wenn man nicht immer nur mit PB arbeitet.
Danke Dir für den Denkanstoss.

Grüße
Alen