delphi : Verschieben zwischen den Zellen des String-Gitters

Question

Wie kann ich in Delphi mit den Tabulator- oder Pfeiltasten zwischen den Zellen eines String-Gitters wechseln? Wie Sie wissen, hat ein String-Raster in Delphi nur eine Tabulator-Reihenfolge, aber ich brauche, um zwischen den Zellen mit Pfeiltasten oder Tab zu bewegen, um bequemer und benutzerfreundlicher zu sein.

Ich habe versucht, ein KeyPress-Ereignis zu verwenden, aber dieses Ereignis kennt nur Zeichen und kennt keine Steuertasten wie Tabulator und ...

Answer 1

StringGrid.Options := StringGrid.Options + [goEditing, goTabs];

Oder stellen Sie diese Designzeit ein.

Jetzt können Sie sich mit den Tabulator- und Pfeiltasten von Zelle zu Zelle bewegen. Wenn Sie gerade eine Zelle bearbeiten, müssen Sie zuerst den Fokus loslassen, wenn Sie zu einer Zelle nach links oder rechts wechseln wollen. Verwenden Sie in diesem Fall die (Umschalt-)Tabulatortaste.

Answer 2

{ This handles arrow left and right in the GRID
}
procedure TJournalForm.JournalGridKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);

begin
    if (JournalGrid.EditorMode = True) then      //  if arrowing while editing…
      begin
           if Key=VK_Left then if JournalGrid.Col>(JournalGrid.FixedCols+1) then JournalGrid.Col:=JournalGrid.Col-1;
         if Key=VK_Right then if JournalGrid.Col<(JournalGrid.ColCount-1) then JournalGrid.Col:=JournalGrid.Col+1;
    end;
end;