procedure Tfrm_operator.cx_qixieKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if ((Chr(Key) = #13) or (Chr(key) = #9)) and
(cx_qixie.Controller.FocusedColumnIndex + 1 < cx_qixie.VisibleColumnCount) then
begin
cx_qixie.Controller.FocusedColumnIndex := cx_qixie.Controller.FocusedColumnIndex+1;
end
else if ((Chr(Key) = #13) or (Chr(key) = #9)) and
(cx_qixie.Controller.FocusedColumnIndex + 1 = cx_qixie.VisibleColumnCount) then
begin
if (cx_qixie.Controller.FocusedRowIndex +1 < cx_qixie.DataController.RowCount) then
begin
cx_qixie.Controller.FocusedRowIndex := cx_qixie.Controller.FocusedRowIndex+1;
cx_qixie.Controller.FocusedColumnIndex := 0;
end
else
begin
ActiveControl := btn_add;
exit;
end;
end;
end;
cxgrid如何遍历单元格
原创文章标签 cxgrid 单元格 遍历 文章分类 后端开发
©著作权归作者所有:来自51CTO博客作者鹅倌的原创作品,请联系作者获取转载授权,否则将追究法律责任
提问和评论都可以,用心的回复会被更多人看到
评论
发布评论
相关文章
-
poi-tl导出复杂word(图片、表格(合并单元格、嵌套图片)、文字)
java导出复杂word
List java 图片处理