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

FIX: Bug [ 1869790 ] Опции -> цвета файлов - нелогичность

Browse source
This commit is contained in:
Alexander Koblov 2008-01-18 14:04:51 +00:00
commit 23eac08fc9
2 changed files with 27 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

15
doc/changelog.txt
View file

@ -1,11 +1,12 @@
17.08.2007 FIX: Bug [ 1869784 ] Папки и diff
17.08.2007 FIX: Bug [ 1870772 ] Навигация lynx, "вправо" на "уровень выше"
13.08.2007 FIX: Bug [ 1869757 ] Внешний редактор
13.08.2007 FIX: Bug [ 1869786 ] Внешний diff - дц не передает файлы.
11.08.2008 FIX: Bug [ 1869243 ] Навигация lynx и вход в архивы.
11.08.2008 FIX: Bug [ 1860652 ] "Run Term" Opens terminal in last accessed directory, not in current
18.01.2008 FIX: Bug [ 1869790 ] Опции -> цвета файлов - нелогичность
17.01.2007 FIX: Bug [ 1869784 ] Папки и diff
17.01.2007 FIX: Bug [ 1870772 ] Навигация lynx, "вправо" на "уровень выше"
13.01.2007 FIX: Bug [ 1869757 ] Внешний редактор
13.01.2007 FIX: Bug [ 1869786 ] Внешний diff - дц не передает файлы.
11.01.2008 FIX: Bug [ 1869243 ] Навигация lynx и вход в архивы.
11.01.2008 FIX: Bug [ 1860652 ] "Run Term" Opens terminal in last accessed directory, not in current
panel's directory
11.08.2008 FIX: Bug [ 1861911 ] must add version.inc
11.01.2008 FIX: Bug [ 1861911 ] must add version.inc
10.01.2008 FIX: Bug [ 1860271 ] Навигация lynx и архивы
--------------------------------------------------------------------------------
26.12.2007 Release Double Commander 0.3 alpha

20
foptions.pas
View file

@ -979,7 +979,16 @@ begin
Inc(I);
end; // while gIni.ReadString();
if lbCategories.Count > 0 then
lbCategories.ItemIndex := 0;
lbCategories.ItemIndex := 0
else
begin
edtCategoryName.Enabled := False;
edtCategoryMask.Enabled := False;
cbCategoryColor.Enabled := False;
btnCategoryColor.Enabled := False;
bbtnDeleteCategory.Enabled := False;
bbtnApplyCategory.Enabled := False;
end;
lbCategoriesClick(lbCategories);
end;
@ -1026,6 +1035,15 @@ procedure TfrmOptions.bbtnAddCategoryClick(Sender: TObject);
var
iIndex : Integer;
begin
if lbCategories.Count = 0 then
begin
edtCategoryName.Enabled := True;
edtCategoryMask.Enabled := True;
cbCategoryColor.Enabled := True;
btnCategoryColor.Enabled := True;
bbtnDeleteCategory.Enabled := True;
bbtnApplyCategory.Enabled := True;
end;
iIndex := lbCategories.Items.AddObject('', nil);
lbCategories.ItemIndex := iIndex;
edtCategoryName.Text := '';