I saw a sample demo application "layers", here there is facility to add a new screen, how to move the new layer by using the keyboard "Up / Down / Left / Right". Here are sample images, how to shift the image selected, use the keyboard. I've tried to use this function:
TFormMain.ImageEnView1SpecialKey procedure (Sender: TObject; charcode: Word; Shift: TShiftState; var Handled: Boolean); begin charcode case of vk_Left: ImageEnView1.MoveSelection (-1, 0); vk_Down: ImageEnView1.MoveSelection (0, 1); vk_Right: ImageEnView1.MoveSelection (1, 0); vk_Up: ImageEnView1.MoveSelection (0, -1); end; end;
but the results have not been able to? is there another solution? Thanks in advance
Search
Move object white keyboard "up/down/left,right"
Posted - Feb 12 2013 : 21:21:42
