Delphi XE6. Tworzę aplikację na Androida. W jaki sposób zrealizować rysowanie? Chodzi o zwykłe rysowanie jak kursorem w Paint. Próbowałem to zrobić z LocationSensor, lecz chyba coś mocno pokręciłem.

procedure TForm1.LocationSensorLocationChanged(Sender: TObject;
  const OldLocation, NewLocation: TLocationCoord2D);
var
  PS, PN : TPointF;
begin
  PS.X := OldLocation.Latitude;
  PS.Y := OldLocation.Longitude;
  PN.X := NewLocation.Latitude;
  PN.Y := NewLocation.Longitude;
  Image.Canvas.DrawLine(PS,PN);
end;