按下Esc 使得光标从DBGrid1到DBGrid2,???

zhang706 2004-05-08 05:09:50
按下Esc 使得光标从DBGrid1到DBGrid2,???
...全文
32 2 点赞 打赏 收藏 举报
写回复
2 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
nhdj 2004-05-08
form1.keypreview = true

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key = #27 then
dbgrid2.setfocus();
end;
  • 打赏
  • 举报
回复
yurenjf 2004-05-08
procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (key = VK_ESCAPE) and (DBGrid1.Focused) then
DBGrid2.SetFocus ;
end;
  • 打赏
  • 举报
回复
相关推荐
发帖
Delphi
加入

4965

社区成员

Delphi 开发及应用
申请成为版主
帖子事件
创建了帖子
2004-05-08 05:09
社区公告
暂无公告