mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: Ctrl+Home/End go to first/last found/filtered file (patch by Denis Bisson)

Browse source
This commit is contained in:
Alexander Koblov 2015-05-31 09:26:07 +00:00
commit f2fd418200
1 changed files with 21 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

34
src/frames/fquicksearch.pas
View file

@ -566,30 +566,38 @@ begin
end;
end;
(* // disabled as they can conflict with trying to get to start/end position
// of edtSearch
// Request to have CTRL pressed at the same time.
// VK_HOME alone reserved to get to start position of edtSearch.
VK_HOME:
begin
Key := 0;
if Assigned(Self.OnChangeSearch) then
if ssCtrl in Shift then
begin
Options := qsdFirst;
Self.OnChangeSearch(Self, edtSearch.Text, Options);
Key := 0;
if Assigned(Self.OnChangeSearch) then
begin
Options.Direction := qsdFirst;
Self.OnChangeSearch(Self, edtSearch.Text, Options);
end;
end;
end;
// Request to have CTRL pressed at the same time.
// VK_END alone reserved to get to end position of edtSearch.
VK_END:
begin
Key := 0;
if Assigned(Self.OnChangeSearch) then
if ssCtrl in Shift then
begin
Options := qsdLast;
Self.OnChangeSearch(Self, edtSearch.Text, Options);
Key := 0;
if Assigned(Self.OnChangeSearch) then
begin
Options.Direction := qsdLast;
Self.OnChangeSearch(Self, edtSearch.Text, Options);
end;
end;
end;
*)
VK_RETURN, VK_SELECT:
begin
Key := 0;