Mal wieder AStar - und seine Tücken

[Deep-Sea]

Also zuerst einmal hast du ein Speicherleck in der Funktion DrawMap. Du erzeugst ständig eine TBitmap aber gibst sie nie wieder frei. Ändere das also schon mal so ab:

Delphi-Quellcode:

begin
  Bild := TBitmap.Create;
  try
    // Mach was mit "Bild".
  finally
    Bild.Free;
  end;
end;

[Edit1]
Zum Fehlerhaften bewegen:
In Unit1 hast du angegeben, dass die Feldgröße 40 Pixel beträgt, in der Unit Zombie aber nur 25. Das wird dann natürlich nix, wenn du eine Konstante zwei mal an Unterschiedlichen stellen deklarierst und ihr verschiedene Werte zu weißt.


[Edit2]
Zur AV:
In der Funktion FindPath steht ja folgendes:

Delphi-Quellcode:

   repeat
    SetLength(Path, n+1);
    Path[n].X := FindLowest(x, y).X;
    Path[n].Y := FindLowest(x, y).Y;
    x := Path[n].X;
    y := Path[n].Y;
    inc(n);
   //ShowMessage(IntToStr(X) + ' : ' + IntToSTr(Y) + ' : ' + IntToSTr(n));
   until (Map_Astar[x, y] = 1) or (n >= 100);

Die Variable x enthält des öfteren extrem hohe Werte, so das du versuchst auf ein Element im Array Map_Astar zuzugreifen, was nicht existiert. Warum genau x solche Werte enthält? Da bin ich jetzt zu faul zum suchen für *gg*


Alles in allem aber nichts, was man nicht in kurzer Zeit mit wenig Auffand hätte selbst finden können

[Edlmann]

Mmh...werd ich mir mal anschauen, allerdings erklärt keiner dieser Fehler, warum sich das Programm hin und wieder komplett verabschiedet und
den Rechner mit ins Nirvana nimmt...hatte es jetzt schon zwei mal, dass sich mein kompletter Rechner bei der Pfadfindung aufgehangen hat, und zwar so weit,
dass nichtmal mehr windows task-manager zu erreichen war...Warum X manchmal so hohe Werte enthält werde ich mir mal anschauen, vielen Dank schonmal...
und dass mit der Rechteckgröße...*Autsch* hätt mal nicht nur in der Gegner Unit nach dem Fehler suchen sollen ^^

[Edit]
Okey, die falsche Konstante war Schuld an der chaotischen Bewegung des Gegners.

Und die Pfadfindung führte manchmal zur Zugriffsverletzung, weil an einer Stelle noch alte Konstanten (die ich zur Entwicklung des AStar-Algorythmus benutzt habe)
übergeblieben waren und nicht durch die Gegner-spezifischen Variablen ersetzt waren...

Und das X so extrem hohe Werte enthält, lag daran, dass ich die beiden Variablen lowx und lowy nicht initialisiert habe...
Okey, nächstmal 15 mal, nicht nur 5mal durch den Quelltext schauen und Fehler suchen...und überall suchen ^^
danke für den Denkanstoß Deep-Sea
[/Edit]

[Deep-Sea]

Wenn der Arbeitsspeicher voll ist, dann erklärt das evtl. schon, warum dein ganzes System nicht mehr so mag wie du es gerne hättest
Tipp: Deklariere nur EINE Konstante und nicht zwei dafür (oder mach die Zuweisung wenigstens so: "Konstante2 = Konstante1").

(Des weiteren gehen die Tipps was das Entwickeln von Spielen angeht hier meistens dazu zu raten, die Logik (in deinem Fall also wohl die Unit Zombie) von der Grafikausgabe zu trennen. Aber das ist ggf. ein anderes Thema.)

[DeddyH]

Zitat von Deep-Sea:

Des weiteren gehen die Tipps was das Entwickeln von Spielen angeht hier meistens dazu zu raten, die Logik (in deinem Fall also wohl die Unit Zombie) von der Grafikausgabe zu trennen.

Was ja nicht nur für Spiele gilt

[Edlmann]

Das ist im aktuellem Spiel getrennt, die Logik läuft über einen Timer, die Ausgaben über die Funktion Application.OnIdle
und ich habe die zweite Konstante gelöscht, war auch eigentlich nicht geplant da zwei raus zu machen...sinds aber iwie geworden ^^

Danke nochmal,
Edlmann