xbgs

??? 在對話框程序的打印功能中，如果使用針式打印機，那么你可能希望連續打印的多個表中不換頁。我們知道，在使用打印功能的時候，每當 dc.startpage()就會開始一頁的打印，而dc.endpage()就會結束一頁的打印，那么如何能使多個dc.startpage()與 dc.endpage()不換頁而實現連續打印呢，方法如下： 假設我們要打印m_nTotalNum個表，每個表有m行，那么要實現m_nTotalNum個表連續打印不換頁可以如下實現：(由于打印機制問題，在打滿一張后是必須要換頁的，我們的做法是在換頁的地方讓給它留出一定的空白，不太影響表的連續性)

/////////////主函數

void CDlgTest::PrintOneNum() 
{
    CDC dc;
    CPrintDialog printDlg(FALSE);
    CPrintInfo Info;
    printDlg.GetDefaults(); 
    dc.Attach(printDlg.GetPrinterDC());
    dc.m_bPrinting=TRUE;
    CString strTitle;
    strTitle.LoadString(AFX_IDS_APP_TITLE);
    DOCINFO di;
    ::ZeroMemory(&di,sizeof(DOCINFO));
    di.cbSize=sizeof(DOCINFO);
    di.lpszDocName=strTitle;
    if(dc.m_hDC)
    {
      BOOL bPrintingOk=dc.StartDoc(&di); 
      CPrintInfo Info; 
      m_nCurrentNum_WhenPrint=1; //當前表數為1,這個用來控制打印的表數
       int nPageTotalScale=0; //初始化從0開始
       Info.m_nCurPage=1; //從第一頁開始
       dc.StartPage(); //開始打印頁
       for(;;)
      {
//打印完需要的表數m_nTotalNum則退出循環
          if(m_nCurrentNum_WhenPrint >m_nTotalNum) break;
         else //打印一張表
          { 
            nPageTotalScale=OnPrintReport  (&dc,&Info,nPageTotalScale, m_nCurrentNum_WhenPrint);
            m_nCurrentNum_WhenPrint ++; 
            nPageTotalScale+=30; //打印下一張表的行距從＋30開始
          }
      }
      bPrintingOk=(dc.EndPage()>0); //結束一頁
       m_nCurrentNum_WhenPrint =0;
      if(bPrintingOk) 
      dc.EndDoc();
      else 
      dc.AbortDoc();
   }
   else
   {
      MessageBox("請檢查打印機是否連接完好？","我的程 序",MB_ICONEXCLAMATION);
   }
   dc.Detach();
}

/////////////打印函數

int CdlgTest::OnPrintReport(CDC *pDC, CPrintInfo *pInfo, 
   int nXBasePointWhenPrint, int m_nCurrentNum_WhenPrint)
{
    int nXCurrentPoint=nXBasePointWhenPrint; //進行行控制的變量
//--------換頁---------
    if(nXCurrentPoint+210> 2000) //210為將要占用的長度
    {
        pDC->EndPage();
        pDC->StartPage();
        nXCurrentPoint=0;
        pInfo->m_nCurPage++;
    }
    nXCurrentPoint+=210;
    pDC->TextOut(0,nXCurrentPoint,"我的報表內容，從0－210的表長度 ");
//每當打印的輸出要換行的時候就要判斷if(nXCurrentPoint+將要使用的高度> 2000)2000為規定的一張紙的高度。 如果大于紙張高度就要換頁。這樣就保證打印內容連續。
    return nXCurrentPoint; //最后返回打印完當前表時當前的頁面高度，
                        以便下一張表接著這個高度打印
}