Zitat:
Immerhin kommt noch was an Code hinzu, was das beschleunigen wird.
Da wäre an erster Stelle Deine Kollisionsabfrage,
Du willst unbedingt die Cpu damit belasten,
indem Du pixelweise den Bildschirm abtastest,//edit
aber ist ja nur bei jeder Bewegung.

.
Delphi-Quellcode:
TObj=class(TImageSprite)
public
//Bauplan:TBauplan;
//procedure DoMove(MoveCount: Integer); override;
procedure DoCollision(Sprite: TSprite; var Done: Boolean); override; //<---
end;
procedure TObj.DoCollision(Sprite: TSprite; var Done: Boolean);
begin
inherited DoCollision(Sprite,Done);
//.
//MeinCode
//.
end;
Bitmap: 2.25MB