@Lukie
Hab
noch was älteres von dir gefunden. und habs jetzt auch mal mit globalen Variablen versucht. allerdings hängt er sich jetzt am anfang von synchronize(Ziel) auf. Du hast am ende gesagt "Alles ausgebessert"
Aber wie?
[Edit] Ok habs im Tutorial gesehen was du geändert hast
Mein Code sieht jetzt so aus:
Code:
function Level.WalkTo(APoint: TPoint): Boolean;
begin
WalkToPoint := APoint; // WalkToPoint = Global im thread deklarierte Variable
synchronize(Ziel); // hier bleibt er hängen
// ... Rest wie oben
end;
procedure Level.Ziel;
begin
Form1.An.SetZiel(WalkToPoint); // Diese Stelle wird nie ausgeführt
end;
[/edit]