여러개의 TKNumberEdit 컴포넌트에서 다음과 같이 했습니다.



a01 a02 a03 ......

b01 b02 b03 ......

c01 c02 c03 ...... 컴포넌트 배열



procedure TFm107.b02KeyDown(Sender: TObject; var Key: Word;

Shift: TShiftState);

begin

if key = vk_left then b01.SetFocus else

if key = vk_up then a02.SetFocus else //위 방향키

if key = vk_down then c02.SetFocus else //아래 방향키

if key = vk_right then b03.SetFocus else

if key = vk_end then processBtn.SetFocus else

if key = vk_F1 then begin

b02.Value := b01.Value;

b03.SetFocus;

end;

end;



음 그런데 실행하면 vk_up과 vk_down 이 말을 않듣네요 나머지는 잘 듣는데...

커서 컨트롤 방법을 몰라 무식하게 작업 할려니 음 안되네요. 왜그러죠?

고수님들 봐주셔요~~~