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

LazMapViewer: Remove LCL drawing engine from package and fulldemo.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9498 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz 2024-11-04 17:27:38 +00:00
parent 244c9fa2b2
commit d7de2eba34
4 changed files with 11 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/lazmapviewer/examples/fulldemo/configframe_with_addons.lfm
View File

@ -85,7 +85,6 @@ inherited CfgFrame_with_addons: TCfgFrame_with_addons
'default'
'RGBGraphics'
'BGRABitmap'
'LCL'
)
Style = csDropDownList
TabOrder = 11

4
components/lazmapviewer/examples/fulldemo/configframe_with_addons.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls,
mvDrawingEngine, mvDE_RGBGraphics, mvDE_BGRA, mvDE_LCL,
mvDrawingEngine, mvDE_RGBGraphics, mvDE_BGRA, //mvDE_LCL,
mvDLEFPC, mvDLEWin, mvDLESynapse, mvDLECache,
ConfigFrame;
@ -37,7 +37,7 @@ begin
0: MapView.DrawingEngine := nil;
1: MapView.DrawingEngine := TMvRGBGraphicsDrawingEngine.Create(Self);
2: MapView.DrawingEngine := TMvBGRADrawingEngine.Create(self);
3: MapView.DrawingEngine := TMvLCLDrawingEngine.Create(self);
// 3: MapView.DrawingEngine := TMvLCLDrawingEngine.Create(self);
end;
DoUpdateLayers;
end;

21
components/lazmapviewer/lazmapviewerpkg.lpk
View File

@ -22,7 +22,7 @@
FPC 3.2.0 or newer required."/>
<License Value="Modified LGPL with linking exception, like FreePascal RTL/FCL and Lazarus LCL"/>
<Version Minor="2" Release="7"/>
<Files Count="25">
<Files Count="24">
<Item1>
<Filename Value="source/mvcache.pas"/>
<UnitName Value="mvCache"/>
@ -106,26 +106,21 @@ FPC 3.2.0 or newer required."/>
<UnitName Value="mvLayersPropEditForm"/>
</Item20>
<Item21>
<Filename Value="source/mvde_lcl.pas"/>
<HasRegisterProc Value="True"/>
<UnitName Value="mvDE_LCL"/>
</Item21>
<Item22>
<Filename Value="source/mvgeomath.pas"/>
<UnitName Value="mvGeoMath"/>
</Item22>
<Item23>
</Item21>
<Item22>
<Filename Value="source/mvmapviewerpatheditform.pas"/>
<UnitName Value="mvMapViewerPathEditForm"/>
</Item23>
<Item24>
</Item22>
<Item23>
<Filename Value="source/mvmapviewerpatheditdsgform.pas"/>
<UnitName Value="mvMapViewerPathEditDsgForm"/>
</Item24>
<Item25>
</Item23>
<Item24>
<Filename Value="source/mvdlecache.pas"/>
<UnitName Value="mvDLECache"/>
</Item25>
</Item24>
</Files>
<CompatibilityMode Value="True"/>
<RequiredPkgs Count="2">

3
components/lazmapviewer/lazmapviewerpkg.pas
View File

@ -11,7 +11,7 @@ uses
mvCache, mvDownloadEngine, mvDragObj, mvEngine, mvGeoNames, mvGpsObj,
mvJobQueue, mvJobs, mvMapProvider, mvTypes, mvMapViewer, mvExtraData,
mvDLEFpc, mvMapViewerReg, mvGPX, mvDrawingEngine, mvDE_IntfGraphics,
mvDLEWin, mvMapViewerPropEdits, mvLayersPropEditForm, mvDE_LCL, mvGeoMath,
mvDLEWin, mvMapViewerPropEdits, mvLayersPropEditForm, mvGeoMath,
mvMapViewerPathEditForm, mvMapViewerPathEditDsgForm, mvDLECache,
LazarusPackageIntf;
@ -21,7 +21,6 @@ procedure Register;
begin
RegisterUnit('mvMapViewerReg', @mvMapViewerReg.Register);
RegisterUnit('mvMapViewerPropEdits', @mvMapViewerPropEdits.Register);
RegisterUnit('mvDE_LCL', @mvDE_LCL.Register);
end;
initialization