Hola de nuevo.
No lo has visto por que generalmente no se utiliza, ya que como te dije antes es implícito (aunque no es incorrecto usarlo).
Es decir que:
Código Delphi
[-]procedure TComponentePrueba.SetFont(Value: TFont);
begin
try
Self.Canvas.Font.Assign(Value); except
end;
end;
Es lo mismo que:
Código Delphi
[-]procedure TComponentePrueba.SetFont(Value: TFont);
begin
try
Canvas.Font.Assign(Value); except
end;
end;
Un saludo.