OLE Automation을 사용하세요

http://swlab.haansoft.com/tech/down_read.php?b_idx=152&page=;&sField=&sKeyword=&b_code=bbs01

아래한글 OLE Automation에 대한 내용은 위 링크를 참조하시구요.

유진애비 님이 쓰신 글 :
: 아래한글과 같은 응용프로그램을 실행시킨후 파일열기를 하였습니다.(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 사용법을 잘 모른다는 의미임..)