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: Make workable "Home" and "End" with "Control" key in Viewer

Browse source
This commit is contained in:
Alexander Koblov 2010-06-02 15:10:14 +00:00
commit 2aee4fc43a
1 changed files with 17 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

17
components/viewer/viewercontrol.pas
View file

@ -1705,6 +1705,23 @@ begin
inherited KeyDown(Key, Shift);
end;
end
else if Shift = [ssCtrl] then
begin
case Key of
VK_HOME:
begin
Key := 0;
GoHome;
end;
VK_END:
begin
Key := 0;
GoEnd;
end;
else
inherited KeyDown(Key, Shift);
end;
end
else
inherited KeyDown(Key, Shift);
end;