Touch/Swipe Size

[Ñuño Martínez]

Use simple vector maths:

  X := StartP.x - EndP.x;
  Y := StartP.y - EndP.y;
  Strength := SQR ((x*x) + (y*y));