Generic reference to TCanvas Object

[frédéric PAVLIN]

Hello!

I want to build a class which has the abiliy to redraw itself, using the
Canvas of its parent.
The parent can be either a form, or a graphic control.
The common ancestor of all possible parent is TControl, which is parent of
TGraphicControl and TWinControl.
My object's parent is either a TgraphicControl (or inherited class) or a
TwinControl.
How can i access the Canvas property? It is protected in TGraphicControl and
in TWinControl.

TControl
I
___________II_______________
TGraphicControl TWinControl <- has a Canvas
property, protected!
I I
(my object's parent)

So how can i have a valid reference to Parent.Canvas ?

Thanks for help,

Fred. PAVLIN