pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

LazMapViewer: Fix centering error when either longitude or latitude of center point is changed. Sourceforge bug #51.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8184 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2021-12-30 23:24:38 +00:00
parent 7c3d69fa44
commit a4971e7930
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazmapviewer/source/mvengine.pas
View File

@ -1113,7 +1113,7 @@ end;
procedure TMapViewerEngine.SetCenter(aCenter: TRealPoint); procedure TMapViewerEngine.SetCenter(aCenter: TRealPoint);
begin begin
if (MapWin.Center.Lon <> aCenter.Lon) and (MapWin.Center.Lat <> aCenter.Lat) then if (MapWin.Center.Lon <> aCenter.Lon) or (MapWin.Center.Lat <> aCenter.Lat) then
begin begin
Mapwin.Center := aCenter; Mapwin.Center := aCenter;
CalculateWin(MapWin); CalculateWin(MapWin);