이주석 wrote:

> DElPHI 3 로 P/G 작성중이고.

> 완전 초짭니다...

> 폼이 CREATE 될때 키보드에서 NUMBER LOCK,한영,INSERT,CAPS LOCK 이 설정되어있느지

> 알아낼려면 어떻게 해야 하는지요?

> 그리고 이 설정을 CODE상에서 바꿀려면 어떻해야 하는지요?

> 미치겠슴다...

> 책이란 책은 모조리 다 봤는데도... 안나오고...

> 검색이란 검색은 다 해봐도 감이 안잡히고...

> 흑~~~

>

> 고수님들 한수 지도 부탁드립니돠~~~!

>



하이염~~

델세상(http://www.freechal.com/delphiworld)의 조규춘입니다.

쩝.. 고수는 아니지만 그냥 남겨 봅니다용~~ 히히.



우선 첫번째 질문하신 내용은 소스를 보면 이해하시것지용~



procedure TForm1.FormCreate(Sender: TObject);

var

KeyState : TKeyboardState;

begin

GetKeyboardState(KeyState);

if KeyState[VK_CAPITAL] <> 0 then Lbl_Caps.Caption := 'On'

else Lbl_Caps.Caption := 'Off';

if KeyState[VK_NUMLOCK] <> 0 then Lbl_Num.Caption := 'On'

else Lbl_Num.Caption := 'Off';

if KeyState[VK_SCROLL] <> 0 then Lbl_Scroll.Caption := 'On'

else Lbl_Scroll.Caption := 'Off';

end;



두번째 질문하신 내용은...

GetKeyboardState();

SetKeyboardState();



이 함수를 이용하시면 될겁니다용~

그럼 수고염...