???
在對話框程序的打印功能中，如果使用針式打印機，那么你可能希望連續(xù)打印的多個表中不換頁。我們知道，在使用打印功能的時候，每當
dc.startpage()就會開始一頁的打印，而dc.endpage()就會結束一頁的打印，那么如何能使多個dc.startpage()與
dc.endpage()不換頁而實現連續(xù)打印呢，方法如下： 假設我們要打印m_nTotalNum個表，每個表有m行，那么要實現m_nTotalNum個表連續(xù)打印不換頁可以如下實現：(由于打印機制問題，在打滿一張后是必須要換頁的，我們的做法是在換頁的地方讓給它留出一定的空白，不太影響表的連續(xù)性)
/////////////主函數
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則退出循環(huán)
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為規(guī)定的一張紙的高度。 如果大于紙張高度就要換頁。這樣就保證打印內容連續(xù)。
return nXCurrentPoint; //最后返回打印完當前表時當前的頁面高度，
以便下一張表接著這個高度打印
}