혹시 webBrowser컴포넌트의 경계선 문제 때문이라면 이렇게 해보세요..

procedure TfrmMP_MAIN.WebBrowser1ProgressChange(Sender: TObject; Progress,
  ProgressMax: Integer);
begin
     ProgressBar1.Max := ProgressMax;
     ProgressBar1.Position := Progress;
     ProgressBar1.Update;
     if(ProgressMax = Progress) then
     begin
          cmbEXRATE.Visible := True;
          txtEXRATE.Text := '    환율정보';
          Sleep(100);  // 0.1 초간 delay;
          ProgressBar1.Visible := False;
     end;
     //-----
     try
        Webbrowser1.OleObject.Document.Body.Style.OverflowX := 'hidden'; // 스크롤바 없애기
        Webbrowser1.OleObject.Document.Body.Style.OverflowY := 'hidden';
        Webbrowser1.OleObject.Document.Body.Style.Border := 'none'; // 경계선 없애기
     except
     end;
end;



힘내자 님이 쓰신 글 :
: WebBrowser의 Visible = False로 하면 실행했을때 보여지지 않아야 되는거 아닌가요?
: True나 False나 둘 다 변화가 없어요...저만 그런건가요?
: WebBrowser의 내용이 보여지지 않게 하고 싶습니다.
: