교재에있는 예제 따라치는 중인데요..
에러가 나네요 이부분이 왜 에러가 나는지 아시는분... 있나요 ㅎㅎ?

procedure TTWebBrowser_Form.EurlKeyPress(Sender: TObject; var Key: Char);
begin
  if key = #13  then
  begin
    key := #0;
    if eURL.Text <> '' then  begin
      WebBrowser1.Navigate(eURL.Text);
      if slHistory.IndexOf(eURL.Text) = -1 then
          begin
            slHistory.Add(eURL.Text);
            if slHistory.Count > 1 then
              Back_Action.Enabled := True;
            else -------------------------------> 에러 교재 그대로 타이핑했는데 에러가 납니다. 
              Back_Action.Enabled := False;
          end;
      end;
   end;
end;


procedure TTWebBrowser_Form.WebBrowser1StatusTextChange(ASender: TObject;
  const Text: WideString);
begin
StatusBar1.SimpleText := Text---->  ;세미콜론 붙이는거아닌가요?
end;