LazMapViewer: Opaque drawing of the TCenterMarkerPlugin's cross.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9518 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz 2024-12-09 23:43:07 +00:00
parent baf28e29fb
commit f5db5a89e7

View File

@ -217,6 +217,7 @@ var
C: TPoint;
begin
C := Point(AMapView.ClientWidth div 2, AMapView.ClientHeight div 2);
AMapView.DrawingEngine.Opacity := 1.0;
AMapView.DrawingEngine.PenColor := FPen.Color;
AMapView.DrawingEngine.PenStyle := FPen.Style;
AMapView.DrawingEngine.PenWidth := FPen.Width;