Hallo torud,
du brauchst
keinen eigenen Font creieren. TCanvas besitzt schon einen. Es ist nur so, dass der Font des Controls nicht der Font des Canvas ist (zwei seperate Fonts). Da reicht es aber, wenn du den Font des Controls dem Font des Canvas zuweist.
Delphi-Quellcode:
procedure TMyPanel.Paint;
begin
Canvas.Font.assign(self.Font);
....
Alle Änderungen auf den Font des Controls (im
OI) wirken sich dann automatisch auf den Canvas aus und werden somit beim DrawTest berücksichtigt.
Irgentwo war auch noch eine Methode FontChange oder so. in der ruft man inhereitet auf, damit das Control bei Änderung des Fonts neu gezeichnet wird.
Ob das jetzt mit deiner Textausrichtung geklappt hat, hab ich jetzt nicht so richtig verstanden.
Gruß oki