键盘控制 - vfp吧

level 1

袁田雨说楼主

怎么用键盘控制控件移动，求解

2017年04月12日 13点04分 1

level 9

表单的keypress事件中调整控件位置,比如表单有一个命令按钮command1,通过上下左右调整命令按钮的位置,在keypress事件中加代码
LPARAMETERS nKeyCode, nShiftAltCtrl
DO CASE
case nkeycode=5
thisform.command1.Top =thisform.command1.Top-5
case nkeycode=24
thisform.command1.Top =thisform.command1.Top+5
case nkeycode=19
thisform.command1.Left=thisform.command1.Left-5
case nkeycode=4
thisform.command1.Left=thisform.command1.Left+5
endcase

2017年04月12日 14点04分 2

🌌偏执

然而我想让它一直移动，而且显示移动的轨迹。

2017年06月03日 07点06分

level 9

stick777

那就只好启动定时器

2017年06月03日 10点06分 3

level 9

stick777

2567478305QQ

2017年06月03日 10点06分 4