H hangw Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-20 #1 各位高手请帮忙：我想用TPanel控件实现报表的预览和打印，但是表格及字符应该怎样控制，请给一个详细的例子，本人愿送上500大分，急！急！！急！！！
L LeeChange Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-20 #2 原理很简单，你把送望Printer.Canvas的命令送到panel的Canvas就行了。具体这样做 var DC: HDC; Canvas: TCanvas; begin DC:=GetDC(Panel); try Canvas:=TCanvas.Create; try Canvas.Handle:=DC; //把Printer.Canvas的调用换成对此Canvas的调用就行了。 finally Canvas.Free end finally ReleaseDC(Panel, DC) end end;
原理很简单，你把送望Printer.Canvas的命令送到panel的Canvas就行了。具体这样做 var DC: HDC; Canvas: TCanvas; begin DC:=GetDC(Panel); try Canvas:=TCanvas.Create; try Canvas.Handle:=DC; //把Printer.Canvas的调用换成对此Canvas的调用就行了。 finally Canvas.Free end finally ReleaseDC(Panel, DC) end end;
H hangw Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-20 #4 我的意思是把要打印的报表直接写在TPanel上,尺寸与打印机一致,并可以立即输送到打印机 中
