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: Wrong focus when load search template

Browse source
This commit is contained in:
Alexander Koblov 2022-10-21 18:58:46 +03:00
commit 6201b8bed5
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/fFindDlg.pas
View file

@ -2354,13 +2354,16 @@ begin
//1. If we're using at least plug in, switch to it.
//2. If not but we're using at least something from the "Advanced" tab, switch to it.
//3. If nothing above, at least switch to "Standard" tab.
pgcSearch.Options:= pgcSearch.Options + [nboDoChangeOnSetIndex];
if (cbUsePlugin.Checked OR frmContentPlugins.chkUsePlugins.Checked) then
pgcSearch.ActivePage := tsPlugins
else
if (cbNotOlderThan.Checked OR cbFileSizeFrom.Checked OR cbFileSizeTo.Checked OR cbDateFrom.Checked OR cbDateTo.Checked OR cbTimeFrom.Checked OR cbTimeTo.Checked OR (edtAttrib.Text<>'')) then
pgcSearch.ActivePage := tsAdvanced
else
else begin
pgcSearch.ActivePage := tsStandard;
end;
pgcSearch.Options:= pgcSearch.Options - [nboDoChangeOnSetIndex];
end;
end;
@ -2640,7 +2643,6 @@ end;
procedure TfrmFindDlg.tsStandardEnter(Sender: TObject);
begin
btnStart.Default := True;
cmbFindFileMask.SetFocus;
end;
{ TfrmFindDlg.UpdateTemplatesList }