try
WordApp := CreateOleObject('Word.Application');
except
Showmessage('MS-Word가 설치되어 있지 않거나 실행 할 수 없습니다.');
Exit;
end;
try
WordApp.Visible := False;
WordDoc := WordApp.Documents.Open(FileName);
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
이 곳에서 한줄씩 읽어 오고 싶은데
어떻게 읽으면 되나요~~~~~~~~~~~~~~~~~~~~~~~
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
WordApp := Unassigned;
WordDoc := Unassigned;
except
end;
아래 사이트 참고하시면 원하시는 결과를 얻으실 수 있을 거예요..
http://www.djpate.freeserve.co.uk/Automation.htm
그럼~즐거운 프로그래밍 하시길~