mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD: SyncDirs - selected color option

Browse source 
(cherry picked from commit c6c6c0c15a)
This commit is contained in:
Alexander Koblov 2026-03-29 16:56:37 +03:00
commit 331ea62b28
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/fsyncdirsdlg.pas
View file

@ -938,6 +938,7 @@ begin
{$IFDEF LCLCOCOA}
pnlProgress.Color:=clBtnHighlight;
{$ENDIF}
MainDrawGrid.SelectedColor:= gColors.SyncDirs^.SelectedColor;
lblProgress.Caption := rsOperCopying;
lblProgressDelete.Caption := rsOperDeleting;

6
src/ucolors.pas
View file

@ -75,7 +75,8 @@ type
TSyncDirsColors = record
LeftColor,
RightColor,
UnknownColor: TColor;
UnknownColor,
SelectedColor: TColor;
end;
PSyncDirsColors = ^TSyncDirsColors;
@ -295,6 +296,7 @@ begin
LeftColor:= clGreen;
RightColor:= clBlue;
UnknownColor:= clRed;
SelectedColor:= clHighlight;
end;
with FColors[0].Viewer do
begin
@ -544,6 +546,7 @@ begin
Group.Add('LeftColor', ColorTheme.SyncDirs.LeftColor);
Group.Add('RightColor', ColorTheme.SyncDirs.RightColor);
Group.Add('UnknownColor', ColorTheme.SyncDirs.UnknownColor);
Group.Add('SelectedColor', ColorTheme.SyncDirs.SelectedColor);
Group:= TJSONObject.Create;
Theme.Add('Viewer', Group);
@ -657,6 +660,7 @@ begin
LeftColor:= Group.Get('LeftColor', LeftColor);
RightColor:= Group.Get('RightColor', RightColor);
UnknownColor:= Group.Get('UnknownColor', UnknownColor);
SelectedColor:= Group.Get('SelectedColor', SelectedColor);
end;
Group:= Theme.Get('Viewer', Empty);
with ColorTheme.Viewer do