Fix incorrect streaming of TLegalNoticePlugin
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9516 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
parent
63d85ad7a2
commit
58a4ae4f18
@ -6,8 +6,8 @@ object Form1: TForm1
|
||||
Caption = 'Form1'
|
||||
ClientHeight = 473
|
||||
ClientWidth = 669
|
||||
LCLVersion = '4.99.0.0'
|
||||
OnCreate = FormCreate
|
||||
LCLVersion = '3.4.0.0'
|
||||
object MapView1: TMapView
|
||||
Left = 0
|
||||
Height = 473
|
||||
@ -28,7 +28,6 @@ object Form1: TForm1
|
||||
object MvPluginManager1LegalNoticePlugin2: TLegalNoticePlugin
|
||||
LegalNotice = 'Copyright'
|
||||
LegalNoticeURL = 'https://www.openstreetmap.org'
|
||||
Spacing = 0
|
||||
end
|
||||
object MvPluginManager1DraggableMarkerPlugin2: TDraggableMarkerPlugin
|
||||
end
|
||||
|
||||
@ -267,6 +267,7 @@ begin
|
||||
FPosition := lnpBottomRight;
|
||||
FFont := TFont.Create;
|
||||
FFont.OnChange := @Changed;
|
||||
FSpacing := DEFAULT_LEGALNOTICE_SPACING;
|
||||
end;
|
||||
|
||||
destructor TLegalNoticePlugin.Destroy;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user