Delphiprogramm (Simulator)

[ichbins]

Hi,

erstmal herzlich willkommen in der DP!

zur Frage:

schwierig...
Du musst eine Schleife machen die sich dauernd wiederholt, solange bis alle Gegner tot sind:

Delphi-Quellcode:

//Die Wiederholungsschleife
while angreifer>0 and verteidiger>0 do begin
  //Und jetzt eben eine Aktion. zuerst vom Angreifer:
  //Schiff wählen
  //Schiff angreifen
  //Schaden berechnen
  falls verlust: listbox1.items.add('VERLUST VON '+...)

  //Und dann die Aktion vom Verteidiger. Ich weiss ja nicht, wie du es machen willst, vielleicht auch anderstrum.
  //Schiff wählen
  //Schiff angreifen
  //Schaden berechnen
  falls verlust: listbox2.items.add('VERLUST VON '+...)
  
  //dann ein application.processmessages, damit sich im Programmfenster auch was tut:
  application.processmessages;
end;

natürlich brauchst du eine ifschleife oder so. um auszuwählen wer angegriffen werden soll z.B..

//lad nie mehr einen so großen screenshot hoch... ich hab DSL und hab es fast nicht ausgehalten bis das Ding da war...