Q&A

  • [질문/급]Access Violation 오류
HTML 보기 소스 예제

procedure TForm1.ReadHtmls;

var

HTMLDoc : Variant;

HTMLStr : String;

begin

HTMLDoc := WebBrowser1.Document;



if VarIsEmpty(HTMLDoc) then exit;

HTMLStr := HTMLDoc.Body.InnerHTML;

Memo1.Lines.Add(HTMLStr);

end;



여기 게시판에 있는 HTML 보기 소스 예제인 위의 코드를 이용해서

작업중인데 IE 5.0 에서는 문제가 없는데 5.5에서는 에러가 나오네요.

에러는 Access Violation at address 00457753 in module .... 로 나오는데

무슨 문제인지 아시는 분 답변꼭 부탁드립니다.

지금 프로젝트에서 매우 급한 문제라서.....



1  COMMENTS
  • Profile
    화랑 2001.02.16 07:20
    이상준 wrote:

    > HTML 보기 소스 예제

    > procedure TForm1.ReadHtmls;

    > var

    > HTMLDoc : Variant;

    > HTMLStr : String;

    > begin

    > HTMLDoc := WebBrowser1.Document;

    >

    > if VarIsEmpty(HTMLDoc) then exit;

    > HTMLStr := HTMLDoc.Body.InnerHTML;

    > Memo1.Lines.Add(HTMLStr);

    > end;

    >

    > 여기 게시판에 있는 HTML 보기 소스 예제인 위의 코드를 이용해서

    > 작업중인데 IE 5.0 에서는 문제가 없는데 5.5에서는 에러가 나오네요.

    > 에러는 Access Violation at address 00457753 in module .... 로 나오는데

    > 무슨 문제인지 아시는 분 답변꼭 부탁드립니다.

    > 지금 프로젝트에서 매우 급한 문제라서.....

    >





    체크하는 부분이 좀 틀리네요.. 제가 쓰는거랑... 쿠쿠~



    if VarIsEmpty(HTMLDoc) then exit; -> if not assigned(HTMLDoc) then Exit;



    로 해 보세요.. 보니깐 WB에서 Document객체를 받아오는것 같은데..



    함 해보시고.. 또 안되면.. 좀 구체적으로 올려주세요..