Cita:
Empezado por Neftali
Creo que esto se puede optimizar (para cualquier componente que tenga esa propiedad) utilizando RTTI. Lo bueno de esto es que generalizando un poco la siguiente función se puede hacer para cualquier propiedad.
|
Ya lo habia probado, el tema que no todos los componentes quedan lindos cuando se les cambia la propiedad color (como el TListBox).
Este es el codigo que use:
Código Delphi
[-]
if not (csDesigning in Self.ComponentState) then
if Sender <> nil then
if IsPublishedProp(Sender,'Color') then
SetOrdProp(Sender,'Color', Color) ;