with Printer do
begin
{
begindoc;
canvas.stretchdraw(strect,image1.picture.graphic);
//将放大的图形向打印机输出
enddoc;
}
with Printer do
begin
BeginDoc;
panel1.ScaleBy(5,1);
panel1.PaintTo(Handle, 100, 50);
EndDoc;
end;
begin
{
begindoc;
canvas.stretchdraw(strect,image1.picture.graphic);
//将放大的图形向打印机输出
enddoc;
}
with Printer do
begin
BeginDoc;
panel1.ScaleBy(5,1);
panel1.PaintTo(Handle, 100, 50);
EndDoc;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货