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

DockedFormEditor: Enable option "Allow size control" by default

Browse Source 
git-svn-id: trunk@64669 -
This commit is contained in:
michl 2021-02-26 20:34:54 +00:00
parent b083a28eb0
commit 441ac1e643
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/dockedformeditor/source/dockedoptionside.pas
View File

@ -261,7 +261,7 @@ end;
constructor TDockedOptions.Create;
begin
FAllowSizing := False;
FAllowSizing := True;
FAnchorBorderColor := DefaultAnchorBorderColor;
FAnchorControlColor := DefaultAnchorControlColor;
FAnchorTabVisible := True;
@ -307,7 +307,7 @@ var
begin
Cfg := GetIDEConfigStorage(AFilename, False);
try
Cfg.SetDeleteValue('AllowSizing/Value', AllowSizing, False);
Cfg.SetDeleteValue('AllowSizing/Value', AllowSizing, True);
Cfg.SetDeleteValue('AnchorBorderColor/Value', AnchorBorderColor, DefaultAnchorBorderColor);
Cfg.SetDeleteValue('AnchorControlColor/Value', AnchorControlColor, DefaultAnchorControlColor);
Cfg.SetDeleteValue('AnchorTopColor/Value', AnchorTopColor, DefaultAnchorTopColor);
@ -334,7 +334,7 @@ var
begin
Cfg := GetIDEConfigStorage(AFilename, True);
try
AllowSizing := Cfg.GetValue('AllowSizing/Value', False);
AllowSizing := Cfg.GetValue('AllowSizing/Value', True);
AnchorBorderColor := Cfg.GetValue('AnchorBorderColor/Value', DefaultAnchorBorderColor);
AnchorControlColor := Cfg.GetValue('AnchorControlColor/Value', DefaultAnchorControlColor);
AnchorTopColor := Cfg.GetValue('AnchorTopColor/Value', DefaultAnchorTopColor);