opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-03-13 09:24:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

Never prepend "AND " in first quick filter. Closes #796

Browse Source
This commit is contained in:
Ansgar Becker
2019-11-07 06:59:09 +01:00
parent 17e75e70da
commit dac87729ca
1 changed files with 8 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
source/main.pas
View File

@@ -6373,10 +6373,14 @@ begin
if Filter <> '' then begin
SynMemoFilter.UndoList.AddGroupBreak;
SynMemoFilter.SelectAll;
if KeyPressed(VK_SHIFT) and (Pos(Filter, SynmemoFilter.Text) = 0) and (Pos(SynmemoFilter.Text, Filter) = 0) then
SynmemoFilter.SelText := SynmemoFilter.Text + ' AND ' + Filter
else
SynmemoFilter.SelText := Filter;
if KeyPressed(VK_SHIFT)
and (Pos(Filter, SynMemoFilter.Text) = 0) and (Pos(SynMemoFilter.Text, Filter) = 0)
and (not SynMemoFilter.Text.Trim.IsEmpty)
then begin
SynMemoFilter.SelText := SynMemoFilter.Text + ' AND ' + Filter
end else begin
SynMemoFilter.SelText := Filter;
end;
ToggleFilterPanel(True);
actApplyFilterExecute(Sender);
end;