触发顺序OnKeyDown -> OnKeyPress -> OnKeyUp
OnKeyPressr当按下一个ASCII的字时有效,对于其他没有反应.
//根据上下左右来改变图的位置
if key = vk_up then
image1.Top :=image1.top-32
else if key = vk_down then
image1.Top :=image1.top+32
http://www.gaodaima.com/?p=65879键盘对图像的移动操作_Delphi
else if key = vk_left then
image1.left :=image1.left-32
else if key = vk_right then
image1.left :=image1.left+32;
补充
//自己看吧
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key in [‘0’..’9′] then
ShowMessage(‘按下0至9’);
end;
欢迎大家阅读《键盘对图像的移动操作_Delphi》,跪求各位点评,若觉得好的话请收藏本文，by 搞代码
搞代码网（gaodaima.com）提供的所有资源部分来自互联网，如果有侵犯您的版权或其他权益，请说明详细缘由并提供版权或权益证明然后发送到邮箱[email protected]，我们会在看到邮件的第一时间内为您处理，或直接联系QQ：872152909。本网站采用BY-NC-SA协议进行授权
转载请注明原文链接：键盘对图像的移动操作_Delphi
转载请注明原文链接：键盘对图像的移动操作_Delphi
