여러분이 잘아는 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;
웹페이지의 소스보기예제인데 위를 여러번 실행하면 메모리 부족으로
나옵니다
아마도 HTMLDoc를 로드하면서 메모리를 쓰고서 어디선가 해제를
해줘야하는데 안해서 그런것 같습니다
한번만 실행하면 아무 문제가 없겠지만 이를 루프로 돌려보면
문제가 발생하거든요
아시는 분 찾아내주시면 감사하겠습니다