如何调用keypress事件？

Question

grdGrid1.keypress(sender:Tobject;var key:char);
begin
    button1.setfocuse;
endgrdGrid1.Dblclick(sender:Tobject);
beginend;
本人想在双击grdGrid1的时候调用keypress事件，请问应如何调用。

Answer 1

grdGrid1.keypress(sender:Tobject;var key:char);
begin
    button1.setfocuse;
endgrdGrid1.Dblclick(sender:Tobject);
begin
  button1.SetFocus;
end;

Answer 2

grdGrid1.keypress(sender:Tobject;var key:char);
begin
    button1.setfocuse;
endgrdGrid1.Dblclick(sender:Tobject);
begin
  grdGrid1.keypress;
end;

Answer 3

我是想在dblclick事件里调用keypress事件。
我的代码如下：
grdGrid1.Dbclick(Sender:Tobject);
begin
  grdGrid1.OnKeypress(self,#13);
end;
但是运行的时候他提示参数类型不匹配。

Answer 4

我是想在dblclick事件里调用keypress事件。
我的代码如下：
grdGrid1.Dbclick(Sender:Tobject);
begin
  grdGrid1.OnKeypress(grdGrid1,#13);
end;
但是运行的时候他提示参数类型不匹配。

Answer 5

grdGrid1.Dbclick(Sender:Tobject);
begin
  grdGrid1.OnKeypress(nil,#13);
  // or grdGrid1.OnKeypress(button1,#13);
end;

Answer 6

最好是模拟消息发送好了，这样更使用
GRdGrid1.Perform(********************)
具体代码参考相关书籍

Answer 7

grdGrid1.Dbclick(Sender:Tobject);
begin
  grdGrid1.OnKeypress(nil,#13);
  // or grdGrid1.OnKeypress(button1,#13);
end;这样子也不行啊，如果用模拟消息发送，应该怎样写代码呢？

Answer 8

grdGrid的双击事件是没有记录的情况下发送的。
你可以是试试ONSELECTCELL里就是选择单元个的时候。

Answer 9

procedure grdGrid1.Dbclick(Sender:Tobject);
var
  key: Char;
begin
  key := #13;
  grdGrid1.OnKeypress(nil,key);
  // or grdGrid1.OnKeypress(button1,key);
end;