FMX.Graphics.TPathObject Events