Zitat von
rawsoul:
Gibt es eine Möglichkeit, die Rechendauer des Timers zu minimieren?
Natürlich, nimm die langsamen Befehle raus...
Vielleicht ist es schneller, die Datei "enemy.bmp" nur ein einziges Mal (z.B. bei Programmstart) in eine Master-Bitmap zu laden und diese in der Timerprozedur auf die neu erzeugten TImage-Controls zu malen. Zudem solltest du den Timer zu Beginn der Timerprozedur deaktivieren und ihn bei Bedarf am Ende wieder aktivieren. Auf diese Weise verhinderst du zumindest einen doppelten Aufruf:
Delphi-Quellcode:
procedure TForm1.enemyTIMERTimer(Sender: TObject);
begin
enemyTIMER.Enabled := False;
:
enemyTIMER.Enabled := True;
end;
Gruß Hawkeye