Почему для изменения размера шрифта в Delphi 2009 нужно присвоить шрифт Canvas?

У меня есть подкласс TPanel, который я очень сильно люблю, и, к моему огорчению, шрифт никогда не меняется, когда я делаю вот так:

font.size := AFontsize;
font.style := AFontStyle;
font.color := AFontColor;

но он меняется, когда я делаю вот так:

Canvas.Font.Assign(Font);

Мне не приходилось делать это в Delphi 7, но, похоже, придется делать это в 2009. В чем дело?