귀하는 손님 이십니다
로그인
회원가입
  
  델마당 공식 은행계좌
  하나은행 227-910235-83607
  예금주 이상국(운영진)
프로젝트 게시판
투표게시판
델마당소개
기초부터 활용까지! 델파이 교육 - 데브기어
 광고문의 :
옄猷뚯떎 옄猷뚯떎 입니다.
글내용 - 옄猷뚯떎
 궎蹂대뱶 硫붿떆吏 썑궧 而댄룷꼳듃 TKeyHook v1.1
넄媛
(쁽떎솚)
2017-06-08 삤쟾 4:52:21
2331회 조회


첨부파일 다운로드
TKeyHook_V11.zip
뼱뵆由ъ씠뀡 젅踰⑥뿉꽌 궎蹂대뱶 硫붿떆吏瑜 썑궧븯뒗 而댄룷꼳듃 諛 삁젣엯땲떎.
(떆뒪뀥 젅踰⑥쓽 썑궧씠 븘떂, 利, 떎瑜 봽濡쒖꽭꽌쓽 궎蹂대뱶 硫붿떆吏뒗 썑궧븯吏 紐삵빀땲떎.) 

뤌 옉꽦떆뿉 Form 냽꽦뿉꽌 KeyPreview瑜 True濡 꽭듃빐 몢뼱룄 OnKeyDown Event媛 諛쒖깮븯吏 븡뒗 寃쎌슦굹 떎瑜 뤌뿉꽌 諛쒖깮븳 궎 엯젰쓽 媛濡쒖콈湲 삉뒗 湲濡쒕쾶 빂궎 꽕젙 벑뿉 쑀슜빀땲떎.

(李멸퀬) 
湲濡쒕쾶 빂궎 꽕젙 삁 : 硫붿씤 뤌뿉 TKeyHook쓣 삱젮넃怨 AppGlobal怨 Enabled 봽濡쒗띁떚瑜 True濡 Set, 洹몃━怨 OnKeyDown 씠踰ㅽ듃 봽濡쒖떆졇瑜 븘옒 媛숈씠  肄붾뵫빐 몢硫 봽濡쒓렇옩쓽 룷而ㅼ뒪媛 뼱뒓 뤌뿉 엳뜕吏 긽愿뾾씠 F1 궎瑜 늻瑜대㈃ 룄留먯씠 쑉寃 븷 닔 엳떎.

procedure TMainForm.KeyHook1KeyDown(Sender: TObject; wParam,
  lParam: Integer; var Discard: Boolean);
begin
   if wParam = VK_F1 then
      HtmlHelpA(GetDesktopWindow, pAnsiChar(Extractfilepath(paramStr(0)) + 'MyHelpFile.chm'), HH_DISPLAY_TOPIC, 0);
end;