dxdbgrid-按安回车自动换行时，如何设置可以自动增加记录的呢

Question

DBGridEh当回车时，如果是最后一条记，就会自动增加一条。在dxdbgrid有没有这样的功能？
如果有，该怎样设置，有过这方面经验的朋友，请帮一下忙，非常感谢!

Answer 1

dxGrid没有相关属性, cxGrid就有. 但是dxGrid的KeyUp事件还是可以实现的procedure TForm1.dxDBGrid1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key=VK_RETURN then
    if qry1.Eof then //qry1是数据集组件
      qry1.Append;
end;

Answer 2

不好意思, 上面的代码有bugs, 帮你更改了一下.
如果搞定了就早些结贴, 请尊重我的成果我也是花了些时间的.type
  TForm1 = class(TForm)
    qry1: TADOQuery;
    dxDBGrid1: TdxDBGrid;
    ds1: TDataSource;
    dxDBGrid1ID: TdxDBGridMaskColumn;
    dxDBGrid1desr: TdxDBGridMaskColumn;
    dxDBGrid1TEST: TdxDBGridMaskColumn;
    dxDBGrid1Num: TdxDBGridMaskColumn;
    procedure dxDBGrid1KeyUp(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    procedure dxDBGrid1ChangeColumn(Sender: TObject; Node: TdxTreeListNode;
      Column: Integer);
  private
    { Private declarations }
    ColumnIndex:Integer;
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementationuses uDataMdl;{$R *.dfm}procedure TForm1.dxDBGrid1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (Key=VK_RETURN) and (ColumnIndex=0) then
    if (qry1.Eof)  then
      qry1.Append;
end;procedure TForm1.dxDBGrid1ChangeColumn(Sender: TObject;
  Node: TdxTreeListNode; Column: Integer);
begin
  ColumnIndex:=Column;
end;end.
***********************************
 高级群号:16497064欢迎编程高手加入.
***********************************