Panel canvas einem klassenobjekt zuweisen...

[senlukkin]

ich hab ein Panel meinetwegen panel1 auf form1 liegen.

ich kann panel1.canvas ohne probleme verwenden. Nun möchte ich aber meiner Klasse dieses panel1.canvas zuweisen. Ich habe ja ein acanvas in meiner Klasse reserviert (acanvas : Tcanvas);

Danach möchte ich nicht mehr panel1.canvas.irgendetwas sondern meineklasse.acanvas.irgendwas verwenden.

Delphi-Quellcode:

procedure TfrmForm1.FormCreate(Sender: TObject);
begin

  drawdesk1:= TDrawDesk.create;
  drawdesk1.acanvas := panel1.canvas;
...
...

end;

Leider funzt das nicht!

Wie macht man sowas richtig?