forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fixup for flat look, sync persistent page options with val set from appli opts

This commit is contained in:
Basile Burg 2016-08-20 12:44:51 +02:00
parent d59cddfd3c
commit 6b5c26ba43
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/ce_editor.pas
View File

@ -355,9 +355,15 @@ procedure TCEEditorWidget.setToolBarFlat(value: boolean);
begin
inherited setToolBarFlat(value);
if value then
begin
fOptions.pageOptions:= fOptions.pageOptions + [poFlatButtons];
pageControl.options := pageControl.options + [poFlatButtons]
end
else
begin
fOptions.pageOptions:= fOptions.pageOptions - [poFlatButtons];
pageControl.options := pageControl.options - [poFlatButtons];
end;
end;
{$ENDREGION}