paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-14 19:33:33 +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; constructor TDockedOptions.Create;
begin begin
FAllowSizing := False; FAllowSizing := True;
FAnchorBorderColor := DefaultAnchorBorderColor; FAnchorBorderColor := DefaultAnchorBorderColor;
FAnchorControlColor := DefaultAnchorControlColor; FAnchorControlColor := DefaultAnchorControlColor;
FAnchorTabVisible := True; FAnchorTabVisible := True;
@ -307,7 +307,7 @@ var
begin begin
Cfg := GetIDEConfigStorage(AFilename, False); Cfg := GetIDEConfigStorage(AFilename, False);
try try
Cfg.SetDeleteValue('AllowSizing/Value', AllowSizing, False); Cfg.SetDeleteValue('AllowSizing/Value', AllowSizing, True);
Cfg.SetDeleteValue('AnchorBorderColor/Value', AnchorBorderColor, DefaultAnchorBorderColor); Cfg.SetDeleteValue('AnchorBorderColor/Value', AnchorBorderColor, DefaultAnchorBorderColor);
Cfg.SetDeleteValue('AnchorControlColor/Value', AnchorControlColor, DefaultAnchorControlColor); Cfg.SetDeleteValue('AnchorControlColor/Value', AnchorControlColor, DefaultAnchorControlColor);
Cfg.SetDeleteValue('AnchorTopColor/Value', AnchorTopColor, DefaultAnchorTopColor); Cfg.SetDeleteValue('AnchorTopColor/Value', AnchorTopColor, DefaultAnchorTopColor);
@ -334,7 +334,7 @@ var
begin begin
Cfg := GetIDEConfigStorage(AFilename, True); Cfg := GetIDEConfigStorage(AFilename, True);
try try
AllowSizing := Cfg.GetValue('AllowSizing/Value', False); AllowSizing := Cfg.GetValue('AllowSizing/Value', True);
AnchorBorderColor := Cfg.GetValue('AnchorBorderColor/Value', DefaultAnchorBorderColor); AnchorBorderColor := Cfg.GetValue('AnchorBorderColor/Value', DefaultAnchorBorderColor);
AnchorControlColor := Cfg.GetValue('AnchorControlColor/Value', DefaultAnchorControlColor); AnchorControlColor := Cfg.GetValue('AnchorControlColor/Value', DefaultAnchorControlColor);
AnchorTopColor := Cfg.GetValue('AnchorTopColor/Value', DefaultAnchorTopColor); AnchorTopColor := Cfg.GetValue('AnchorTopColor/Value', DefaultAnchorTopColor);