如何定义一个消息，使在Form上按下键盘和光标在Edit上时，按下键盘，这个消息都执行。

Question

如何定义一个消息，使在Form上按下键盘和光标在Edit上时，按下键盘，这个消息都执行。谢谢

Answer 1

我刚学。。
我想可以用
if key=#13 then
begin
  ......;
  key:=#0;
end;
不知道对不对~刚学。。

Answer 2

使在Form上按下键盘和光标在Edit上时，按下键盘，这个消息都执行
// 你是 1.在Form上 按下键盘时候 执行该消息  2.某个Edit获得光标时 也执行??给你个思路
先自定义消息 以及该消息的处理函数
你可以扑捉Edit的EN_SETFOCUS消息 然后在里面PostMessage(自定义消息)
...FormOnKey也差不多

Answer 3

重定义TEdit类，及相应的消息处理过程在Form.oncreate()
事件里创建相应的实例

Answer 4

定义好消息，然后在
TForm的OnKeyDown事件中if Key = VK_Return 执行消息
TEdit的OnBeginEdit事件中 if key= VK_Return 执行消息

Answer 5

拉一个Edit控件试试Form1.KeyPreview:=True;procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
    showmessage('sdfsf');
end;