Hola
ecfisa, gracias, lo del
AttributeChanged me lo estaba figurando. Tendré que revisar la pila de CD's que tengo (por si lo encontrase)
Lo del
Self, lo está utilizando para todo
Código Delphi
[-]
procedure TComponentePrueba.SetFont(Value: TFont);
begin
try
Self.Canvas.Font.Assign(Value);
except
end;
end;
procedure TComponentePrueba.SetInactive(Value: boolean);
begin
Self.FShowInactive := Value;
Invalidate;
end;
procedure TComponentePrueba.SetInvertir(Value: boolean);
begin
Self.FInvertir := Value;
Invalidate;
end;
Es que es la primera vez que lo veo y me parece extraño.
En fin, gracias de nuevo
Saludos
salvica