페이지가 차면 Printer()->NewPage();를 명시적으로 해주어야 다음 장에 인쇄됩니다.
TPrinter 도움말 페이지의 Methods에 있는 NewPage 메서드 도움말을 보세요.

명윤이 님이 쓰신 글 :
: 안녕하십니까!
:
: 프린트에 관해 궁금해서 글을 올립니다. 
:
: 메모장의 내용을 인쇄하고자 하여 아래와 같이  작성하여 출력을 하면 출력이 한장만나오고
: 더이상 출력이 안됩니다.  Memo1->Line의 Count수와 ParamPrintStr[line]의 수는 350이 됩니다.
: 나머지의 내용을 프린트하는 방법을 알려주세요.. 꼭 부탁드립니다.
:
: void __fastcall TForm12::SpeedButton1Click(TObject *Sender)
: {
:     int pageline=0;
:     if(!PrintDialog1->Execute())
:         return;
:     Printer()->BeginDoc();
:     Printer()->Title = "=====  저장 데이타 =====";
:   
:     Printer()->Canvas->TextOut(30,(10+Printer()->Canvas->TextHeight(" DXD Data"))*pageline,
:     "=====  저장 데이타 =====");
:     pageline+=2;
:     for(int line=0; line < Memo1->Lines->Count; line++)
:     {
:          Printer()->Canvas->TextOut(30,(10+Printer()->Canvas->TextHeight(" DXD Data"))*pageline,
:          ParamPrintStr[line] );
:          pageline+=2;
:     }
:     Printer()->EndDoc();
:
: }