TCustomControl.Canvas.Font aus TCustomControl.Font übernehme

[oki]

Hi Leute,

ich hab folgendes Problem. Ich schreibe eine eigene Komponente, die von TCustomControl abgeleitet ist. Über den vorhandenen Canvas zeichne ich meinen notwendigen Kram und setze den Text mittels DrawText in den Canvas. Jetzt sollen zur Laufzeit die Eigenschaften meiner Compo (Farbe, Schrift usw.) änderbar sein. Nutze ich die hauseigene Property Font des TCustomControl, so wirkt sich das nicht auf den Canvas.Font aus und die SetFont-Procedure von TControl ist private und statisch. Somit kann ich auf die Änderung der Font-Eigenschaften nicht mit einer Übernahme und neuzeichnen in meiner Compo reagieren.

somit brauche ich eine Idee wie ich das in meiner Klasse elegant lösen kann. Eine neue Eigenschaft wie MyFont will ich aber eigentlich nicht definieren.

gruß oki