Question

Delphi TAdvStringGrid 单元格编辑状态下,如何用左右键移动编辑单元格?

在单元格编辑状态下按下ENTER键,编辑单元格会移到下一个可编辑的单元格,
那么如何在当前编辑状态下,用左右键移动编辑单元格?
即 在编辑 Cells[2,3]的时候,按下左键编辑 Cells[1,3]?
现在按下左右键只能在当前编辑单元格中移动光标...

Answer 1

你需要在控件onkeydown事件中，判断箭头，然后处理就行了。

procedure TForm1.advstrngrd1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = vk_Left then //左键头
begin
advstrngrd1.FocusCell(advstrngrd1.Col-1,advstrngrd1.Row);
end;
end;