Einzelnen Beitrag anzeigen

Haegar

Registriert seit: 10. Dez 2002
Ort: Peitz
319 Beiträge
 
Delphi 7 Professional
 
#1

DelphiX - Neustart des Spiels

  Alt 20. Mär 2003, 19:02
hi,
ich hätt mal eine frage zu frägen.
und zwar habe ich nen menüpunkt (Neues Spiel).
wenn ich da drauf drücke, dann wollte ich:
- schiff an untere mittlere position bringen (kein problem)
- verschiedene variablen auf anfangswerte setzen (kein problem)
- das array of TAsteroid leeren (wurde schonmal
angesprochen).....folgendes problem:
es gibt 3 verschiedene dinge die dabei rauskommen

a) alles klappt super (neu zeichnen, feld leer...keinerlei
fehlermessage); meistens wenn schon einige asteroiden durchgelaufen
sind

b) er bricht gleich Fehlermeldung ab......passiert meistens, wenn der
erste asteroid noch im spiel ist

c) siehe b) mitten im spiel, eventuell hintergrundbild nicht mehr da

das problem warum geschiet a) und c) (is "zufällig" würde ich behaupten)
warum bricht er gleich ab, wenn ich am anfang neu starte?

Delphi-Quellcode:
procedure TForm1.Neu1Click(Sender: TObject);
var i: byte;
begin
 DXtimer.Enabled:=false;
 for i:=indexasteroid downto 0 do
  begin
   if tot[i]=false then
    asteroid[i-1].Dead;
  end;
ich denke mal es liegt an diesem teil der procedure!

gruss haegaer
  Mit Zitat antworten Zitat