Hi Quick? Easy? Depends on where you are looking from :) '---------------------------------- PUBLIC SUB btnExit_KeyPress() SELECT CASE Key.Code CASE Key.Up btnExit.y = btnExit.y - 10 CASE Key.Down btnExit.y = btnExit.Y + 10 END SELECT END '--------------------------------- similar for left and right. you would also have to check that the button (or whatever) has not moved out of bounds (by comparing with the Form boundaries) Obviously the focus does not have to be the button itself. You can control it say from a hidden textBox.
rgds -- View this message in context: http://www.nabble.com/Moving-things-tp24654731p24656776.html Sent from the gambas-user mailing list archive at Nabble.com. ------------------------------------------------------------------------------ _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user