您的位置:首页 > 编程语言 > Delphi

delphi发送焦点移动消息的函数及参数

2009-11-26 09:09 302 查看
procedure TForm_BaseMDI.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
begin

Key := #0;
SendMessage(Handle, 48384, 9, 0);
end;
end;

且Form.Keypreview 属性值 = true;
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: