builder中如何打印图象(100分)

  • 主题发起人 主题发起人 fenghualiang
  • 开始时间 开始时间
方法多多
 
PageControl->Pages->PaintTo(Printer()->Handle,10,10);
if(i!=Stop)
Printer->NewPage();
if(PrintDialog->Execute())
{
TPrinter *APrinter=Printer();
APrinter->begin
Doc();
APrinter->Canvas->Draw(1,1,Image->Picture->Bitmap);
APrinter->EndDoc();
}
 
接受答案了.
 
后退
顶部