paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-28 14:43:51 +02:00
Code Issues Packages Projects Releases Wiki Activity

anchordocking: license headers

Browse Source 
git-svn-id: trunk@57985 -
This commit is contained in:
mattias 2018-05-21 09:01:30 +00:00
parent dec751c07b
commit 00ff76e8f7
7 changed files with 66 additions and 143 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/anchordocking/anchordocking.pas
View File

@ -1,6 +1,6 @@
{ Unit implementing anchor docking.
Copyright (C) 2010 Mattias Gaertner mattias@freepascal.org
Copyright (C) 2018 Mattias Gaertner mattias@freepascal.org
This library is free software; you can redistribute it and/or modify it
under the terms of the GNU Library General Public License as published by

106
components/anchordocking/anchordockoptionsdlg.lfm
View File

@ -14,9 +14,9 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = HeaderStyleComboBox
AnchorSideTop.Side = asrBottom
Left = 10
Height = 19
Height = 13
Top = 39
Width = 122
Width = 111
BorderSpacing.Left = 10
Caption = 'DragThresholdLabel'
ParentColor = False
@ -26,21 +26,21 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = HighlightFocused
AnchorSideTop.Side = asrBottom
Left = 10
Height = 19
Top = 354
Width = 130
Height = 13
Top = 349
Width = 117
BorderSpacing.Top = 10
Caption = 'HeaderAlignTopLabel'
ParentColor = False
end
object HeaderAlignLeftLabel: TLabel
AnchorSideLeft.Control = DragThresholdLabel
AnchorSideTop.Control = HeaderAlignTopTrackBar
AnchorSideTop.Side = asrBottom
AnchorSideTop.Control = HeaderAlignLeftTrackBar
AnchorSideTop.Side = asrCenter
Left = 10
Height = 19
Top = 430
Width = 130
Height = 13
Top = 426
Width = 120
BorderSpacing.Top = 10
Caption = 'HeaderAlignLeftLabel'
ParentColor = False
@ -50,9 +50,9 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = DragThresholdTrackBar
AnchorSideTop.Side = asrBottom
Left = 10
Height = 19
Top = 114
Width = 112
Height = 13
Top = 108
Width = 103
BorderSpacing.Top = 10
Caption = 'SplitterWidthLabel'
ParentColor = False
@ -62,9 +62,9 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = SplitterWidthTrackBar
AnchorSideTop.Side = asrBottom
Left = 10
Height = 23
Top = 183
Width = 169
Height = 24
Top = 171
Width = 160
BorderSpacing.Top = 4
Caption = 'ScaleOnResizeCheckBox'
ParentShowHint = False
@ -79,7 +79,7 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideRight.Side = asrBottom
Left = 10
Height = 46
Top = 58
Top = 52
Width = 396
Max = 20
OnChange = DragThresholdTrackBarChange
@ -91,15 +91,16 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
TabOrder = 1
end
object HeaderAlignTopTrackBar: TTrackBar
AnchorSideLeft.Control = DragThresholdTrackBar
AnchorSideLeft.Control = HeaderAlignTopLabel
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = HeaderAlignTopLabel
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = DragThresholdTrackBar
AnchorSideRight.Side = asrBottom
Left = 10
Left = 127
Height = 47
Top = 373
Width = 396
Top = 362
Width = 279
Frequency = 10
Max = 150
OnChange = HeaderAlignTopTrackBarChange
@ -111,15 +112,16 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
TabOrder = 2
end
object HeaderAlignLeftTrackBar: TTrackBar
AnchorSideLeft.Control = DragThresholdTrackBar
AnchorSideTop.Control = HeaderAlignLeftLabel
AnchorSideLeft.Control = HeaderAlignLeftLabel
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = HeaderAlignTopTrackBar
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = DragThresholdTrackBar
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 10
Left = 130
Height = 47
Top = 449
Width = 396
Top = 409
Width = 286
Frequency = 10
Max = 200
OnChange = HeaderAlignLeftTrackBarChange
@ -138,7 +140,7 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideRight.Side = asrBottom
Left = 10
Height = 46
Top = 133
Top = 121
Width = 396
Min = 1
OnChange = SplitterWidthTrackBarChange
@ -153,9 +155,9 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = ShowHeaderCheckBox
AnchorSideTop.Side = asrBottom
Left = 25
Height = 23
Top = 229
Width = 208
Height = 24
Top = 219
Width = 191
BorderSpacing.Left = 15
Caption = 'ShowHeaderCaptionCheckBox'
ParentShowHint = False
@ -167,9 +169,9 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = ShowHeaderCaptionCheckBox
AnchorSideTop.Side = asrBottom
Left = 25
Height = 23
Top = 252
Width = 272
Height = 24
Top = 243
Width = 249
Caption = 'HideHeaderCaptionForFloatingCheckBox'
ParentShowHint = False
ShowHint = True
@ -180,9 +182,9 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = ScaleOnResizeCheckBox
AnchorSideTop.Side = asrBottom
Left = 10
Height = 23
Top = 206
Width = 160
Height = 24
Top = 195
Width = 149
Caption = 'ShowHeaderCheckBox'
OnChange = ShowHeaderCheckBoxChange
ParentShowHint = False
@ -195,14 +197,14 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 121
Left = 112
Height = 27
Top = 6
Width = 285
Width = 294
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 4
BorderSpacing.Around = 6
ItemHeight = 19
ItemHeight = 0
OnDrawItem = HeaderStyleComboBoxDrawItem
Style = csDropDownList
TabOrder = 8
@ -212,9 +214,9 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = HeaderStyleComboBox
AnchorSideTop.Side = asrCenter
Left = 10
Height = 19
Top = 10
Width = 105
Height = 13
Top = 13
Width = 96
BorderSpacing.Left = 10
Caption = 'HeaderStyleLabel'
ParentColor = False
@ -224,9 +226,9 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = HideHeaderCaptionForFloatingCheckBox
AnchorSideTop.Side = asrBottom
Left = 25
Height = 23
Top = 275
Width = 116
Height = 24
Top = 267
Width = 110
Caption = 'FlattenHeaders'
ParentShowHint = False
ShowHint = True
@ -237,9 +239,9 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = FlattenHeaders
AnchorSideTop.Side = asrBottom
Left = 25
Height = 23
Top = 298
Width = 105
Height = 24
Top = 291
Width = 100
Caption = 'FilledHeaders'
ParentShowHint = False
ShowHint = True
@ -250,9 +252,9 @@ object AnchorDockOptionsFrame: TAnchorDockOptionsFrame
AnchorSideTop.Control = FilledHeaders
AnchorSideTop.Side = asrBottom
Left = 25
Height = 23
Top = 321
Width = 130
Height = 24
Top = 315
Width = 121
Caption = 'HighlightFocused'
ParentShowHint = False
ShowHint = True

29
components/anchordocking/anchordockoptionsdlg.pas
View File

@ -1,31 +1,4 @@
{ Unit implementing anchor docking.
Copyright (C) 2010 Mattias Gaertner mattias@freepascal.org
This library is free software; you can redistribute it and/or modify it
under the terms of the GNU Library General Public License as published by
the Free Software Foundation; either version 2 of the License, or (at your
option) any later version with the following modification:
As a special exception, the copyright holders of this library give you
permission to link this library with independent modules to produce an
executable, regardless of the license terms of these independent modules,and
to copy and distribute the resulting executable under terms of your choice,
provided that you also meet, for each linked independent module, the terms
and conditions of the license of that module. An independent module is a
module which is not derived from or based on this library. If you modify
this library, you may extend this exception to your version of the library,
but you are not obligated to do so. If you do not wish to do so, delete this
exception statement from your version.
This program is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
for more details.
You should have received a copy of the GNU Library General Public License
along with this library; if not, write to the Free Software Foundation,
Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
{ For license see anchordocking.pas
}
unit AnchorDockOptionsDlg;

29
components/anchordocking/anchordockstorage.pas
View File

@ -1,31 +1,4 @@
{ Unit implementing anchor docking storage tree.
Copyright (C) 2010 Mattias Gaertner mattias@freepascal.org
This library is free software; you can redistribute it and/or modify it
under the terms of the GNU Library General Public License as published by
the Free Software Foundation; either version 2 of the License, or (at your
option) any later version with the following modification:
As a special exception, the copyright holders of this library give you
permission to link this library with independent modules to produce an
executable, regardless of the license terms of these independent modules,and
to copy and distribute the resulting executable under terms of your choice,
provided that you also meet, for each linked independent module, the terms
and conditions of the license of that module. An independent module is a
module which is not derived from or based on this library. If you modify
this library, you may extend this exception to your version of the library,
but you are not obligated to do so. If you do not wish to do so, delete this
exception statement from your version.
This program is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
for more details.
You should have received a copy of the GNU Library General Public License
along with this library; if not, write to the Free Software Foundation,
Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
{ For license see anchordocking.pas
}
Unit AnchorDockStorage;

29
components/anchordocking/anchordockstr.pas
View File

@ -1,31 +1,4 @@
{ Unit implementing anchor docking.
Copyright (C) 2010 Mattias Gaertner mattias@freepascal.org
This library is free software; you can redistribute it and/or modify it
under the terms of the GNU Library General Public License as published by
the Free Software Foundation; either version 2 of the License, or (at your
option) any later version with the following modification:
As a special exception, the copyright holders of this library give you
permission to link this library with independent modules to produce an
executable, regardless of the license terms of these independent modules,and
to copy and distribute the resulting executable under terms of your choice,
provided that you also meet, for each linked independent module, the terms
and conditions of the license of that module. An independent module is a
module which is not derived from or based on this library. If you modify
this library, you may extend this exception to your version of the library,
but you are not obligated to do so. If you do not wish to do so, delete this
exception statement from your version.
This program is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
for more details.
You should have received a copy of the GNU Library General Public License
along with this library; if not, write to the Free Software Foundation,
Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
{ For license see anchordocking.pas
}
unit AnchorDockStr;

12
components/anchordocking/design/anchordesktopoptions.pas
View File

@ -1,3 +1,5 @@
{ For license see registeranchordocking.pas
}
unit AnchorDesktopOptions;
{$mode objfpc}{$H+}
@ -51,14 +53,14 @@ implementation
procedure TAnchorDesktopOpt.Assign(Source: TAbstractDesktopDockingOpt);
var
xSource: TAnchorDesktopOpt;
ADOpts: TAnchorDesktopOpt;
begin
if Source is TAnchorDesktopOpt then
begin
xSource := TAnchorDesktopOpt(Source);
FTree.Assign(xSource.FTree);
FRestoreLayouts.Assign(xSource.FRestoreLayouts);
FSettings.Assign(xSource.FSettings);
ADOpts := TAnchorDesktopOpt(Source);
FTree.Assign(ADOpts.FTree);
FRestoreLayouts.Assign(ADOpts.FRestoreLayouts);
FSettings.Assign(ADOpts.FSettings);
end;
end;

2
components/anchordocking/design/registeranchordocking.pas
View File

@ -1,6 +1,6 @@
{ Installs anchor docking manager in the Lazarus IDE.
Copyright (C) 2010 Mattias Gaertner mattias@freepascal.org
Copyright (C) 2018 Mattias Gaertner mattias@freepascal.org
This library is free software; you can redistribute it and/or modify it
under the terms of the GNU Library General Public License as published by