|
@@ -2354,13 +2354,16 @@ begin
|
|
//1. If we're using at least plug in, switch to it.
|
|
//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.
|
|
//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.
|
|
//3. If nothing above, at least switch to "Standard" tab.
|
|
|
|
+ pgcSearch.Options:= pgcSearch.Options + [nboDoChangeOnSetIndex];
|
|
if (cbUsePlugin.Checked OR frmContentPlugins.chkUsePlugins.Checked) then
|
|
if (cbUsePlugin.Checked OR frmContentPlugins.chkUsePlugins.Checked) then
|
|
pgcSearch.ActivePage := tsPlugins
|
|
pgcSearch.ActivePage := tsPlugins
|
|
else
|
|
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
|
|
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
|
|
pgcSearch.ActivePage := tsAdvanced
|
|
- else
|
|
|
|
|
|
+ else begin
|
|
pgcSearch.ActivePage := tsStandard;
|
|
pgcSearch.ActivePage := tsStandard;
|
|
|
|
+ end;
|
|
|
|
+ pgcSearch.Options:= pgcSearch.Options - [nboDoChangeOnSetIndex];
|
|
end;
|
|
end;
|
|
end;
|
|
end;
|
|
|
|
|
|
@@ -2640,7 +2643,6 @@ end;
|
|
procedure TfrmFindDlg.tsStandardEnter(Sender: TObject);
|
|
procedure TfrmFindDlg.tsStandardEnter(Sender: TObject);
|
|
begin
|
|
begin
|
|
btnStart.Default := True;
|
|
btnStart.Default := True;
|
|
- cmbFindFileMask.SetFocus;
|
|
|
|
end;
|
|
end;
|
|
|
|
|
|
{ TfrmFindDlg.UpdateTemplatesList }
|
|
{ TfrmFindDlg.UpdateTemplatesList }
|