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

lazmapviewer: Fix compilation when USE_RGBGRAPHICS is defined. Set name of built-in download engine.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6834 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2019-03-22 23:11:50 +00:00
parent ddd6428ace
commit 9f7de9f224
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
components/lazmapviewer/source/mvmapviewer.pas
View File

@@ -605,7 +605,7 @@ var
begin begin
if Assigned(FOnDrawGpsPoint) then begin if Assigned(FOnDrawGpsPoint) then begin
{$IFDEF USE_RGBGRAPHICS} {$IFDEF USE_RGBGRAPHICS}
FOnDrawGpsPoint(Self, Buffer, aPOI) FOnDrawGpsPoint(Self, Buffer, aPOI);
{$ENDIF} {$ENDIF}
{$IFDEF USE_LAZINTFIMAGE} {$IFDEF USE_LAZINTFIMAGE}
FOnDrawGpsPoint(Self, BufferCanvas, aPOI); FOnDrawGpsPoint(Self, BufferCanvas, aPOI);
@@ -754,6 +754,7 @@ begin
FInactiveColor := clWhite; FInactiveColor := clWhite;
FEngine := TMapViewerEngine.Create(self); FEngine := TMapViewerEngine.Create(self);
FBuiltinDownloadEngine := TMvDEFpc.Create(self); FBuiltinDownloadEngine := TMvDEFpc.Create(self);
FBuiltinDownLoadEngine.Name := 'BuiltIn';
{$IFDEF USE_RGBGRAPHICS} {$IFDEF USE_RGBGRAPHICS}
Buffer := TRGB32Bitmap.Create(Width, Height); Buffer := TRGB32Bitmap.Create(Width, Height);
{$ENDIF} {$ENDIF}