Permalink
Browse files

Do the same selection in any grid when pressing Shift+Ctrl+End/Home, …

…not only in datagrid. See #453 and https://www.heidisql.com/forum.php?t=26307
  • Loading branch information...
ansgarbecker committed Jan 12, 2019
1 parent 0ca022a commit 806c9e51d3b1cc2349e538e1101b4373b93b451f
Showing with 4 additions and 3 deletions.
  1. +4 −3 source/main.pas
@@ -8975,15 +8975,16 @@ procedure TMainForm.AnyGridKeyDown(Sender: TObject; var Key: Word; Shift: TShift
case Key of
VK_HOME: begin
g.FocusedColumn := g.Header.Columns.GetFirstVisibleColumn(False);
if (ssCtrl in Shift) and (g = DataGrid) then begin
if ssCtrl in Shift then begin
// VT itself focuses the first node since v7.0
end else
Key := 0;
end;
VK_END: begin
g.FocusedColumn := g.Header.Columns.GetLastVisibleColumn(False);
if (ssCtrl in Shift) and (g = DataGrid) then begin
actDataShowAll.Execute;
if ssCtrl in Shift then begin
if g = DataGrid then
actDataShowAll.Execute;
// VT itself focuses the last node since v7.0
end else begin
Key := 0;

0 comments on commit 806c9e5

Please sign in to comment.