Forum: Multimedia
Delphi
by jfheins,
6. Sep 2008
Ok, nochmal eine kleine Skizze in Pseudocode:
Basisklasse:
TGameObject = class(TPersistent)
protected
x, y, vx, vx: Single;
Engine: TEngine;
public
procedure PaintTo(Dest: Bitmap); abstract;
Forum: Multimedia
Delphi
by jfheins,
6. Sep 2008
AAAlso .. das mit dem Canvas der Form mag funktionieren, gut ist das aber nicht.
Eine gute Lösung ist folgendes:
1. Nimm eine Paintbox und tu sie aufs form - das ist deine Zeichenfläche
2. Deklariere im private-Bereich deines Form ein Bitmap: TBitmap;
3. Im OnCreate: Bitmap erstellen, und auf die Größe der Paintbox setzen, im OnDestroy zerstören