Application Processmessages zum bewegen von Charakteren

[Flogo]

@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]