안녕하세요 델파이 극초보입니다

간단한 에플리케이션을 만들고 있는데요
너무 아는게 없다 보니깐 기초적인 질문을 드립니다.

에플리케이션에 웹브라우져콘트롤을 삽입만했습니다.
그다음에 이 브라우져안에 .htm 파일들을 뿌려주고 싶은데요
어떤식으로 해야 하나요?

procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
  var
  tmp : string;
begin
  tmp := 'd:studytestchmbasic0003.html';
  WebBrowser1.OleObject.URL := tmp;
end;

이렇게 쓰고 F9 눌렀더니 이런 에러가 나오는군요
[Error] Unit1.pas(44): '.'expected but end of file found
[Error] Project2.dpr(5): Could not complite used uuni`t 'Unit1.pas'

원하는것은 리스트박스에서 파일을 클릭을 하면 위에 브라우져에 그 파일 내용이 뿌려지는 방식입니다.

전체소스 올립니다

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, OleCtrls, SHDocVw;

type
  TForm1 = class(TForm)
    WebBrowser1: TWebBrowser;
    procedure WebBrowser1BeforeNavigate2(Sender: TObject;
      const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
      Headers: OleVariant; var Cancel: WordBool);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}


procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
  var
  tmp : string;
begin
  tmp := 'd:studytestchmbasic0003.html';
  WebBrowser1.OleObject.URL := tmp;
end;

END