안녕하세요. 델파이 담당 댁스텁니다... 오랜만에 답변을 쓰는 것 같군요.
일단 TAB키가 눌린 것처럼 동작할 프로그램의 핸들을 얻어야 합니다.
FindWindow(), FindWindowEx()함수를 이용하여 대상 윈도우의 핸들을
얻습니다. (함수의 사용법은 도움말을 참고하세요.)
그리고 이벤트가 발생했을 때 다음처럼 하시면 됩니다.
즉, 대상 윈도우에 탭키가 눌렸다는 메시지를 보내는 겁니다.
PostMessage(handle, WM_KEYDOWN, VK_TAB, 0);
(여기서 handle은 대상 윈도우의 핸들입니다.)
참고로 저는 프로그램에서 버튼이 눌리는 이벤트가 발생하면 윈도우의
기본 프로그램인 메모장에 탭키를 눌린 것처럼 동작하게 해보았습니다.
procedure TForm1.Button1Click(Sender: TObject);
var
h: HWND;
begin
h := FindWindowEx(FindWindow('Notepad', nil), 0, 'Edit', nil);
PostMessage(h, WM_KEYDOWN, VK_TAB, 0);
end;
위 프로그램을 실행하기 전에 먼저 메모장을 실행해야겠죠....
그럼 참고하세요....
|