Brigno
24-07-2006, 09:07
Utilizzando la libreria Printers.hpp riesco a stampare delle pagine grafiche ma non con tutte le stampanti
Con alcune funziona:
HP 4P, HP 5P, Phaser 8400 (LAN)
ma con altre NO :muro: :
Acrobat Distiller, NRG D422 (LAN), NRG D420 (LAN)
mi stampa le pagine vuote ! :cry: :cry:
if (PrintDialog1->Execute())
{
TRect r=Rect(left,top,right,bottom);
Image1->Canvas->CopyMode = cmSrcCopy;
Image1->Canvas->CopyRect(r,FormMain->Canvas,r);
Image->Canvas->CopyMode = cmNotSrcCopy;
Image->Canvas->CopyRect(r,FormMain->Canvas,r);
TRect r2 = Rect(100,(int)(Prntr->PageHeight/20),Prntr->PageWidth-100,(int)(Prntr->PageHeight*9/20));
FormMain->Canvas->CopyMode = cmSrcCopy;
FormMain->Canvas->CopyRect(r,Image1->Canvas,r);
Prntr->BeginDoc();
Prntr->Canvas->CopyRect(r2,Image->Canvas,r);
Prntr->EndDoc();
}
Qualche idea ? dove sbaglio ? devo aggiungere qualche cosa ?
Con alcune funziona:
HP 4P, HP 5P, Phaser 8400 (LAN)
ma con altre NO :muro: :
Acrobat Distiller, NRG D422 (LAN), NRG D420 (LAN)
mi stampa le pagine vuote ! :cry: :cry:
if (PrintDialog1->Execute())
{
TRect r=Rect(left,top,right,bottom);
Image1->Canvas->CopyMode = cmSrcCopy;
Image1->Canvas->CopyRect(r,FormMain->Canvas,r);
Image->Canvas->CopyMode = cmNotSrcCopy;
Image->Canvas->CopyRect(r,FormMain->Canvas,r);
TRect r2 = Rect(100,(int)(Prntr->PageHeight/20),Prntr->PageWidth-100,(int)(Prntr->PageHeight*9/20));
FormMain->Canvas->CopyMode = cmSrcCopy;
FormMain->Canvas->CopyRect(r,Image1->Canvas,r);
Prntr->BeginDoc();
Prntr->Canvas->CopyRect(r2,Image->Canvas,r);
Prntr->EndDoc();
}
Qualche idea ? dove sbaglio ? devo aggiungere qualche cosa ?