Lines-Glow-Blur Animation

[Boleeman]

I tried making an animation in which the lines glow/blur a bit but the speed seems to slow down quite a bit.

May be there is a better way of doing it.

What I was after is a glow effect with a reasonable speed.
(Noticed the animation in blur mode works a touch faster after running the compiled exe)

Just did a quick update: Added some OnChange events.

[Lulu]

Thanks to share. The shape is very nice.

[Lulu]

I notice a memory leak when using the blur effect.
It appears because

Code: Pascal  [Select][+][-]

1. GlowBitmap :=  GlowBitmap.FilterBlurRadial(4, rbFast);

generate another image instance that overwrite GlowBitmap.

To avoid that replace this line by

Code: Pascal  [Select][+][-]

1. BGRAReplace(GlowBitmap, GlowBitmap.FilterBlurRadial(4, rbFast));

[Boleeman]

Thanks Lulu for the nice comment and the fix. The program seems to work more efficiently now in the blur mode, especially on my Intel CPU work laptop. I initially used floating points but found the speed too slow so I switched to integer calculations for faster rendering.

After I uploaded the source I found that the program was seizing up after a while but could not work out why, until you worked it out. Need to remember BGRAReplace for future projects.

Your help was greatly appreciated. Thank you.

Also noticed a pulsating pattern if you set divisor2 = 5.00