StringGrid: Nach Eingabe eines Zeichens weiterspringen

[marabu]

Hallo Helmi,

ich würde in deinem Fall gar nicht mit dem Inplace-Editor (ohne Option goEditing) arbeiten, sondern die Zeicheneingabe selbst verarbeiten:

Delphi-Quellcode:

procedure TDemoForm.StringGridKeyPress(Sender: TObject; var Key: Char);
begin
  with Sender as TStringGrid do
  begin
    Cells[Col, Row] := Key;
    Col := FixedCols + Succ(Col - FixedCols) mod (ColCount - FixedCols);
    if Col = FixedCols then
      Row := FixedRows + Succ(Row - FixedRows) mod (RowCount - FixedRows);
  end;
  Key := #0;
end;

Grüße vom marabu