Danke. Aber auch wenn ich theoretisch weiss, was der Unterschied zwischen Klasse und Instanz ist, wie sähe das praktisch aus?
Ich hab jetzt eine Klasse "TDesigner", von der ich im Hauptform eine Instanz erzeuge. In der Klasse hab ich die Objektliste drin als public und natürlich auch die Draw und OnPaint. Also:
Delphi-Quellcode:
type
TDesigner = Class(TObject)
private
Graphics : IGPGraphics;
ABrush: IGPBrush;
APen: IGPPen;
AFont : IGPFont;
public
Destination_PB : TPaintBox;
MyObjects : TObjectList<TDesignerObject>;
procedure Initialize;
procedure Draw;
procedure AddObject(objecttype : TDesignerObjectType; x,y,d : integer);
procedure Dest_PaintMe (Sender : TObject);
end;