LazMapViewer: Improved point detection in mvPluginCommon's FindNearestMarker. Issue #39101.
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9716 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
parent
24b6e1099d
commit
2e9ee399fc
@ -710,7 +710,7 @@ begin
|
||||
P := TGPSPoint(gpsArray[i]).RealPoint;
|
||||
// Calculating distance as Euklidian distance, for simplicity. No need to calc sqrt.
|
||||
d := sqr(P.Lon - rPt.Lon) + sqr(P.Lat - rPt.Lat);
|
||||
if d < dMin then
|
||||
if d <= dMin then
|
||||
begin
|
||||
dMin := d;
|
||||
iMin := i;
|
||||
|
Loading…
Reference in New Issue
Block a user