Q&A

  • TWebbrowse에 HTML소스를 직접 넣어 표현할 수는 없나요?
보면 URL을 넣어서 웹브라우져에 페이지를 보여주잖아요.
그런데 URL대신 HTML소스를 직접 넣어서 페이지를 보여줄려면 어떻게 해야 되나요?

예를들어 테이블에 html소스로 된 문서를 저장했다가 쿼리로 읽어들여 웹브라우져에 넣어 표현할려면요..
알려주시면 감사합니다.
1  COMMENTS
  • Profile
    오명숙 2005.06.11 16:47
    혹시 이거 말씀하시는 건가요?

    <!--CodeS-->

    procedure TForm1.InputStr(msg : string);
    var
      tmp : string;
    begin
      tmp := Webbrowser1.OleObject.Document.Body.innerHTML; // 브라우저 소스  읽어와서..
      tmp := tmp + msg;                                                                 // 읽어온 소스뒤에 문자열 추가하고
      Webbrowser1.OleObject.Document.Body.innerHTML := tmp;  // 합친 HTML 다시 브라우저로 전송
      Webbrowser1.OleObject.Document.Body.Doscroll('PageDown'); // 스크롤 하고... 끝..
    end;


    procedure TForm1.Button1Click(Sender: TObject);
    var
    welcome : string;
    begin
      welcome := '<font size=2 color=#006699 face=굴림>안녕하세요....<br><br>';
      welcome := welcome + '반갑습니다..<br><br></font>';

      InputStr(welcome);  // HTML 태그 브라우저로 출력..
    end;

    <!--CodeE-->

    수고 하세요..^^;;

    <!--CodeS-->
    추신 :
    위에 있는 제 질문 게시물에도 누가  답변좀 해주세요... 몇일째 시간만 허비하고 있어요~ ㅠㅠ
    한글 IME Composition 박스 크기하고 폰트크기 조정하는 문제..
    <!--CodeE-->