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

LazMapViewer: Publish properties Anchors and BorderSpacing

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9522 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz 2024-12-12 23:30:41 +00:00
parent ad4b3e02aa
commit 1e63bb3075
2 changed files with 14 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
components/lazmapviewer/examples/plugin_demos/grid_demo/main.lfm
View File

@ -1,20 +1,22 @@
object Form1: TForm1
Left = 314
Height = 568
Height = 524
Top = 130
Width = 871
Width = 884
Caption = 'Grid Plugin Demo'
ClientHeight = 568
ClientWidth = 871
ClientHeight = 524
ClientWidth = 884
LCLVersion = '4.99.0.0'
OnCreate = FormCreate
object MapView: TMapView
Left = 157
Height = 568
Top = 0
Width = 714
Height = 508
Top = 8
Width = 719
Active = True
Align = alClient
Anchors = [akTop, akRight, akBottom]
BorderSpacing.Around = 8
Cyclic = True
DownloadEngine = MapView.BuiltInDLE
DrawingEngine = MapView.BuiltInDE
@ -25,18 +27,18 @@ object Form1: TForm1
MapCenter.Latitude = 49
PluginManager = PluginManager
UseThreads = True
Zoom = 8
Zoom = 3
end
object ParamsPanel: TPanel
Left = 8
Height = 552
Height = 508
Top = 8
Width = 141
Align = alLeft
AutoSize = True
BorderSpacing.Around = 8
BevelOuter = bvNone
ClientHeight = 552
ClientHeight = 508
ClientWidth = 141
TabOrder = 0
object cbEnabled: TCheckBox

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

@ -703,6 +703,8 @@ type
published
property Active: boolean read FActive write SetActive default false;
property Align;
property Anchors;
property BorderSpacing;
property CacheOnDisk: boolean read GetCacheOnDisk write SetCacheOnDisk default true;
property CacheLocation: TCacheLocation read FCacheLocation write SetCacheLocation default clProfile;
property CachePath: String read FCachePath write SetCachePath stored IsCachePathStored;