아래한글과 같은 응용프로그램을 실행시킨후 파일열기를 하였습니다.(SPY를 통해서 확인하였음)
그런데 파일이름을 주고 열기 버튼을 실행해야 하는데 그 부분을 모르겠네요..
작성한 소스는
hAppId := FindWindow(nil, pchar('빈 문서 1 - 한글과컴퓨터 한글 ')); <- 한글의 핸들가져오기
SendMessage(hAppId, WM_COMMAND, 53280, 0); <- 파일열기 실행
hAppChildId := FindWindowEx(hAppId, 0, PChar('HNC_DIALOG'), nil); <- 파일열기창의 핸들가져오기
SendMessage(hAppChildId, WM_SETTEXT, 0, LParam(pChar('C:\aaa.hwp'))); <- 파일이름에 aaa.hwp입력
위와 같은 의도로 한글을 실행시키고 파일열기를 해서 C:\aaa.hwp를 불러오고 싶은데 안되네요
질문>
1) 2번째라인에서 sendmessage로 파일열기를하면 ModalForm으로 열려서 창을 닫아야 다음 라인으로 넘어가 3번째 라인이 의미없어짐. 따라서 2번째 라인의 sendmessage시에 'C:\aaa.hwp'를 넘겨주는 방법이 있는지?
2) FindWindowEx를 써서 파일열기창의 Handle을 가져와야 하는게 하니라 파일열기창의 '파일이름'이라는 Edit의 Handle을 가져오는 방법?(결국은 FindWindowEx 사용법을 잘 모른다는 의미임..)
|