Für ein Spiel habe ich TFigur von TImage abgeleitet
Da fängt das Problem schon an.
Du hast die Vererbung auf falsche Weise eingesetzt.
Ein TImage ist eine visuelle Komponente um ein Picture anzuzeigen.
Ein Spielfigur ist etwas ganz anderes; es dreht sich dabei mehr um den Inhalt; also wie die Figur aussieht; als um die Anzeige.
Ich würde TFigur unabhängig von TImage, TPaintbox oder Ähnlichem entwerfen:
Delphi-Quellcode:
TFigur = class(TPersistent)
private
..
public
procedure Assign(Source: TPersistent);override;
procedure PaintToCanvas(canvas:TCanvas);
property Left:Integer ...;
property Top...;
property Width...
property Height...;
end;