안녕하세요... 또 질문 하는 군요...^^
이런 컨퍼넌트가 있는지 궁금해서요...
텍스트1, 텍스트2, 텍스트3.... 이렇게 n개의 텍스트가 유닛에 올려져 있습니다
엔터 치게 되면 지정된 곳으로 이동을 해야 합니다
텍스트1에서 데이타를 입력하고 엔터를 치면 텍스트2로 커서가 이동해야
합니다.. 이럴경우 키프레스 이벤트에 이것저것 명령어를 내려 줘야 하는데..
이걸 한 컴퍼넌트에서 정의를 해주고... 그 정의대로 엔터를 치면 넘어가게
하고 싶어요... 이런 컴퍼넌트가 있나요??
제가 쓰는 것은 델파이 6입니다...
넘 소스가 길어지니... 힘들군요... 소스가 길어진다고 좀 줄이라고 하는데..
쩝...
부탁 드립니다...
그럼.~~
당근 코딩이 길어지죠...
해당 컴포넌트가 올려져있는 폼의 프로퍼티를 한번 보세요
KeyPreview가 있을꺼에요... 그거를 일단 True로 설정을 하세요
그런다음 폼의 OnKeyPress()나 OnKeyDown()에다가 코딩을 하는거죠
예를 들면
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Key = VK_RETURN) then // 키가 엔터일경우
begin
if (ActiveControl is TEdit) then // 엑티브 된 컨트롤이 에디트일경우
SelectNext(ActiveControl as TWinControl, true, true);
// 다음 컨트롤로 포커스가 이동한다.
end;
end;
주의 하실점은 TabOrder의 순서데로 포커스가 이동합니다.
잘 응용하세요