BacTeria 박종민님께 진심으로 감사드립니다.
먼저 세세한 것까지 신경을 쓰시면서 이해하기 쉽게 설명을 해주셔서 감사합니다.
하다보니 더 좋은 아이디어가 있어서 다음분들을 위해서 이렇게 몇자를 적어봅니다.
먼저, Tab Key 를 Enter Key로 대체하는 Event는 저번 질문과 똑같습니다.
Edit1에서부서 Edit10까지의 OnKeyPress Event의 코딩내용;
If Key = #13 Then
Begin
SelectNext(Sender as tWinControl, True, True);
Key := #0;
end;
여기에서 방향키중 위(Up Arrow)와 아래(Down Arrow)에서만 Edit1에서 Edit10까지
이동하는 방법으로는
Edit1에서부서 Edit10까지의 OnKeyDown Event의 코딩내용;
If Key = VK_UP Then // Up Arrow 일때
Begin
SelectNext(Sender as tWinControl, False, True);
end;
If Key = VK_Down Then // Down Arrow 일때
Begin
SelectNext(Sender as tWinControl, True, True);
end;
이렇게 코딩하시면 됩니다.
Up Key 와 Down Key 의 코딩 내용중 틀린 부분은 중간의 False와 True부분뿐 입니다.
여기서 True는 앞쪽으로, False는 뒤쪽으로 라고 Help에 나와 있더라구요.
워낙 영어가 딸려서리....
BacTeria 박종민님께서 가르쳐 주신 내용으로 조금 더 수정해봤더니 더 좋은 결과가
있더라구요...
아무튼 다시한번 감사드리고요, 이렇게 조금이나마 고생하시는 분들을 위해서
연구한 결과를 올려드립니다.
즐~통~ 되세요....
|