타락천사님이 올려놓은 "HTML 소스 코드에서 텍스트 코드를 분리하기......"
소스입니다.
델파이5.0에서 컴파일을 시키면 에러가 발생 됩니다.
이소스를 실행시킬 수 있는 방법 줌 가르켜주시길 바랍니다.
procedure TForm1.btnPassingClick(Sender: TObject);
var
MyDocument: OleVariant;
begin
MyDocument := WebBrowser1.Document; <-----------에러
// HTML 소스 보기
memTest.Lines.Add(MyDocument.Body.InnerHTML); <---------에러
// 일반 텍스트 보기
memTest.Lines.Add(MyDocument.Body.InnerText); <-----------에러
end;
서기원님 답변 주세서 대단히 감사합니다.
var
MyDocument : IHtmlDocument2;
이렇게 정의해 주시면 될겁니다.