paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

LazMapviewer: Moved SelectedAreaChangedEvent to the end of MouseUp in mvareaselectionplugin.pas (patch by Ekkehard Domning)

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9614 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz 2025-02-01 10:17:24 +00:00
parent 025bbdb0d2
commit d334b73843
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/lazmapviewer/source/addons/plugins/areaselection/mvareaselectionplugin.pas
View File

@ -876,8 +876,6 @@ begin
FSelectedAreaChangingEvent(Self, lRect0, chgAllowed);
if chgAllowed then
FSelectedArea.Init(lRect0.TopLeft, lRect0.BottomRight);
if Assigned(FSelectedAreaChangedEvent) then
FSelectedAreaChangedEvent(Self);
MapView.Invalidate; // redraw the map
end;
end;
@ -899,6 +897,8 @@ begin
end;
SetupRectShifter; // Setup the HelperClass for the current setting
Handled := True;
if Assigned(FSelectedAreaChangedEvent) then
FSelectedAreaChangedEvent(Self);
end;
procedure TAreaSelectionPlugin.MouseDown(AMapView: TMapView;