Form 프로퍼티 중
KeyPreview := True
OnKeyDown 이벤트는
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_ESCAPE then
begin
Edit2.SetFocus;
Key := 0;
end;
end;
김길남 님이 쓰신 글 :
: MDI Form에서는 Esc키를 잡아서 다른용도로 사용이 가능한데
:
: Dialog Form에서는 Esc키를 시스템에서 자동으로 처리하느라
:
: 중간에서 잡아 처리 하기가 어렵네요
:
: 예름 들면
:
: Esc 키를 누르면 Edit1.SetFocus 를 하고싶습니다.
:
: 즐코하세요.
:
: 그럼 20000
|