|
Registriert seit: 12. Jun 2002
3.483 Beiträge
Delphi 10.1 Berlin Professional
|
15. Jun 2002, 11:02
Du musst die TList AllShoots erst im OnCreate Ereignis erzeugen (AllShoots := TList.Create) und im OnDestroy Ereignis über AllShoots.Free (nach dem Aufruf von DeleteDeadShoots) wieder freigeben.
Damit nicht bei jedem Zeichnen eines Schusses, alle anderen gelöscht werden, musst du den Aufruf von Form1.Refresh aus der Funktion Shoot in das OnTimer-Ereignis (vor die Schliefe) verschieben.
|