Game and keys

[Erel]

The values are: cUpKey, cDownKey, cLeftKey, cRightKey

[pmu5757]

Thank you Erel, but I don't succeed in coding that.
Here is my code (in fact too attempts in the same code but neither the one nor the other works).
Could you tell me what's wrong : I just want to make the button move by typing on the arrows.
Thank you.

Sub Globals
	'Declare the global variables here.

End Sub

Sub App_Start
	Form1.Show
	Button1.Focus
	End Sub


Sub Button1_KeyPress (key)
	If Key=cUpKey Then
		Button1.Top=Button1.Top+5
	End If
End Sub

Sub Form1_KeyPress (specialKey)
	Select SpecialKey
 Case cUpKey
  Button1.Top=Button1.Top+5
 Case cDownKey
 Button1.Top=Button1.Top-5
End Select
End Sub

[Erel]

You are right. The arrow keys are treated differently than other keys on the desktop.
You will need to use dzt's library: dzEventsMagic
See the first example.

[pmu5757]

Thank you, it works very well !