mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD: Middle toolbar - initial implementation

Browse source
This commit is contained in:
Alexander Koblov 2019-06-22 09:00:11 +00:00
commit 44aded6668
6 changed files with 249 additions and 149 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/frames/foptionslayout.pas
View file

@ -56,6 +56,7 @@ type
cbTermWindow: TCheckBox;
cbTwoDiskPanels: TCheckBox;
cbShowShortDriveFreeSpace: TCheckBox;
chkShowMiddleToolBar: TCheckBox;
gbScreenLayout: TGroupBox;
procedure cbShowDiskPanelChange(Sender: TObject);
procedure cbShowDriveFreeSpaceChange(Sender: TObject);
@ -109,6 +110,7 @@ begin
cbShowMainMenu.Checked := gMainMenu;
cbShowMainToolBar.Checked := gButtonBar;
cbFlatToolBar.Checked := gToolBarFlat;
chkShowMiddleToolBar.Checked := gMiddleToolBar;
cbShowDiskPanel.Checked := gDriveBar1;
cbTwoDiskPanels.Checked := gDriveBar2;
cbFlatDiskPanel.Checked := gDriveBarFlat;
@ -136,6 +138,7 @@ begin
gMainMenu := cbShowMainMenu.Checked;
gButtonBar := cbShowMainToolBar.Checked;
gToolBarFlat := cbFlatToolBar.Checked;
gMiddleToolBar := chkShowMiddleToolBar.Checked;
gDriveBar1 := cbShowDiskPanel.Checked;
gDriveBar2 := cbTwoDiskPanels.Checked;
gDriveBarFlat := cbFlatDiskPanel.Checked;