我要在单文档中实现打印，但不知如何实现打印纸大小的设置。（比方说给定长度和宽度）。

[cn2000]

[cn2000]

怎么没人响应，都和我一样菜吗。

[panda_w]

CString strDriverName;
CString strPrinterName;
CString strPortName;

DEVMODE* pMode = NULL;

if (app->printJob->GetSelectedPrinter(strDriverName, strPrinterName,
strPortName, &pMode))
{
ASSERT(pMode != NULL);

pMode->dmTTOption = DMTT_DOWNLOAD;
pMode->dmOrientation = DMORIENT_LANDSCAPE;
pMode->dmColor = DMCOLOR_MONOCHROME;
pMode->dmPaperSize = DMPAPER_A4;

if (dwPrinter < cReturned)
{
strDriverName = ppri2[dwPrinter].pDriverName;
strPrinterName = ppri2[dwPrinter].pPrinterName;
strPortName = ppri2[dwPrinter].pPortName;
}

app->printJob->SelectPrinter(strDriverName, strPrinterName, strPortName,
pMode);

[cn2000]

能说得详细点儿吗？

[cn2000]

能说得详细点儿吗？

[cn2000]

网上无高人吗？

[cn2000]

网上无高人吗？

[vcmfc]

3.在应用程序中设置打印纸张类型。

答：CPrintDialog prn(FALSE);
prn.GetDefaults();
HANDLE pn;
CString m_devicename;
DEVMODE *print;
m_devicename=prn.GetDeviceName();
BOOL bOk=::OpenPrinter((LPTSTR)(LPCTSTR)m_devicename,&pn,NULL);
if(!bOk)
{
LPVOID lpMsgBuf;
FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM |
FORMAT_MESSAGE_IGNORE_INSERTS,NULL,::GetLastError(),
MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),(LPTSTR) &lpMsgBuf,0,NULL);
::MessageBox( NULL, (LPTSTR)(LPCTSTR)lpMsgBuf, "Error", MB_OK | MB_ICONINFORMATION );
LocalFree( lpMsgBuf );
return ;
}
//返回DEVMODE结构的大小
int nSize =DocumentProperties (m_hWnd,pn,(LPTSTR)(LPCTSTR)m_devicename,NULL,NULL,0);
print = (DEVMODE *) malloc(nSize+1);
if(NULL == print) return ;
ZeroMemory(print,nSize+1);
LONG lt=::DocumentProperties(m_hWnd,pn,(LPTSTR)(LPCTSTR)m_devicename,print,NULL,DM_OUT_BUFFER);
print->dmFields=DM_PAPERSIZE|DM_ORIENTATION;
print->dmPaperSize=DMPAPER_LETTER;
print->dmOrientation=DMORIENT_LANDSCAPE; //DMORIENT_PORTRAIT
//如果使用自定义纸张大小
//print->dwFields=DM_PAPERSIZE|DM_PAPERLENGTH|DM_PAPERWIDTH|DM_ORIENTATION;
//print->dmPaperLength=用户输入纸张的长度
//print->dmPaperWidth=用户输入纸张的宽度
lt=::DocumentProperties(m_hWnd,pn,(LPTSTR)(LPCTSTR)m_devicename,NULL,print,DM_IN_BUFFER|DM_OUT_BUFFER);
bOk=::ClosePrinter(pn);
if(!bOk)
{
free(print);
return ;
}
free(print);

[cn2000]

谢谢，我式一下。

[cn2000]

vcmfc 你好，我在单文档的程序中直接运行了该函数但是在打印预览中还是显示A4纸这是怎么会事呢。