Eigene Klasse, welche den Canvas verwenden soll.

[Fussball-Robby]

Zitat von Diamont:

aber wie kann ich im konstruktor einen canvas übergeben?

In dem du dir einen neuen Konstruktor schreibst;

Delphi-Quellcode:

type
  TMyClass = class
  private
    FCanvas: TCanvas;
  public
    constructor Create(ACanvas: TCanvas);
    procedure Draw;
  end;

implementation

constructor TMyClass.Create(ACanvas: TCanvas);
begin
  FCanvas := ACanvas;
end;

procedure TMyClass.Draw;
begin
  FCanvas.Ellipse(...);
end;

Dann gibst du den Canvas z.B. einer Paintbox an, und auf diesem wird dann gezeichnet.

Gruß