码迷,mamicode.com
首页 > 其他好文 > 详细

cxgrid中回车键光标移到下列

时间:2018-10-18 18:12:09      阅读:179      评论:0      收藏:0      [点我收藏+]

标签:eof   proc   ons   mgr   RoCE   procedure   index   append   turn   

OptionsBehavior.GoToNextCellOnEnter:=True;

更完善的回车

可以在焦点到了最后一列再回车时有下一行则移到下一行的第一列,没有下一行则新增记录并移到第一列

procedure TK_XSD_Form.cxGrid1DBTableView1EditKeyDown(
  Sender: TcxCustomGridTableView; AItem: TcxCustomGridTableItem;
  AEdit: TcxCustomEdit; var Key: Word; Shift: TShiftState);
begin
  inherited;
    if Key=VK_RETURN then begin
   if cxGrid1DBTableView1.Controller.FocusedColumnIndex=cxGrid1DBTableView1.VisibleColumnCount-1 then begin
     with cxGrid1DBTableView1.DataController do begin
       if IsEof  then begin   // or (RecNo=RecordCount)
         cxGrid1DBTableView1.DataController.Append;
       end else begin
         cxGrid1DBTableView1.DataController.MoveBy(1);
       end;
       cxGrid1DBTableView1.Controller.FocusedItemIndex:=-1;
     end;
   end;
 end;
end;

 

cxgrid中回车键光标移到下列

标签:eof   proc   ons   mgr   RoCE   procedure   index   append   turn   

原文地址:https://www.cnblogs.com/Thenext/p/9811747.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!