键盘对图像的移动操作

中国IT动力,最新最全的IT技术教程

最新100篇 | 推荐100篇 | 专题100篇 | 排行榜 | 搜索 | 在线API文档 | 网通镜像

当前位置：> 程序开发 > 编程语言 > Delphi > 综合文章

键盘对图像的移动操作

作者:未知时间:2005-08-07 21:00 出处:编程爱好者网站责编:chinaitpower

摘要：键盘对图像的移动操作

触发顺序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
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;

关闭本页