关于KEYDOWN!!弱弱的问题马上揭帖.

Question

1.我想在界面中的一个按钮中调用DBGRID的KEYDOWN事件,
m_dbGridKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState)
问应该怎么写呢?
2.集合为空应该如何表达,比如这里的Shift:TShiftState
马上揭帖.

Answer 1

SendMessage(DBGRID.Handle, VK_DOWN, 0, 0)
或
m_dbGridKeyDown(Sender, VK_DOWN, [])2:
就是上面的[]

Answer 2

[]不能表示,报语法错误?.............
m_dbGridKeyDown(Sender, VK_DOWN, [])
Sender能用 m_dbGriddai代替吗?

Answer 3

TShiftState是VCL已经定义的枚举值，查查帮助，你会看到的

Answer 4

试试下面的代码，呵呵
var
 s_Key : Word;
begin
  s_key := VK_DOWN;
  m_dbGridKeyDown(m_dbGrid, s_Key, [])
end;

Answer 5

测试，集合表示没有问题。
var
  key: Word;
begin
  Key:= VK_RETURN;
  FormKeyDown(Sender, Key, []);
end;