Self y Font en creación de componentes

[ecfisa]

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);  // Self es TComponentePrueba
  except
  end;
end;

Es lo mismo que:

Código Delphi [-]
procedure TComponentePrueba.SetFont(Value: TFont);
begin
  try
    Canvas.Font.Assign(Value);  // Self (implícito) es TComponentePrueba
  except
  end;
end;

Un saludo.

[salvica]

Empezado por ecfisa

Hola de nuevo.

No lo has visto seguramente por que en la mayoría de los casos no se utiliza, ya que como te dije antes es implícito (aunque no es incorrecto usarlo).
Código Delphi [-]procedure TComponentePrueba.SetFont(Value: TFont); begin try Canvas.Font.Assign(Value); // Self (implícito) es TComponentePrueba except end; end;

Un saludo.

Gracias por la aclaración, de todas formas el componente debe dibujar en el Canvas, originalmente provenía de TCustomControl, lo ha intentado adaptar a un TGraphicControl, pero me dice que no encuentra la propiedad DoubleBuffered (que debe ser para evitar el parpadeo), con lo que lo he dejado como estaba

Código Delphi [-]
  //TComponentePrueba = class(TGraphicControl)
  TComponentePrueba = class(TCustomControl)

¿Que diferencia hay entre asignar la fuente al canvas o al componente?

Código Delphi [-]
procedure TComponentePrueba.SetFont(Value: TFont);
begin
  FFont := Value; // ---------> aquí asigna la fuente a la variable interna ( en el original esto no viene, pero FFont : TFont si)
  try
    Self.Canvas.Font.Assign(Value); // ---------> aquí asigna la fuente al canvas
  except
  end;
end;

[ecfisa]

Hola.

de todas formas el componente debe dibujar en el Canvas, originalmente provenía de TCustomControl, lo ha intentado adaptar a un TGraphicControl, pero me dice que no encuentra la propiedad DoubleBuffered

Es que la propiedad DoubleBuffered pertenece a la clase TWinControl, clase de la cuál deriva TCustomControl pero no TGraphicControl.

¿Que diferencia hay entre asignar la fuente al canvas o al componente?

En realidad, los atributos de las fuentes se le asignan a la clase TFont en ambos casos.


Un saludo.

[salvica]

Gracias por todo
Saludos
salvica