游览网页问题

Question

刚学Delphi。
我现在想做一个窗口游览电脑中一个htm文件的内容。
具体怎么做呢？我太菜，多多包含~！  :)

Answer 1

要用TWebbrowser控件。procedure TForm1.Button1Click(Sender: TObject);
begin
  Webbrowser1.Navigate('http://www.csdn.net/');
end;

Answer 2

procedure TForm1.Button2Click(Sender: TObject);
begin
  Webbrowser1.Navigate('c:\exp.htm');
  while WebBrowser1.ReadyState < READYSTATE_INTERACTIVE do
    Application.ProcessMessages;
  //游览电脑中一个htm文件的内容
  Memo1.Lines.Add(WebBrowser1.OleObject.Document.body.innerHtml);
end;