초보자 wrote:

> MDIChild폼에서 KeyDown이벤트에 F10Key를 눌렀을때 화면Clear버튼

> 이벤트를 실행하도록 했는데 화면 Clear가 된 다음에 MDI폼의 처음

> 메뉴바에 Focus가 이동이 됩니다.

> 또 한번 F10을 누르면 다시 Child폼으로 Focus가 이동이 되구요....

> MDI메뉴바에 Focus가 이동이 안되도록 하는 방법은 없나요?



----------------------------------------------------------------------------------

먼저 MDIChild 폼의 KeyPreview 프로퍼티를 true로 설정합니다.

그리고 MDIChild 폼의 KeyDown 이벤트 프로시져에서

Key 값이 F10일 때 수행하려는 코드를 작성하고

마지막으로 Key에다가 0을 대입하면 됩니다.



procedure TMDIChild.FormKeyDown(Sender: TObject; var Key: Word; Shift: ShiftState);

begin

if (Key = VK_F10) then begin

화면클리어;

Key := 0;

end;

end;