[salvica]

Hola a todos

Estoy viendo el código de un componente bajado de internet, para modificarlo a mis necesidades, y encuentro que las funciones/procedimientos las construye utilizando la palabra Self

Código Delphi [-]
  Self.Canvas.Font.Assign(value);

pero cuando cambio la fuente al componente no actúa.

Estoy siguiendo el libro Delphi 4 de Francisco Charte, y veo que para modificar la fuente asigna Font.OnCreate := AttributeChanged;

He buscado esa función en intenet, pero no la encuento (debe ser definida en el componente). Desgraciadamente no dispongo del CD con el código de los ejemplos. En el libro pone (pag. 782. Fundamentos de creación de componentes)

Código Delphi [-]
private
  FFont : TFont;
protected
// Cuando las propiedades Brush, Pen o Font se modifican
// automáticamente generan un evento OnChange, que dirigiremos
// a éste procedimiento
  procedure AttributeChanged( Sender: TObject);

¿Alguien puede darme un poco de luz sobre el asunto?

Gracias
salvica