FMXChangeStyle
1.0.0
기본 효과 사용으로 FMX 스타일 변경 (TBLURTRANSITIONEFFECT, TFADETRANSITIONEFFECT, ...)과 같은 전환 효과
uses
FMX.StyleChanger, FMX.Filter.Effects;
type
EffectClass = TBlurTransitionEffect;
TStyleExt.Change<EffectClass>(Self, StyleBookDark,
function(Effect: EffectClass): TBitmap
begin
Result := Effect.Target;
Effect.Progress := 0 ;
end );