얼마나 긴 문자열을 입력하시려는지는 몰라도..
전혀 문제가 없네요..


From 류..

--------------------------------------------------

procedure TForm1.Button1Click(Sender: TObject);
Var
  Loop : Integer;
  stTemp : String;
begin
  For Loop:= 1 to 30000 do
    stTemp:= stTemp +
             '0123456789012345678901234567890123456789012345678901234567890123456789';
  PageProducer1.HTMLDoc.Text:= stTemp;
  ShowMessage(IntToStr(Length(stTemp) div 1024));
end;


박성태 님이 쓰신 글 :
: TPageProducer의 HTMLDoc에 상당히 긴 문자열을
: 추가하려고 합니다. 캐리지 리턴이 없이
: 한줄로 넣고 싶어여.
: 그런데 긴문자열을 Add하면 너무 길다는
: 에러메세지가 나오고잇내여.
: TStringList, TStream 을 사용하면
: 151자 넣고 캐리지 리턴이 자동으로 먹더군여.
: 캐리지 리턴 없이 HTMLDoc에 add할수 잇는 방법은 없나여?
: 고수님 들의 조언 부탁합니다.